[climacs-cvs] CVS update: climacs/buffer.lisp

[Aleksandar Bakic]

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))