[PATCH] respect should-use-dialog-box-p in toolbar-compile

I hate dialog-boxes!! I guess I'm the only person who compiles with-toolbar and without-dialogbox :-) 1998-04-30 Gunnar Evermann <Gunnar.Evermann(a)nats.informatik.uni-hamburg.de&gt; * x-toolbar.el (toolbar-compile): respect should-use-dialog-box-p --- lisp/x-toolbar.el 1998/04/29 23:03:47 1.10 +++ lisp/x-toolbar.el 1998/05/01 01:02:37 ＠＠ -298,12 +298,14 ＠＠ (if toolbar-compile-already-run (compile compile-command) (setq toolbar-compile-already-run t) - (popup-dialog-box - `(,(concat "Compile:\n " compile-command) - ["Compile" (compile compile-command) t] - ["Edit command" compile t] - nil - ["Cancel" (message "Quit") t])))) + (if (should-use-dialog-box-p) + (popup-dialog-box + `(,(concat "Compile:\n " compile-command) + ["Compile" (compile compile-command) t] + ["Edit command" compile t] + nil + ["Cancel" (message "Quit") t])) + (compile compile-command)))) ;; ;; toolbar news variables and defuns