diff options
| author | Robert J. Chassell <bob@rattlesnake.com> | 2005-12-14 21:57:31 +0000 |
|---|---|---|
| committer | Robert J. Chassell <bob@rattlesnake.com> | 2005-12-14 21:57:31 +0000 |
| commit | 2cd2e4c5db54eb96b4d0c541863489ad828132df (patch) | |
| tree | 0b0da961906c8f09d48ee032a4b3edb9a4a550b3 /lisp/textmodes/texinfmt.el | |
| parent | bf63eb69676e4bb7804802c3d3a727dbfac149d0 (diff) | |
| download | emacs-2cd2e4c5db54eb96b4d0c541863489ad828132df.tar.gz | |
(texinfo-format-region):
[on behalf of Lennart Borgman <lennart.borgman.073@student.lu.se>]
Set buffer to read-only except for texinfo-format-region evaluation.
Diffstat (limited to 'lisp/textmodes/texinfmt.el')
| -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 d46d2f81fd4..15a15eb37fb 100644 --- a/lisp/textmodes/texinfmt.el +++ b/lisp/textmodes/texinfmt.el @@ -212,6 +212,8 @@ converted to Info is stored in a temporary buffer." ;;; Find a buffer to use. (switch-to-buffer (get-buffer-create texinfo-region-buffer-name)) + (setq buffer-read-only t) + (let ((inhibit-read-only t)) (erase-buffer) ;; Insert the header into the buffer. (insert header-text) @@ -313,7 +315,7 @@ converted to Info is stored in a temporary buffer." (goto-char (point-min)) (Info-tagify input-buffer) (goto-char (point-min)) - (message "Done."))) + (message "Done.")))) ;;;###autoload (defun texi2info (&optional nosplit) |