Commit 739c6817 authored by Robert Strandh's avatar Robert Strandh

Redisplay is now invoked when the frame is resized.

parent 998f1370
......@@ -8,5 +8,3 @@
- handle wrapped lines instead of making McCLIM handle them
- replace the use of the scroller pane by custom pane
- invoke redisplay after resize
......@@ -147,6 +147,10 @@
(declare (ignore frame))
(redisplay-pane pane (eq pane (car (windows *application-frame*)))))
(defmethod handle-repaint :before ((pane extended-pane) region)
(declare (ignore region))
(redisplay-frame-panes *application-frame*))
(defun find-gestures (gestures start-table)
(loop with table = (find-command-table start-table)
for (gesture . rest) on gestures
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment