diff options
-rw-r--r-- | lisp/mastodon.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/mastodon.el b/lisp/mastodon.el index c7c674a..3f57552 100644 --- a/lisp/mastodon.el +++ b/lisp/mastodon.el @@ -283,8 +283,9 @@ If REPLY-JSON is the json of the toot being replied to." Optionally only print notifications of type TYPE, a string. BUFFER-NAME is added to \"*mastodon-\" to create the buffer name." (interactive) - (let ((buffer (or (concat "*mastodon-" buffer-name "*") - "*mastodon-notifications*"))) + (let ((buffer (if buffer-name + (concat "*mastodon-" buffer-name "*") + "*mastodon-notifications*"))) (if (get-buffer buffer) (progn (switch-to-buffer buffer) (mastodon-tl--update)) |