--- CADUBI.pl~	Sat Dec 22 01:56:09 2001
+++ CADUBI.pl	Sat Dec 22 01:57:31 2001
@@ -716,10 +716,10 @@ sub HandleKeystroke {
 	
 	# help
 	if (ord($key) == $keymap{'^h'}) { #Help
-		if (-e $Bin.'/CADUBI.help') {
+		if (-e $Helpfile.'/CADUBI.help') {
 			my @oldmap = @charmap;
 			my @oldpos = @pos;
-			&readfile($Bin.'/CADUBI.help');
+			&readfile($Helpfile.'/CADUBI.help');
 			&status('Press a key to continue...', 1);
 			my $temp = ReadKey(0);
 			@charmap = @oldmap;
@@ -729,7 +729,7 @@ sub HandleKeystroke {
 			&status;
 		} else {
 			&beep;
-			&status("'".$Bin."/CADUBI.help' not available");
+			&status("'".$Helpfile."/CADUBI.help' not available");
 		}
 		return 0;
 	}
