branch: elpa/subed
commit 62d5d3d3b01c1fb5616a9c4bcc795976268b4a97
Author: Random User <rnd...@posteo.de>
Commit: Random User <rnd...@posteo.de>
Use (unless ...) instead of (when (not ...))
---
subed/subed-srt.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/subed/subed-srt.el b/subed/subed-srt.el
index b04363d..aeb79e1 100644
--- a/subed/subed-srt.el
+++ b/subed/subed-srt.el
@@ -213,7 +213,7 @@ Return point or nil if point unless point did not change."
(let ((regex (concat "\\(" subed-srt--regexp-separator
"[0-9]+\n\\|\\([[:blank:]]*\n*\\)\\'\\)")))
(when (re-search-forward regex nil t)
(goto-char (match-beginning 0))))
- (when (not (= (point) orig-point))
+ (unless (= (point) orig-point)
(point)))))
(defun subed-srt-forward-subtitle-id ()
@@ -233,7 +233,7 @@ first subtitle)."
(when (subed-srt-move-to-subtitle-id)
(let ((orig-point (point)))
(forward-line -1)
- (when (not (= (point) orig-point))
+ (unless (= (point) orig-point)
(subed-srt-move-to-subtitle-id)))))
(defun subed-srt-forward-subtitle-text ()
