From: Raymond Toy <toy.raymond@gmail.com>
Date: Thu, 23 Aug 2012 03:50:30 +0000 (-0700)
Subject: Need to wrap EVAL-WHEN around USE-PACKAGE since use-package doesn't
X-Git-Tag: snapshot-2012-09~7
X-Git-Url: http://common-lisp.net/gitweb?p=projects%2Fcmucl%2Fcmucl.git;a=commitdiff_plain;h=a176515cc4356f3f6de43391604e90c7e8391b99

Need to wrap EVAL-WHEN around USE-PACKAGE since use-package doesn't
have special treatment in the compiler anymore.
---

diff --git a/src/interface/debug.lisp b/src/interface/debug.lisp
index be8ac9f..42b52ec 100644
--- a/src/interface/debug.lisp
+++ b/src/interface/debug.lisp
@@ -15,7 +15,8 @@
 ;;;
 
 (in-package "DEBUG")
-(use-package '("TOOLKIT" "INTERFACE"))
+(eval-when (:compile-toplevel :load-toplevel :execute)
+  (use-package '("TOOLKIT" "INTERFACE")))
 
 ;;; We need to record three things globally:
 ;;;    - The structure decribing the current debugger display