Update of /project/climacs/cvsroot/climacs In directory common-lisp.net:/tmp/cvs-serv29335 Modified Files: buffer.lisp Log Message: Very minor, cosmetic changes. Date: Mon Jan 3 19:15:41 2005 Author: abakic Index: climacs/buffer.lisp diff -u climacs/buffer.lisp:1.13 climacs/buffer.lisp:1.14 --- climacs/buffer.lisp:1.13 Wed Dec 29 07:58:53 2004 +++ climacs/buffer.lisp Mon Jan 3 19:15:41 2005 @@ -339,7 +339,7 @@ (defmethod insert-object ((mark mark-mixin) object) (insert-buffer-object (buffer mark) (offset mark) object)) -(defgeneric insert-sequence (mark string) +(defgeneric insert-sequence (mark sequence) (:documentation "Insert the objects in the sequence at the mark. This function simply calls insert-buffer-sequence with the buffer and the position of the mark.")) @@ -482,7 +482,7 @@ (min (offset (low-mark buffer)) offset)) (setf (offset (high-mark buffer)) (max (offset (high-mark buffer)) (+ offset n))) -(setf (slot-value buffer 'modified) t)) + (setf (slot-value buffer 'modified) t)) (defgeneric clear-modify (buffer))