Index: /trunk/source/cocoa-ide/hemlock/src/charprops.lisp
===================================================================
--- /trunk/source/cocoa-ide/hemlock/src/charprops.lisp	(revision 12699)
+++ /trunk/source/cocoa-ide/hemlock/src/charprops.lisp	(revision 12700)
@@ -297,6 +297,6 @@
     (cond ((null changes)
            (return-from copy-line-charprops))
-          ((and (= start 0) (or (= 0 end) (null end)))
-           (return-from copy-line-charprops (copy-charprops-changes changes))))
+          ((and (= start 0) (null end)))
+           (return-from copy-line-charprops (copy-charprops-changes changes)))
     (unless end
       (setq end (line-length line)))