diff -ruN rmagic-2.21-orig/wadg/rm/Report/QuickSummary.pm rmagic-2.21/wadg/rm/Report/QuickSummary.pm
--- rmagic-2.21-orig/wadg/rm/Report/QuickSummary.pm	2003-04-02 04:21:00.000000000 -0500
+++ rmagic-2.21/wadg/rm/Report/QuickSummary.pm	2017-07-23 17:21:26.000000000 -0400
@@ -45,8 +45,10 @@
 	$self->_initialize( %parms ) or return;
 
 	# Setup caps rows and remove any double '_'
-	$self->{_CONFIG}{$self->{token}}{Rows} =~ s/([A-Z0-9])/$1_/g;
-	$self->{_CONFIG}{$self->{token}}{Rows} =~ s/__/_/g;
+	my $rows = $self->{_CONFIG}{$self->{token}}{Rows};
+	$rows =~ s/([A-Z0-9])/$1_/g;
+	$rows =~ s/__/_/g;
+	$self->{_CONFIG}{$self->{token}}{Rows} = $rows;
 	
 	
 	return $self;
diff -ruN rmagic-2.21-orig/wadg/rm/Settings.pm rmagic-2.21/wadg/rm/Settings.pm
--- rmagic-2.21-orig/wadg/rm/Settings.pm	2003-04-02 04:21:00.000000000 -0500
+++ rmagic-2.21/wadg/rm/Settings.pm	2017-07-24 22:51:54.000000000 -0400
@@ -907,7 +907,7 @@
 	# Check GD for support of desired output format. If none
 	# given or not capable, then set output format accordingly.
 	#
-	my $g = new GD::Image(0,0);
+	my $g = new GD::Image(1,1);
 
 	if( defined $self->val( 'graphs', 'Format' ) ) {
 		if( $self->val( 'graphs', 'Format' ) =~ /jpe?g/i ) {