diff lisp/mail/mail-extr.el @ 923:9f3cc03dae67

entered into RCS
author Jim Blandy <jimb@redhat.com>
date Tue, 04 Aug 1992 04:15:43 +0000
parents 20674ae6bf52
children 24f248525608
line wrap: on
line diff
--- a/lisp/mail/mail-extr.el	Tue Aug 04 04:09:07 1992 +0000
+++ b/lisp/mail/mail-extr.el	Tue Aug 04 04:15:43 1992 +0000
@@ -430,7 +430,7 @@
     
     (save-excursion
       (set-buffer extraction-buffer)
-      (buffer-flush-undo extraction-buffer)
+      (buffer-disable-undo extraction-buffer)
       (set-syntax-table address-syntax-table)
       (widen)
       (erase-buffer)
@@ -697,7 +697,7 @@
       
       (set-buffer canonicalization-buffer)
       
-      (buffer-flush-undo canonicalization-buffer)
+      (buffer-disable-undo canonicalization-buffer)
       (set-syntax-table address-syntax-table)
       (setq case-fold-search nil)
       
@@ -1081,7 +1081,7 @@
 	)
     (save-excursion
       (set-buffer variant-buffer)
-      (buffer-flush-undo variant-buffer)
+      (buffer-disable-undo variant-buffer)
       (set-syntax-table address-text-syntax-table)
       (widen)
       (erase-buffer)