diff options
| author | Brian Fox | 1993-09-21 07:50:14 +0000 |
|---|---|---|
| committer | Brian Fox | 1993-09-21 07:50:14 +0000 |
| commit | 90a4435136f88aa73b3a4f89f8cbb12d6687fa42 (patch) | |
| tree | ebed6cede023a1f07af56f7ec0a7802675343d93 | |
| parent | bd2f232330d4ed86ba51dbc50139c9c52b837f51 (diff) | |
| download | emacs-90a4435136f88aa73b3a4f89f8cbb12d6687fa42.tar.gz emacs-90a4435136f88aa73b3a4f89f8cbb12d6687fa42.zip | |
(texinfo-format-region texinfo-format-buffer): Add ###autoload cookies.
(batch-texinfo-format): Use `buffer-disable-undo' instead of obsolete
function `buffer-flush-undo'.
| -rw-r--r-- | lisp/textmodes/texinfmt.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/textmodes/texinfmt.el b/lisp/textmodes/texinfmt.el index 1839561d615..52eda4a95cc 100644 --- a/lisp/textmodes/texinfmt.el +++ b/lisp/textmodes/texinfmt.el | |||
| @@ -64,6 +64,7 @@ | |||
| 64 | 64 | ||
| 65 | ;;; Top level buffer and region formatting functions | 65 | ;;; Top level buffer and region formatting functions |
| 66 | 66 | ||
| 67 | ;;;###autoload | ||
| 67 | (defun texinfo-format-buffer (&optional notagify) | 68 | (defun texinfo-format-buffer (&optional notagify) |
| 68 | "Process the current buffer as texinfo code, into an Info file. | 69 | "Process the current buffer as texinfo code, into an Info file. |
| 69 | The Info file output is generated in a buffer visiting the Info file | 70 | The Info file output is generated in a buffer visiting the Info file |
| @@ -92,6 +93,7 @@ Info-split to do these manually." | |||
| 92 | (defvar texinfo-region-buffer-name "*Info Region*" | 93 | (defvar texinfo-region-buffer-name "*Info Region*" |
| 93 | "*Name of the temporary buffer used by \\[texinfo-format-region].") | 94 | "*Name of the temporary buffer used by \\[texinfo-format-region].") |
| 94 | 95 | ||
| 96 | ;;;###autoload | ||
| 95 | (defun texinfo-format-region (region-beginning region-end) | 97 | (defun texinfo-format-region (region-beginning region-end) |
| 96 | "Convert the current region of the Texinfo file to Info format. | 98 | "Convert the current region of the Texinfo file to Info format. |
| 97 | This lets you see what that part of the file will look like in Info. | 99 | This lets you see what that part of the file will look like in Info. |
| @@ -2979,7 +2981,7 @@ For example, invoke | |||
| 2979 | (progn | 2981 | (progn |
| 2980 | (if buffer-file-name (kill-buffer (current-buffer))) | 2982 | (if buffer-file-name (kill-buffer (current-buffer))) |
| 2981 | (find-file file) | 2983 | (find-file file) |
| 2982 | (buffer-flush-undo (current-buffer)) | 2984 | (buffer-disable-undo (current-buffer)) |
| 2983 | (set-buffer-modified-p nil) | 2985 | (set-buffer-modified-p nil) |
| 2984 | (texinfo-mode) | 2986 | (texinfo-mode) |
| 2985 | (message "texinfo formatting %s..." file) | 2987 | (message "texinfo formatting %s..." file) |