Fri Jun 5 09:49:09 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Fix test failures when a qt:application instance is already running.
hunk ./src/application.lisp 7
+ (let ((nested (qt:app-p)))
hunk ./src/application.lisp 9
- (5am:is (eql nil (qt:app-p)))
+ (unless nested
+ (5am:is (eql nil (qt:app-p))))
hunk ./src/application.lisp 20
- (5am:is (eql nil (qt:app-p)))))
+ (unless nested
+ (5am:is (eql nil (qt:app-p)))))))