diff options
| author | Mike Kupfer <kupfer@rawbw.com> | 2024-01-15 11:47:43 -0800 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2024-01-16 14:22:39 +0200 |
| commit | d4b9cb6b5b640e8d769c82289e4308407be12ba9 (patch) | |
| tree | 008e727194503541aff6ba1c1fcb93a22549137a /lisp/mh-e/mh-funcs.el | |
| parent | 53b5b77010117e2f58565dacf96fddeb734b6021 (diff) | |
| download | emacs-d4b9cb6b5b640e8d769c82289e4308407be12ba9.tar.gz emacs-d4b9cb6b5b640e8d769c82289e4308407be12ba9.tar.bz2 emacs-d4b9cb6b5b640e8d769c82289e4308407be12ba9.zip | |
Fix folder creation error (Bug#67361)
* lisp/mh-e/mh-funcs.el (mh-kill-folder)
* lisp/mh-e/mh-search.el (mh-index-new-folder)
* lisp/mh-e/mh-utils.el (mh-prompt-for-folder):
Check for existence of 'speedbar-buffer' rather than
'mh-speed-folder-map'. The latter can exist if
'mh-speed' has only been loaded but not displayed.
(cherry picked from commit e6a2901b1be6b4aa01f8bf0d3c6e06344ce8d366)
Diffstat (limited to 'lisp/mh-e/mh-funcs.el')
| -rw-r--r-- | lisp/mh-e/mh-funcs.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mh-e/mh-funcs.el b/lisp/mh-e/mh-funcs.el index 2684722eb26..bb3e67467d5 100644 --- a/lisp/mh-e/mh-funcs.el +++ b/lisp/mh-e/mh-funcs.el @@ -108,7 +108,7 @@ folder. This is useful for folders that are easily regenerated." (window-config mh-previous-window-config)) (mh-set-folder-modified-p t) ; lock folder to kill it (mh-exec-cmd-daemon "rmf" 'mh-rmf-daemon folder) - (when (boundp 'mh-speed-folder-map) + (when (and (boundp 'speedbar-buffer) speedbar-buffer) (mh-speed-invalidate-map folder)) (mh-remove-from-sub-folders-cache folder) (mh-set-folder-modified-p nil) ; so kill-buffer doesn't complain |