|  |  |  | @ -19,7 +19,8 @@ my $mw = MainWindow->new();@@ -19,7 +19,8 @@ my $mw = MainWindow->new(); | 
			
		
	
		
			
				
					|  |  |  |  | $mw->withdraw(); | 
			
		
	
		
			
				
					|  |  |  |  | $mw->OnDestroy(\&on_destroy); | 
			
		
	
		
			
				
					|  |  |  |  | 
 | 
			
		
	
		
			
				
					|  |  |  |  | $mw->optionAdd("*font", "-*-arial-norma-r-*-*-*-120-*-*-*-*-*-*"); | 
			
		
	
		
			
				
					|  |  |  |  | $mw->optionAdd("*font", "-*-arial-norma-r-*-*-*-120-*-*-*-*-*-*") if nix(); | 
			
		
	
		
			
				
					|  |  |  |  | $mw->optionAdd("*font", "-*-tahoma-norma-r-*-*-*-120-*-*-*-*-*-*") if win32(); | 
			
		
	
		
			
				
					|  |  |  |  | $mw->optionAdd("*borderWidth", 1); | 
			
		
	
		
			
				
					|  |  |  |  | $mw->optionAdd("*highlightThickness", 0); | 
			
		
	
		
			
				
					|  |  |  |  | 
 | 
			
		
	
	
		
			
				
					|  |  |  | 
 |