cage
/
tinmop
mirror of https://codeberg.org/cage/tinmop/
1
0
Fork 0
Code Issues

- prevented crash when printing a notification after deletion.

This commit is contained in:
cage 2023-01-02 19:03:36 +01:00
parent f0862e3903
commit 8c48c9a567
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/program-events.lisp
View File

@ -1723,9 +1723,9 @@
(api-client:delete-all-notifications (api-client:delete-all-notifications
(lambda (notification) (lambda (notification)
(with-enqueued-process () (with-enqueued-process ()
(let* ((message (format nil (let* ((message (tui:make-tui-string (format nil
(_ "Deleting: ~a") (_ "Deleting: ~a")
(api-client:notification->text notification))) (api-client:notification->text notification))))
(row (make-instance 'line-oriented-window:line (row (make-instance 'line-oriented-window:line
:fields (list :original-object notification) :fields (list :original-object notification)
:normal-text message :normal-text message