[climacs-cvs] CVS climacs

thenriksen thenriksen at common-lisp.net
Thu Jan 10 14:15:51 UTC 2008


Update of /project/climacs/cvsroot/climacs
In directory clnet:/tmp/cvs-serv7065

Modified Files:
	text-syntax.lisp packages.lisp 
Log Message:
Fixed Text syntax.


--- /project/climacs/cvsroot/climacs/text-syntax.lisp	2007/12/15 10:17:11	1.15
+++ /project/climacs/cvsroot/climacs/text-syntax.lisp	2008/01/10 14:15:51	1.16
@@ -74,8 +74,8 @@
   (:name "Text")
   (:pathname-types "text" "txt" "README"))
 
-(defmethod update-syntax ((syntax text-syntax) prefix-size suffix-size
-                          &optional begin end)
+(defmethod update-syntax values-max-min ((syntax text-syntax) prefix-size suffix-size
+                                         &optional begin end)
   (declare (ignore begin end))
   (let* ((buffer (buffer syntax))
          (high-mark-offset (- (size buffer) suffix-size))
@@ -154,7 +154,7 @@
                          (insert* paragraphs pos1 m))
                        (incf pos1))
                       (t nil)))))))
-  (call-next-method))
+  (values 0 (size (buffer syntax))))
 
 (defmethod backward-one-paragraph (mark (syntax text-syntax))
   (with-slots (paragraphs) syntax
--- /project/climacs/cvsroot/climacs/packages.lisp	2008/01/06 10:26:12	1.128
+++ /project/climacs/cvsroot/climacs/packages.lisp	2008/01/10 14:15:51	1.129
@@ -153,7 +153,8 @@
 
 (defpackage :climacs-text-syntax
   (:use :clim-lisp :clim :drei-buffer :drei-base
-	:drei-syntax :flexichain :drei :drei-fundamental-syntax))
+	:drei-syntax :flexichain :drei :drei-fundamental-syntax
+        :esa-utils))
 
 (defpackage :climacs-prolog-syntax
   (:use :clim-lisp :clim :drei-buffer :drei-base




More information about the Climacs-cvs mailing list