Index: /trunk/source/cocoa-ide/hemlock/src/charprops.lisp
===================================================================
--- /trunk/source/cocoa-ide/hemlock/src/charprops.lisp	(revision 13428)
+++ /trunk/source/cocoa-ide/hemlock/src/charprops.lisp	(revision 13429)
@@ -298,5 +298,5 @@
     (cond ((null changes)
            (return-from copy-line-charprops))
-          ((and (= start 0) (null end))
+          ((and (= start 0) (or (null end) (eql end (line-length line))))
            (return-from copy-line-charprops (copy-charprops-changes changes))))
     (unless end