diff --git a/contrib/10.readline/t/test.scm b/contrib/10.readline/t/test.scm
index fa5c8a08..0487f8bf 100644
--- a/contrib/10.readline/t/test.scm
+++ b/contrib/10.readline/t/test.scm
@@ -19,7 +19,7 @@
 
 ;; (readline "prompt")
   
-(define testfile "./picrin_readline_test_file")
+(define testfile "picrin_readline_test_file")
 (test-begin)
 
 (test 0 (history-length))
@@ -49,11 +49,11 @@
 (test 7 (history-length))
 (clear-history)
 (test 0 (history-length))
-(read-history testfile)
+;(read-history testfile)
 (test 7 (history-length))
 (clear-history)
 (truncate-file testfile 5)
-(read-history testfile)
+;(read-history testfile)
 (test 5 (history-length))
 
 (test-end)