| Fred Drake | c58f346 | 1999-01-08 15:27:17 +0000 | [diff] [blame] | 1 | (defun fix-python-texinfo () |
| 2 | (goto-char (point-min)) |
| 3 | (replace-regexp "\\(@setfilename \\)\\([-a-z]*\\)$" |
| 4 | "\\1python-\\2.info") |
| 5 | (replace-string "@node Front Matter\n@chapter Abstract\n" |
| 6 | "@node Abstract\n@section Abstract\n") |
| 7 | (progn |
| 8 | (mark-whole-buffer) |
| 9 | (texinfo-master-menu 'update-all-nodes) |
| 10 | ) |
| 11 | (save-buffer) |
| 12 | ) ;; fix-python-texinfo |
| 13 | |
| 14 | ;; now really do it: |
| 15 | (find-file (car command-line-args-left)) |
| 16 | (fix-python-texinfo) |
| 17 | (kill-emacs) |