From 97950f2bc4cda476d540037b59cf1f90fcb9bc0a Mon Sep 17 00:00:00 2001 From: Kevin Brubeck Unhammer Date: Tue, 21 Jun 2022 13:02:05 +0200 Subject: [PATCH] Speed up mail-extr in some configurations * lisp/mail/mail-extr.el (mail-extract-address-components): (mail-extract-address-components): The buffer is already in fundamental-mode, so don't re-enable it (bug#56113). --- lisp/mail/mail-extr.el | 2 -- 1 file changed, 2 deletions(-) diff --git a/lisp/mail/mail-extr.el b/lisp/mail/mail-extr.el index 50ba04ccc1e..c87ea2b46e6 100644 --- a/lisp/mail/mail-extr.el +++ b/lisp/mail/mail-extr.el @@ -716,7 +716,6 @@ to the results." value-list) (with-current-buffer (get-buffer-create extraction-buffer) - (fundamental-mode) (buffer-disable-undo extraction-buffer) (set-syntax-table mail-extr-address-syntax-table) (widen) @@ -738,7 +737,6 @@ to the results." (set-text-properties (point-min) (point-max) nil) (with-current-buffer (get-buffer-create canonicalization-buffer) - (fundamental-mode) (buffer-disable-undo canonicalization-buffer) (setq case-fold-search nil)) -- 2.39.2