Mercurial > emacs

changeset 22454:2f4df08bf11d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(tpu-include) Use insert-file-contents, remove save-excursion.
author Richard M. Stallman <rms@gnu.org>
date Fri, 12 Jun 1998 22:05:42 +0000
parents 9d9df85eb7fb
children 393df8deb0b9
files lisp/emulation/tpu-edt.el
diffstat 1 files changed, 2 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emulation/tpu-edt.el	Fri Jun 12 11:13:37 1998 +0000
+++ b/lisp/emulation/tpu-edt.el	Fri Jun 12 22:05:42 1998 +0000
@@ -744,9 +744,8 @@
 (defun tpu-include (file)
   "TPU-like include file"
   (interactive "fInclude file: ")
-  (save-excursion
-    (insert-file file)
-    (message "")))
+  (insert-file-contents file)
+  (message ""))
 
 (defun tpu-get (file)
   "TPU-like get file"