[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 0283d1c4e5 3/5: ; Delete stale comment in mh-utils.el
From: |
Stefan Kangas |
Subject: |
master 0283d1c4e5 3/5: ; Delete stale comment in mh-utils.el |
Date: |
Mon, 8 Aug 2022 12:19:00 -0400 (EDT) |
branch: master
commit 0283d1c4e586d0d9496f5ebb1302731142b7dafc
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>
; Delete stale comment in mh-utils.el
* lisp/mh-e/mh-utils.el (mh-normalize-folder-name): Remove stale and
incorrect comment.
---
lisp/mh-e/mh-utils.el | 6 ++----
1 file changed, 2 insertions(+), 4 deletions(-)
diff --git a/lisp/mh-e/mh-utils.el b/lisp/mh-e/mh-utils.el
index bf2d3c71db..dd662f3552 100644
--- a/lisp/mh-e/mh-utils.el
+++ b/lisp/mh-e/mh-utils.el
@@ -445,10 +445,8 @@ no effect."
(setq folder (format "%s/%s/" mh-current-folder-name
(substring folder 1))))
;; XXX: Purge empty strings from the list that split-string
- ;; returns. In XEmacs, (split-string "+foo/" "/") returns
- ;; ("+foo" "") while in GNU Emacs it returns ("+foo"). In the
- ;; code it is assumed that the components list has no empty
- ;; strings.
+ ;; returns. In the code it is assumed that the components list
+ ;; has no empty strings.
(let ((components (delete "" (split-string folder "/")))
(result ()))
;; Remove .. and . from the pathname.