Changeset 7433


Ignore:
Timestamp:
Oct 13, 2007, 1:16:44 AM (12 years ago)
Author:
gb
Message:

Simple case of INDENT: only move mark if it would otherwise wind up in
initial whitespace (ticket:107).

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/cocoa-ide/hemlock/src/indent.lisp

    r7108 r7433  
    9191      (cond ((or (not p) (zerop p))
    9292             (funcall (value indent-function) mark)
    93              (move-mark point mark))
     93             (when (mark< point mark)
     94               (move-mark point mark)))
    9495            (t
    9596             (if (plusp p)
Note: See TracChangeset for help on using the changeset viewer.