Re: [Clg-devel] a Close button too many

[Walter C. P. <wa...@pe...>]

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