From: Nikodemus Siivola Date: Sun, 28 Mar 2010 09:37:39 +0000 (+0000) Subject: 1.0.37.1: more correct restart text for MAKE-PACKAGE X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=cd0edb8eca04cfc00ff9474a4342aa5e8896dd66;p=sbcl.git 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 --- 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 --- 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 --- 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"