0.8.17.26:

	Fix from VJA (sbcl-devel 2004-12-09) for EXPORT
	continue-format-control
	... actually give it the arguments it needs.
	... write a test that doesn't actually test for the bug, but makes
		me feel better anyway.

src/code/target-package.lisp

@@ -985,7 +985,8 @@ error if any of PACKAGES is not a valid package designator."
             :package package
             :format-control
             "~@<These symbols are not accessible in the ~A package:~2I~_~S~@:>"
-            :format-arguments (list (package-%name package) missing)))
+            :format-arguments (list (package-%name package) missing))
+           'import (package-%name package))
 	  (import missing package))
 	(import imports package))
 

tests/packages.impure.lisp

@@ -17,4 +17,9 @@
 (assert (eq *foo* (find-package "")))
 (assert (delete-package ""))
 
+(handler-case
+    (export :foo)
+  (package-error (c) (princ c))
+  (:no-error (&rest args) (error "(EXPORT :FOO) returned ~S" args)))
+
 (sb-ext:quit :unix-status 104)

version.lisp-expr

@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"0.8.17.25"
+"0.8.17.26"