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

- prevented crash when exceeding the character limit in a post.

This commit is contained in:
cage 2024-03-31 18:53:23 +02:00
parent dbd0ace318
commit 07505754b4
1 changed files with 9 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/program-events.lisp
View File

@ -882,14 +882,15 @@
mentions mentions
body) body)
body))) body)))
(client:send-status actual-message-body (tui:with-notify-errors
reply-to (client:send-status actual-message-body
attachments reply-to
alt-text attachments
subject alt-text
(make-keyword (string-upcase visibility)) subject
language) (make-keyword (string-upcase visibility))
(ui:notify (_ "Message sent")) language)
(ui:notify (_ "Message sent")))
(ui:close-send-message-window)))))))) (ui:close-send-message-window))))))))
(defun find-user-id-from-exact-acct (username) (defun find-user-id-from-exact-acct (username)