mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-22 18:35:09 +00:00
Code Issues Releases Activity

(rmail-sort-messages): Use buffer-disable-undo, not buffer-flush-undo.

Browse Source
This commit is contained in:
Karl Heuer 1994-03-30 02:24:05 +00:00
parent 030ecb3c62
commit 9baf79c795
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/mail/rmailsort.el
View File

@ -3,7 +3,7 @@
;; Copyright (C) 1990, 1993 Free Software Foundation, Inc.
;; Author: Masanobu UMEDA <umerin@mse.kyutech.ac.jp>
;; Version: $Header: /gd/gnu/emacs/19.0/lisp/RCS/rmailsort.el,v 1.18 1994/03/23 21:49:16 kwzh Exp kwzh $
;; Version: $Header: /gd/gnu/emacs/19.0/lisp/RCS/rmailsort.el,v 1.19 1994/03/30 02:21:48 kwzh Exp kwzh $
;; Keywords: mail
;; This file is part of GNU Emacs.
@ -154,7 +154,7 @@ If 1st argument REVERSE is non-nil, sort them in reverse order.
(msgnum 1)
(msginfo nil))
;; There's little hope that we can easily undo after that.
(buffer-flush-undo (current-buffer))
(buffer-disable-undo (current-buffer))
(goto-char (rmail-msgbeg 1))
;; To force update of all markers.
(insert-before-markers ?Z)