diff --git a/scsh/top.scm b/scsh/top.scm
index 457a27c..4cdc298 100644
--- a/scsh/top.scm
+++ b/scsh/top.scm
@@ -372,9 +372,9 @@
 		     (scsh-exit-now 0)))
 		 
 		  (top-entry		; There was a -e <entry>.
-		   (let ((result ((eval top-entry (interaction-environment))
-				  (command-line))))
-		     (scsh-exit-now 0)))
+		   ((eval top-entry (interaction-environment))
+		    (command-line))
+		   (scsh-exit-now 0))
 		 
 		  ;; Otherwise, the script executed as it loaded,
 		  ;; so we're done.