Changeset 736

Timestamp:

Mar 27, 2004, 2:50:59 AM (21 years ago)

Author:

Gary Byers

Message:

*POP-STRING* needed a newline.

File:

• trunk/ccl/hemlock/src/listener.lisp (modified) (1 diff)

trunk/ccl/hemlock/src/listener.lisp

@@ -195 +195 @@
                                            string))))))
 
-(defvar *pop-string* ":POP" "what you have to type to exit a break loop")
+(defparameter *pop-string* ":POP
+" "what you have to type to exit a break loop")
 
 (defcommand "POP or Delete Forward" (p)