mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-26 07:33:47 +00:00
Code Issues Releases Activity

; Delete stale comment in mh-utils.el

Browse Source 
* lisp/mh-e/mh-utils.el (mh-normalize-folder-name): Remove stale and
incorrect comment.
This commit is contained in:
Stefan Kangas 2022-08-08 17:48:10 +02:00
parent f886a1d772
commit 0283d1c4e5
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/mh-e/mh-utils.el
View File

@ -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.