--- Orao.pm	2007/08/04 21:04:05	132
+++ Orao.pm	2007/08/04 22:14:09	135
@@ -104,8 +104,6 @@
 	$self->trace( $trace );
 	$self->debug( $debug );
 
-	#( $A, $P, $X, $Y, $S, $IPeriod ) = ( 1, 2, 3, 4, 5, 6 );
-
 	warn "Orao boot finished",
 		$self->trace ? ' trace' : '',
 		$self->debug ? ' debug' : '',
@@ -151,7 +149,7 @@
 
 	warn sprintf("refresh video ram %04x-%04x\n", $f, $t);
 	$self->render_vram;
-	$self->render_mem( @mem ) if $self->show_mem;
+	$self->render_mem( @mem );
 }
 
 =head2 load_image
@@ -369,7 +367,7 @@
 		return $self->read_tape;
 	}
 
-	$self->mmap_pixel( $addr, 0, $byte, 0 );
+	$self->mmap_pixel( $addr, 0, $byte, 0 ) if $self->show_mem;
 	return $byte;
 }
 
@@ -394,8 +392,7 @@
 		confess sprintf "write access 0x%04x > 0xafff aborting\n", $addr;
 	}
 
-	$self->mmap_pixel( $addr, $byte, 0, 0 );
-
+	$self->mmap_pixel( $addr, $byte, 0, 0 ) if $self->show_mem;
 	$mem[$addr] = $byte;
 	return;
 }