Mercurial > emacs
comparison lisp/play/handwrite.el @ 38425:c6e12c6b1498
Some fixes to follow coding conventions.
| author | Pavel Janík <Pavel@Janik.cz> |
|---|---|
| date | Mon, 16 Jul 2001 09:10:19 +0000 |
| parents | 6b4d3f80fd75 |
| children | 802c948ddb3a |
comparison
equal
deleted
inserted
replaced
| 38424:43ed08d143a9 | 38425:c6e12c6b1498 |
|---|---|
| 157 (setq ps-buf-name | 157 (setq ps-buf-name |
| 158 (format "*handwritten%d.ps*" handwrite-psindex)) | 158 (format "*handwritten%d.ps*" handwrite-psindex)) |
| 159 (setq next-line-add-newlines t) | 159 (setq next-line-add-newlines t) |
| 160 (switch-to-buffer ps-buf-name) | 160 (switch-to-buffer ps-buf-name) |
| 161 (handwrite-insert-header buf-name) | 161 (handwrite-insert-header buf-name) |
| 162 (insert "\n(\\nCreated by Gnu Emacs' handwrite version " | 162 (insert "\n(\\nCreated by GNU Emacs' handwrite version " |
| 163 emacs-version "\\n\\n)=print flush\n") | 163 emacs-version "\\n\\n)=print flush\n") |
| 164 (handwrite-insert-preamble) | 164 (handwrite-insert-preamble) |
| 165 (handwrite-insert-info) | 165 (handwrite-insert-info) |
| 166 (handwrite-insert-font) | 166 (handwrite-insert-font) |
| 167 (setq textp (point)) | 167 (setq textp (point)) |