Update of /project/mcclim/cvsroot/mcclim/Drei In directory clnet:/tmp/cvs-serv6351/Drei

Modified Files: lisp-syntax.lisp Log Message: Changed the semantics for expression movement (now not identical to Emacs).

--- /project/mcclim/cvsroot/mcclim/Drei/lisp-syntax.lisp 2008/01/12 10:52:24 1.65 +++ /project/mcclim/cvsroot/mcclim/Drei/lisp-syntax.lisp 2008/01/12 11:37:21 1.66 @@ -2038,9 +2038,8 @@ (not (= (offset mark) (end-offset potential-form)))) (typecase potential-form (reader-conditional-form - (setf (offset mark) (end-offset - (or (first-form (children potential-form)) - potential-form)))) + (setf (offset mark) (or (start-offset (first-form (children potential-form))) + (end-offset potential-form)))) (t (setf (offset mark) (end-offset potential-form)))))))

(defmethod forward-delete-expression (mark (syntax lisp-syntax) &optional (count 1)