[mcclim-cvs] CVS mcclim/Goatee
thenriksen
thenriksen at common-lisp.net
Wed Nov 22 14:15:52 UTC 2006
Update of /project/mcclim/cvsroot/mcclim/Goatee
In directory clnet:/tmp/cvs-serv30056/Goatee
Modified Files:
editing-stream.lisp
Log Message:
Added implementions of `redraw-input-buffer'. We ignore the
`start-offset' argument, though.
--- /project/mcclim/cvsroot/mcclim/Goatee/editing-stream.lisp 2005/02/22 14:00:18 1.21
+++ /project/mcclim/cvsroot/mcclim/Goatee/editing-stream.lisp 2006/11/22 14:15:52 1.22
@@ -399,3 +399,7 @@
(make-input-editing-stream-snapshot stream area)
(redisplay-area area))))
nil)
+
+(defmethod redraw-input-buffer ((stream goatee-input-editing-mixin) &optional (start-position 0))
+ (declare (ignore start-position))
+ (redisplay-area (area stream)))
More information about the Mcclim-cvs
mailing list