cage/tinmop
1
0
Fork 0
mirror of https://codeberg.org/cage/tinmop/ synced 2025-02-03 04:37:29 +01:00
Code Issues

- prevented crash because of trying to close and already closed notify-window.

Browse Source
This commit is contained in:
cage 2024-05-16 14:17:20 +02:00
parent 25c670d1e7
commit 5d2d799204
2 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/notify-window.lisp
View File

@ -54,7 +54,6 @@
(let ((remove-win-event (make-instance 'program-events:remove-notify-user-event
:priority program-events:+maximum-event-priority+
:payload object)))
(win-close object)
(program-events:push-event remove-win-event)))
(decf (life object) dt)))

1
src/program-events.lisp
View File

@ -429,6 +429,7 @@
(defmethod process-event ((object remove-notify-user-event))
(let ((win (payload object)))
(windows:win-close win)
(mtree:remove-child specials:*main-window* win)))
(defclass change-window-title-event (program-event)