From 0283d1c4e586d0d9496f5ebb1302731142b7dafc Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Mon, 8 Aug 2022 17:48:10 +0200 Subject: [PATCH] ; 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 bf2d3c71db0..dd662f35522 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. -- 2.39.2