Changeset 12428

Timestamp:

Jul 18, 2009, 3:42:30 PM (10 years ago)

Author:

mikel

Message:

Fixed case where a form entered at the listener prompt that had the effect of a PRINC failed to insert a newline after the entered form and before the output. See Trac #557.

File:

• trunk/source/cocoa-ide/hemlock/src/listener.lisp (modified) (1 diff)

trunk/source/cocoa-ide/hemlock/src/listener.lisp

@@ -243 +243 @@
                        (> (length string) (value minimum-interactive-input-length)))
               (ring-push (copy-region input-region) ring))
+            (insert-character (region-end input-region) #\NewLine)
             (push (cons r nil) (value input-regions))
             (move-mark (value buffer-input-mark) (current-point))