Changeset 13710

Timestamp:

May 20, 2010, 4:07:16 AM (9 years ago)

Author:

rme

Message:

copy-line-charprops: when the specified interval is 0 (that is, when
START and END are equal), do nothing.

Who wrote this code?

File:

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

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

@@ -302 +302 @@
     (unless end
       (setq end (line-length line)))
+    (when (eql start end)
+      (return-from copy-line-charprops))
     (let* ((new-changes (make-empty-charprops-changes))
            (start-idx (charprops-change-index-for-position changes start))