diff options
| author | Juanma Barranquero | 2006-11-19 01:35:31 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2006-11-19 01:35:31 +0000 |
| commit | f7eb6f23d03369b03f32c308af36c72fc99b8d90 (patch) | |
| tree | be4f4b1f48321a8b19952bc86458b7821628937d | |
| parent | 221439a094d62aa87281b5c5285f9e7372071c97 (diff) | |
| download | emacs-f7eb6f23d03369b03f32c308af36c72fc99b8d90.tar.gz emacs-f7eb6f23d03369b03f32c308af36c72fc99b8d90.zip | |
(ada-make-body): Fix typo.
| -rw-r--r-- | lisp/progmodes/ada-mode.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/ada-mode.el b/lisp/progmodes/ada-mode.el index 8b9394ab086..ccd91d3b060 100644 --- a/lisp/progmodes/ada-mode.el +++ b/lisp/progmodes/ada-mode.el | |||
| @@ -5421,7 +5421,7 @@ for `ada-procedure-start-regexp'." | |||
| 5421 | (defun ada-make-body () | 5421 | (defun ada-make-body () |
| 5422 | "Create an Ada package body in the current buffer. | 5422 | "Create an Ada package body in the current buffer. |
| 5423 | The spec must be the previously visited buffer. | 5423 | The spec must be the previously visited buffer. |
| 5424 | This function typically is to be hooked into `ff-file-created-hooks'." | 5424 | This function typically is to be hooked into `ff-file-created-hook'." |
| 5425 | (delete-region (point-min) (point-max)) | 5425 | (delete-region (point-min) (point-max)) |
| 5426 | (insert-buffer-substring (car (cdr (buffer-list)))) | 5426 | (insert-buffer-substring (car (cdr (buffer-list)))) |
| 5427 | (goto-char (point-min)) | 5427 | (goto-char (point-min)) |