For the Scheme mode, use the expression as command

part of darcs patch Sun Sep 18 13:15:34 EEST 2005  Martin Gasbichler <gasbichl@informatik.uni-tuebingen.de>

scheme/nuit-engine.scm

@@ -237,11 +237,8 @@
      (let ((viewer
 	    (find/init-plugin-for-result
 	     (eval-string command-line))))
-       (let* ((tokens (split-command-line command-line))
-	      (command (car tokens))
-	      (args (cdr tokens))
-	      (new-entry
-	       (make-history-entry command args viewer)))
+       (let ((new-entry
+              (make-history-entry command-line '() viewer)))
 	 ;; #### shouldn't we use some kind of insertion here?
 	 (append-to-history! new-entry)
 	 (signal-result-buffer-object-change)