X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fcondition.lisp;h=faa04474d8eeb6a46231f38e6ffc77e38fc4ff82;hb=6129b1ebc5125c57d6446c061155f5f653f41725;hp=99d09951a5216753787b3c47b5616e39ee602fda;hpb=098f53bae55186b7b0b1cdc82f1ec0abbe6c97e7;p=sbcl.git

diff --git a/src/code/condition.lisp b/src/code/condition.lisp
index 99d0995..faa0447 100644
--- a/src/code/condition.lisp
+++ b/src/code/condition.lisp
@@ -912,7 +912,8 @@
 
 (define-condition package-at-variance (reference-condition simple-warning)
   ()
-  (:default-initargs :references (list '(:ansi-cl :macro defpackage))))
+  (:default-initargs :references (list '(:ansi-cl :macro defpackage)
+                                       '(:sbcl :variable *on-package-variance*))))
 
 (define-condition package-at-variance-error (reference-condition simple-condition
                                              package-error)