Author: junrue Date: Wed Apr 26 12:29:35 2006 New Revision: 111
Modified: trunk/src/packages.lisp trunk/src/uitoolkit/widgets/event.lisp Log: remove dangling references to obsolete stop function
Modified: trunk/src/packages.lisp ============================================================================== --- trunk/src/packages.lisp (original) +++ trunk/src/packages.lisp Wed Apr 26 12:29:35 2006 @@ -454,10 +454,8 @@ #:shutdown #:size #:spacing-of - #:start #:startup #:step-increment - #:stop #:style-of #:sub-menu #:text
Modified: trunk/src/uitoolkit/widgets/event.lisp ============================================================================== --- trunk/src/uitoolkit/widgets/event.lisp (original) +++ trunk/src/uitoolkit/widgets/event.lisp Wed Apr 26 12:29:35 2006 @@ -377,7 +377,7 @@ (gfs::kill-timer (cffi:null-pointer) wparam) (progn (if (<= (delay-of timer) 0) - (stop timer) + (enable timer nil) (reset-timer-to-delay timer (delay-of timer))) (event-timer (dispatcher timer) timer (event-time tc))))) 0)
graphic-forms-cvs@common-lisp.net