Ticket #586: qt-light.timer-stop.patch
File qt-light.timer-stop.patch, 513 bytes (added by , 13 years ago) |
---|
-
qt-light.scm
old new 196 196 (define (qt:get-directory cap dir #!key parent (options '())) 197 197 (qt:getexistingdirectory parent cap dir (file-dialog-options 'qt:get-directory options)) ) 198 198 199 (! <qt-timer> 'stop199 (! <qt-timer> stop 200 200 (lambda (self) (qt:stoptimer self))) 201 201 202 (! <qt-sound> 'stop202 (! <qt-sound> stop 203 203 (lambda (self) (qt:stopsound self))) 204 204 205 205 (define (qt:stop x) (@ x stop))