aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/mh-e
diff options
context:
space:
mode:
authorStefan Monnier2019-06-26 10:24:59 -0400
committerStefan Monnier2019-06-26 10:24:59 -0400
commit0b4e003766f15225dede9bdba4ead33e493856e2 (patch)
tree99de57fe8feeca540f398acb232b75e9c802418c /lisp/mh-e
parent699fce296b13d7db386b1cb5cecf2710e5196691 (diff)
downloademacs-0b4e003766f15225dede9bdba4ead33e493856e2.tar.gz
emacs-0b4e003766f15225dede9bdba4ead33e493856e2.zip
Revert "* lisp/calc/calc-ext.el (math-scalarp): Fix typo"
This reverts commit 698ff554ac2699ec48fefc85a1307cbc4a183b0d.
Diffstat (limited to 'lisp/mh-e')
-rw-r--r--lisp/mh-e/mh-funcs.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mh-e/mh-funcs.el b/lisp/mh-e/mh-funcs.el
index 3f28144ed6a..9f603c0c710 100644
--- a/lisp/mh-e/mh-funcs.el
+++ b/lisp/mh-e/mh-funcs.el
@@ -109,7 +109,7 @@ folder. This is useful for folders that are easily regenerated."
109 (let ((folder mh-current-folder) 109 (let ((folder mh-current-folder)
110 (window-config mh-previous-window-config)) 110 (window-config mh-previous-window-config))
111 (mh-set-folder-modified-p t) ; lock folder to kill it 111 (mh-set-folder-modified-p t) ; lock folder to kill it
112 (mh-exec-cmd-daemon "rmf" #'mh-rmf-daemon folder) 112 (mh-exec-cmd-daemon "rmf" 'mh-rmf-daemon folder)
113 (when (boundp 'mh-speed-folder-map) 113 (when (boundp 'mh-speed-folder-map)
114 (mh-speed-invalidate-map folder)) 114 (mh-speed-invalidate-map folder))
115 (mh-remove-from-sub-folders-cache folder) 115 (mh-remove-from-sub-folders-cache folder)
@@ -123,7 +123,7 @@ folder. This is useful for folders that are easily regenerated."
123 (message "Folder %s removed" folder)) 123 (message "Folder %s removed" folder))
124 (message "Folder not removed"))) 124 (message "Folder not removed")))
125 125
126(defun mh-rmf-daemon (_process output) 126(defun mh-rmf-daemon (process output)
127 "The rmf PROCESS puts OUTPUT in temporary buffer. 127 "The rmf PROCESS puts OUTPUT in temporary buffer.
128Display the results only if something went wrong." 128Display the results only if something went wrong."
129 (set-buffer (get-buffer-create mh-temp-buffer)) 129 (set-buffer (get-buffer-create mh-temp-buffer))