
Update of /project/mcclim/cvsroot/mcclim/Examples In directory clnet:/tmp/cvs-serv13084/Examples Modified Files: demodemo.lisp Log Message: Take out dependencies on case in symbol names. This makes McCLIM sort of work in ACL's so-called modern mode; there have been some CLX fixes recently that may get it all the way there. Clean up events.lisp. Add a callback-event, which will be used in ports that get high-level gadget notifications in the event process and need to deliver them to applications. Changed the implementation of scroll bars. When the drag callback is called, just move the sheet; assume that the gadget itself has updated the value and the graphic representation. add a scroll-bar-values interface that gets and sets all scroll bar values and only updates the bar once. This will break the Beagle back end momentarily. --- /project/mcclim/cvsroot/mcclim/Examples/demodemo.lisp 2005/02/01 05:35:30 1.7 +++ /project/mcclim/cvsroot/mcclim/Examples/demodemo.lisp 2006/03/29 10:43:43 1.8 @@ -211,4 +211,4 @@ -(format T "~&;; try (CLIM-DEMO::DEMODEMO)~%") +(format t "~&;; try (CLIM-DEMO::DEMODEMO)~%")