diff options
author | Holger Dürer <me@hdurer.net> | 2017-05-02 20:37:09 +0100 |
---|---|---|
committer | Johnson Denen <johnson.denen@gmail.com> | 2017-05-05 15:01:50 -0400 |
commit | 1bca8fe3d1b6a68544386c96ef4040a6225b9007 (patch) | |
tree | 2bd37487d3b3b1b50c45d567fd7a079f349f7c3b /lisp | |
parent | cd9942997e233594e422b8a1a26aa83d05e5af0d (diff) |
Use the more canonical "nil" instead of "'()" when we don't mean an empty list.
(Besides, just "()" would have been enough anyway. No need to quote "()" or "nil".)
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/mastodon-media.el | 4 | ||||
-rw-r--r-- | lisp/mastodon-toot.el | 8 |
2 files changed, 6 insertions, 6 deletions
diff --git a/lisp/mastodon-media.el b/lisp/mastodon-media.el index 40a8f21..1b8e786 100644 --- a/lisp/mastodon-media.el +++ b/lisp/mastodon-media.el @@ -57,8 +57,8 @@ Returns the cons of (`start' . `end') points of that line or nil no more media links were found." (let ((foundp (search-forward-regexp "Media_Link::" nil t))) (when foundp - (let ((start (progn (move-beginning-of-line '()) (point))) - (end (progn (move-end-of-line '()) (point)))) + (let ((start (progn (move-beginning-of-line nil) (point))) + (end (progn (move-end-of-line nil) (point)))) (cons start end))))) (defun mastodon-media--valid-link-p (link) diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el index cb8ce37..7136b6c 100644 --- a/lisp/mastodon-toot.el +++ b/lisp/mastodon-toot.el @@ -43,10 +43,10 @@ Remove MARKER if RM is non-nil." (let ((inhibit-read-only t) - (bol (progn (move-beginning-of-line '()) (point))) - (eol (progn (move-end-of-line '()) (point)))) - (when rm (replace-regexp (format "(%s) " marker) "" '() bol eol)) - (move-beginning-of-line '()) + (bol (progn (move-beginning-of-line nil) (point))) + (eol (progn (move-end-of-line nil) (point)))) + (when rm (replace-regexp (format "(%s) " marker) "" nil bol eol)) + (move-beginning-of-line nil) (mastodon-tl--goto-next-toot) (unless rm (insert (format "(%s) " |