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
body)
body)))
(client:send-status actual-message-body
reply-to
attachments
alt-text
subject
(make-keyword (string-upcase visibility))
language)
(ui:notify (_ "Message sent"))
(tui:with-notify-errors
(client:send-status actual-message-body
reply-to
attachments
alt-text
subject
(make-keyword (string-upcase visibility))
language)
(ui:notify (_ "Message sent")))
(ui:close-send-message-window))))))))
(defun find-user-id-from-exact-acct (username)