--- M6502/Orao.pm	2007/08/01 12:57:15	76
+++ M6502/Orao.pm	2007/08/01 13:01:17	77
@@ -87,28 +87,9 @@
 			0xE000, 0xFFFF, 'sistemski ROM',
 		);
 
-if(0){
-		foreach my $i ( 0 .. $#mmap / 3 ) {
-			my $o = $i * 3;
-			my ( $from, $to, $desc ) = @mmap[$o,$o+1,$o+2];
-			printf "%04x - %04x - %s\n", $from, $to, $desc;
-			for my $a ( $from .. $to ) {
-				if ( $a >= 0x6000 && $a < 0x8000 ) {
-					my $b = $self->read( $a );
-					$self->vram( $a - 0x6000, $b );
-				} else {
-					$self->read( $a );
-				}
-			}
-		}
-}
-
 	} else {
 
 		warn "rendering video memory\n";
-#		for my $a ( 0x6000 .. 0x7fff ) {
-#			$self->vram( $a - 0x6000, $mem[$a] );
-#		}
 		$self->render( @mem[ 0x6000 .. 0x7fff ] );
 	
 	}
@@ -165,6 +146,7 @@
 #		$self->vram( $a - 0x6000 , $mem[ $a ] );
 #	}
 	$self->render( @mem[ 0x6000 .. 0x7fff ] );
+	$self->render_mem( @mem ) if $self->show_mem;
 }
 
 =head2 load_oraoemu