1
0
Fork 0

- [GUI] used the graphical debugger.

This commit is contained in:
cage 2023-05-17 20:57:35 +02:00
parent 1af9f1f98a
commit 2ac8e544bd
1 changed files with 1 additions and 1 deletions

View File

@ -1377,7 +1377,7 @@
(defun init-main-window () (defun init-main-window ()
(setf gui:*debug-tk* nil) (setf gui:*debug-tk* nil)
(gui:with-nodgui (:title +program-name+) (gui:with-nodgui (:title +program-name+ :debugger-class 'gui:graphical-condition-handler)
(icons:load-icons) (icons:load-icons)
(setf gui-goodies:*toplevel* gui:*tk*) (setf gui-goodies:*toplevel* gui:*tk*)
(setf gui-goodies:*gui-server* gui:*wish*) (setf gui-goodies:*gui-server* gui:*wish*)