mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-04 11:00:45 -08:00
(log-edit-show-files): Use cvs-insert-strings.
This commit is contained in:
parent
c68088c201
commit
a88e99b5ee
1 changed files with 2 additions and 2 deletions
|
|
@ -5,7 +5,7 @@
|
||||||
;; Author: Stefan Monnier <monnier@cs.yale.edu>
|
;; Author: Stefan Monnier <monnier@cs.yale.edu>
|
||||||
;; Keywords: pcl-cvs cvs commit log
|
;; Keywords: pcl-cvs cvs commit log
|
||||||
;; Version: $Name: $
|
;; Version: $Name: $
|
||||||
;; Revision: $Id: log-edit.el,v 1.9 2000/10/30 14:28:30 monnier Exp $
|
;; Revision: $Id: log-edit.el,v 1.10 2000/11/03 20:12:09 monnier Exp $
|
||||||
|
|
||||||
;; This file is part of GNU Emacs.
|
;; This file is part of GNU Emacs.
|
||||||
|
|
||||||
|
|
@ -304,7 +304,7 @@ To select default log text, we:
|
||||||
(log-edit-hide-buf buf 'all)
|
(log-edit-hide-buf buf 'all)
|
||||||
(setq buffer-read-only nil)
|
(setq buffer-read-only nil)
|
||||||
(erase-buffer)
|
(erase-buffer)
|
||||||
(insert (mapconcat 'identity files "\n"))
|
(cvs-insert-strings files)
|
||||||
(setq buffer-read-only t)
|
(setq buffer-read-only t)
|
||||||
(goto-char (point-min))
|
(goto-char (point-min))
|
||||||
(save-selected-window
|
(save-selected-window
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue