~ chicken-core (chicken-5) ec82c1e366d51492e2728189d61a8add828c99af
commit ec82c1e366d51492e2728189d61a8add828c99af Author: Felix <bunny351@gmail.com> AuthorDate: Thu Oct 15 00:38:44 2009 +0200 Commit: Felix <bunny351@gmail.com> CommitDate: Thu Oct 15 00:38:44 2009 +0200 re-added incorrectly removed ,s command diff --git a/csi.scm b/csi.scm index cd9921de..40900cd0 100644 --- a/csi.scm +++ b/csi.scm @@ -316,6 +316,11 @@ EOF (when ##sys#last-exception (history-add (list ##sys#last-exception)) (describe ##sys#last-exception) ) ) + ((s) + (let* ((str (read-line)) + (r (system str)) ) + (history-add (list r)) + r) ) ((?) (display "Toplevel commands:Trap