[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