mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-05 07:01:11 -08:00
Code Issues Projects Releases Wiki Activity

(ada-make-body): Use insert-buffer-substring' and goto-char', not `insert-buffer'.

Browse source
This commit is contained in:
Juanma Barranquero 2005-07-18 11:28:53 +00:00
parent f706036b3e
commit 877dde9e8b
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/progmodes/ada-mode.el
View file

@ -5349,7 +5349,8 @@ spec buffer in here and modify it to make it a body.
This function typically is to be hooked into `ff-file-created-hooks'."
(interactive)
(delete-region (point-min) (point-max))
(insert-buffer (car (cdr (buffer-list))))
(insert-buffer-substring (car (cdr (buffer-list))))
(goto-char (point-min))
(ada-mode)
(let (found ada-procedure-or-package-start-regexp)