version 1.1, Thu Dec 28 08:54:20 2000 UTC | version 1.2, Fri Jun 20 11:40:23 2003 UTC | ||
---|---|---|---|
|
|
||
(clear-win win) | (clear-win win) | ||
(if grid (grid-win win)) | (if grid (grid-win win)) | ||
(draw-skelton-win win prim) | (draw-skeleton-win win prim) | ||
(redraw-win win) | (redraw-win win) | ||
(setf (window-event-mask win) save-event-mask) | (setf (window-event-mask win) save-event-mask) |
|
ktanaka Powered by ViewCVS 1.0-dev |
ViewCVS and CVS Help |