X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fmacros.lisp;h=baf6694938b7804074e2a337d65b891b63871cdd;hb=bf27595fb567015495b7131707cc85af361567fe;hp=0843787f4ff9d3cc008ced494f96eb357d74307d;hpb=ff92598854bf7cae8d57fe49cef4d9a98e1ab345;p=sbcl.git diff --git a/src/code/macros.lisp b/src/code/macros.lisp index 0843787..baf6694 100644 --- a/src/code/macros.lisp +++ b/src/code/macros.lisp @@ -37,7 +37,7 @@ (defun assert-prompt (name value) (cond ((y-or-n-p "The old value of ~S is ~S.~ - ~%Do you want to supply a new value? " + ~%Do you want to supply a new value? " name value) (format *query-io* "~&Type a form to be evaluated:~%") (flet ((read-it () (eval (read *query-io*))))