~ chicken-core (chicken-5) 7e6afa590cba232c02f89305773c51480a9ddcfb

commit 7e6afa590cba232c02f89305773c51480a9ddcfb
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Aug 12 20:54:12 2010 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Thu Aug 12 20:54:12 2010 +0200

    no backtrace with -q in csi is STUPID

diff --git a/csi.scm b/csi.scm
index e8d57f73..40be65fa 100644
--- a/csi.scm
+++ b/csi.scm
@@ -972,8 +972,6 @@ EOF
 	  (do ([x (read in) (read in)])
 	      ((eof-object? x))
 	    (rec (receive (eval x))) ) ) )
-      (when quietflag
-	(##sys#eval-debug-level 0))	;???
       (when (member* '("-h" "-help" "--help") args)
 	(print-usage)
 	(exit 0) )