1.0.37.1: more correct restart text for MAKE-PACKAGE

 * Selecting CONTINUE will clobber the existing package, not leave
   it alone.

diff --git a/NEWS b/NEWS
index 1cb1e6c..78c2c54 100644 (file)
--- a/NEWS
+++ b/NEWS
@@ -1,4 +1,7 @@
 ;;;; -*- coding: utf-8; fill-column: 78 -*-
+changes relative to sbcl-1.0.36:
+  * bug fix: correct restart text for the continuable error in MAKE-PACKAGE.
+
 changes in sbcl-1.0.37 relative to sbcl-1.0.36:
   * enhancement: Backtrace from THROW to uncaught tag on x86oids now shows
     stack frame thrown from.

diff --git a/src/code/target-package.lisp b/src/code/target-package.lisp
index ff0bd14..db1234c 100644 (file)
--- a/src/code/target-package.lisp
+++ b/src/code/target-package.lisp
@@ -570,7 +570,7 @@ implementation it is ~S." *default-package-use-list*)
     ;; make the package.
     (when (find-package name)
       ;; ANSI specifies that this error is correctable.
-      (cerror "Leave existing package alone."
+      (cerror "Clobber existing package."
               "A package named ~S already exists" name))
     (let* ((name (package-namify name))
            (package (internal-make-package

diff --git a/version.lisp-expr b/version.lisp-expr
index f89cbd1..d48c0ed 100644 (file)
--- a/version.lisp-expr
+++ b/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".)
-"1.0.37"
+"1.0.37.1"