@@ -1908,12 +1908,13 @@
 	      (import extras) ;; might not be needed
 	      ;; (import csi)
 	      (import readline)
 	      (import apropos)
 	      ;; (import (prefix sqlite3 sqlite3:)) ;; doesn't work ...
-	      (include "readline-fix.scm")
-	      (if *use-new-readline*
+	      ;; (include "readline-fix.scm")
+
+	      (if #t ;; *use-new-readline*
 		  (begin
 		    (install-history-file (get-environment-variable "HOME") ".megatest_history") ;;  [homedir] [filename] [nlines])
 		    (current-input-port (make-readline-port "megatest> ")))
 		  (begin
 		    (gnu-history-install-file-manager