[mcclim-cvs] CVS mcclim/Goatee

[thenriksen]

Update of /project/mcclim/cvsroot/mcclim/Goatee
In directory clnet:/tmp/cvs-serv6356/Goatee

Modified Files:
	editing-stream.lisp 
Log Message:
Moved some input-editing functions around.

The typeout area is now cleared at the end of an input-editing session.


--- /project/mcclim/cvsroot/mcclim/Goatee/editing-stream.lisp	2006/12/01 23:02:59	1.24
+++ /project/mcclim/cvsroot/mcclim/Goatee/editing-stream.lisp	2008/01/31 19:17:57	1.25
@@ -211,6 +211,7 @@
 
 (defmethod climi::finalize ((stream goatee-input-editing-mixin)
 			    input-sensitizer)
+  (call-next-method)
   (setf (cursor-visibility (cursor (area stream))) nil)
   (let ((real-stream (encapsulating-stream-stream stream))
 	(record (area stream)))