mirror of https://codeberg.org/cage/tinmop/
- [GUI] used the graphical debugger.
This commit is contained in:
parent
1af9f1f98a
commit
2ac8e544bd
|
@ -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*)
|
||||||
|
|
Loading…
Reference in New Issue