From 1161eb7c1e0f044dc189ae69010008816d99c2f9 Mon Sep 17 00:00:00 2001
From: jjgarcia <jjgarcia>
Date: Wed, 8 Feb 2006 16:56:59 +0000
Subject: [PATCH] Forgot to reassign *debugger-hook* to avoid exiting on errors

---
 src/lsp/top.lsp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/lsp/top.lsp b/src/lsp/top.lsp
index 5b42f58cb..3a77f8d67 100644
--- a/src/lsp/top.lsp
+++ b/src/lsp/top.lsp
@@ -334,7 +334,8 @@ rebinds this variable to NIL when control enters a break loop.")
 ECL specific.
 The top-level loop of ECL. It is called by default when ECL is invoked."
   (catch *quit-tag*
-    (let* (+ ++ +++ - * ** *** / // ///)
+    (let* ((*debugger-hook* nil)
+	   + ++ +++ - * ** *** / // ///)
 
       (in-package "CL-USER")