[mcclim-cvs] CVS mcclim/Drei
thenriksen
thenriksen at common-lisp.net
Thu Feb 14 08:15:02 UTC 2008
Update of /project/mcclim/cvsroot/mcclim/Drei
In directory clnet:/tmp/cvs-serv31883/Drei
Modified Files:
views.lisp
Log Message:
Oops, accidentally reintroduced old bug. Pick up on buffer changes affecting strokes.
--- /project/mcclim/cvsroot/mcclim/Drei/views.lisp 2008/02/13 21:58:50 1.37
+++ /project/mcclim/cvsroot/mcclim/Drei/views.lisp 2008/02/14 08:15:01 1.38
@@ -771,6 +771,7 @@
(defmethod observer-notified ((view drei-buffer-view) (buffer drei-buffer)
changed-region)
(destructuring-bind (start-offset . end-offset) changed-region
+ (invalidate-strokes-in-region view start-offset end-offset :modified t)
(with-accessors ((prefix-size lines-prefix-size)
(suffix-size lines-suffix-size)) view
(setf prefix-size (min start-offset prefix-size)
More information about the Mcclim-cvs
mailing list