Re: a Close button too many
"Walter C. Pelissero" <[email protected]> Thu, 12 Jul 2007 14:14:45 +0200
| Newsgroups | gmane.lisp.clg.devel |
|---|---|
| Message-ID | <[email protected]> |
Espen S Johnsen writes: > The reason for this Close button appearing was a minor design flaw on my > side. If you do a CVS update, your code should now work as expected. > > The :buttons initarg can also be used with the message-dialog class to > specify button configuration as a keyword (:yes-no in your case). Using > this method will make your code a bit cleaner. > > I've also fixed another flaw, which was the passing of numeric response > id to response signal handlers. This change may break some existing > code, but my original intention was to not expose these numeric ids in > the user level API. > > Your code example would then look like this: > > (let* ((response nil) > (dialog (make-instance 'message-dialog > :message-type :question > :buttons :yes-no ;; the default for for message type > ;; :question and can actually be left out > :text message > :signal (list 'response > #'(lambda (id) > (setf response id)))))) > (dialog-run dialog) > (widget-destroy dialog) > (eq response :yes)) Sorry, the dialog has changed but the ID is still not symbolic (either -9 or -8). -- walter pelissero http://www.pelissero.de ------------------------------------------------------------------------- This SF.net email is sponsored by DB2 Express Download DB2 Express C - the FREE version of DB2 express and take control of your XML. No limits. Just data. Click to get it now. http://sourceforge.net/powerbar/db2/