Thu Jun 11 21:01:21 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* smoke-wrapper-class in now cxx:class
hunk ./src/click.lisp 7
- (:metaclass smoke::smoke-wrapper-class))
+ (:metaclass cxx:class))
hunk ./src/click.lisp 14
- (qt:connect-function widget "clicked()"
- #'(lambda ()
- (incf click-count)))
+ (qt:connect (qt:get-signal widget "clicked()")
+ #'(lambda ()
+ (incf click-count)))