[climacs-cvs] CVS update: climacs/gui.lisp

[Christophe Rhodes]

Update of /project/climacs/cvsroot/climacs
In directory common-lisp.net:/tmp/cvs-serv28714

Modified Files:
	gui.lisp 
Log Message:
Experimental fix for CSR minibuffer problems.

Oddly, not everyone suffers from this.  Nor from the problem the 
handle-repaint method was included to solve: the scrollbars not 
adjusting properly.

handle-repaint is not necessarily the right place for this functionality 
to be hooked on, but note-sheet-region-changed isn't either: drawing to
a viewport also seems to change the region, so drawing to the frame from 
within the note-sheed-region-changed is a bad idea.

Date: Sat Jul  2 17:54:22 2005
Author: crhodes

Index: climacs/gui.lisp
diff -u climacs/gui.lisp:1.148 climacs/gui.lisp:1.149
--- climacs/gui.lisp:1.148	Tue Jun 28 07:02:34 2005
+++ climacs/gui.lisp	Sat Jul  2 17:54:22 2005
@@ -150,7 +150,7 @@
 
 (defmethod handle-repaint :before ((pane extended-pane) region)
   (declare (ignore region))
-  (redisplay-frame-panes *application-frame*))
+  (redisplay-frame-pane *application-frame* pane))
 
 (defun find-gestures (gestures start-table)
   (loop with table = (find-command-table start-table)