[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master ff87aecf855: Address "Useless clause following default cond claus
From: |
Stefan Monnier |
Subject: |
master ff87aecf855: Address "Useless clause following default cond clause" warnings |
Date: |
Tue, 12 Sep 2023 12:59:12 -0400 (EDT) |
branch: master
commit ff87aecf8554042b043467a7aaff1a758df0bbae
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
Address "Useless clause following default cond clause" warnings
* lisp/gnus/message.el (message-position-point): Fix paren typo.
* lisp/org/org.el: Remove dead-code.
---
lisp/gnus/message.el | 4 ++--
lisp/org/org.el | 4 +---
2 files changed, 3 insertions(+), 5 deletions(-)
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index b8ea529d51c..b6b9927a788 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -6595,8 +6595,8 @@ they are."
(widen)
(forward-line 1)
(unless (looking-at "$")
- (forward-line 2)))
- (sit-for 0)))
+ (forward-line 2))))
+ (sit-for 0))
(defcustom message-beginning-of-line t
"Whether \\<message-mode-map>\\[message-beginning-of-line]\
diff --git a/lisp/org/org.el b/lisp/org/org.el
index b18a446e4d4..9a0bcf7dd66 100644
--- a/lisp/org/org.el
+++ b/lisp/org/org.el
@@ -18872,9 +18872,7 @@ ELEMENT."
(goto-char start)
(current-indentation)))
;; In any other case, indent like the current line.
- (t (current-indentation)))))
- ;; Finally, no indentation is needed, fall back to 0.
- (t (current-indentation))))))
+ (t (current-indentation)))))))))
(defun org--align-node-property ()
"Align node property at point.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master ff87aecf855: Address "Useless clause following default cond clause" warnings,
Stefan Monnier <=