Changeset 12696


Ignore:
Timestamp:
Aug 26, 2009, 8:37:01 PM (10 years ago)
Author:
rme
Message:

In COPY-REGION: copy the first line's charprops to the end
of line, not to the charpos of the region's end mark.

For ticket:589.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/cocoa-ide/hemlock/src/htext4.lisp

    r12540 r12696  
    302302        (%sp-byte-blt first-chars first-charpos chars 0 length)
    303303        (setf (line-charprops-changes first-copied-line)
    304               (copy-line-charprops first-line :start first-charpos
    305                                    :end last-charpos))
     304              (copy-line-charprops first-line :start first-charpos))
    306305        (do ((line (line-next first-line) (line-next line))
    307306             (previous first-copied-line)
Note: See TracChangeset for help on using the changeset viewer.