diff options
| author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-05-23 22:01:33 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-05-23 22:01:33 +0200 |
| commit | 6318ddd80bc6442b4d32454cc043dc9ba873e29a (patch) | |
| tree | 44358dc80cd3ad4a16e69c7ef82f0f1332ded0a6 /lisp/mastodon-tl.el | |
| parent | 1adae0361a479003946ab804567d835627314197 (diff) | |
tiny comments/wrap
Diffstat (limited to 'lisp/mastodon-tl.el')
| -rw-r--r-- | lisp/mastodon-tl.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index 1b7c954..e26645e 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -843,7 +843,6 @@ LINK is maybe the `@handle' to search for." LINK should be a simple handle string with no domain, i.e. \"@user\". Return nil if no matching element." ;; Must return nil if nothing found! - ;; TODO: we should break the while loop as soon as we get sth (let ((mentions (append (alist-get 'mentions toot) nil))) (when mentions (let* ((mention (pop mentions)) @@ -986,8 +985,7 @@ content should be hidden." (defun mastodon-tl--clean-tabs-and-nl (string) "Remove tabs and newlines from STRING." - (replace-regexp-in-string - "[\t\n ]*\\'" "" string)) + (replace-regexp-in-string "[\t\n ]*\\'" "" string)) (defun mastodon-tl--spoiler (toot) "Render TOOT with spoiler message. |