diff options
| -rw-r--r-- | lisp/ps-print.el | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/lisp/ps-print.el b/lisp/ps-print.el index 5203cb360fb..6c037b1275c 100644 --- a/lisp/ps-print.el +++ b/lisp/ps-print.el | |||
| @@ -7,11 +7,11 @@ | |||
| 7 | ;; Author: Vinicius Jose Latorre <vinicius@cpqd.com.br> | 7 | ;; Author: Vinicius Jose Latorre <vinicius@cpqd.com.br> |
| 8 | ;; Maintainer: Vinicius Jose Latorre <vinicius@cpqd.com.br> | 8 | ;; Maintainer: Vinicius Jose Latorre <vinicius@cpqd.com.br> |
| 9 | ;; Keywords: print, PostScript | 9 | ;; Keywords: print, PostScript |
| 10 | ;; Time-stamp: <98/05/05 12:36:30 vinicius> | 10 | ;; Time-stamp: <98/05/15 21:15:06 vinicius> |
| 11 | ;; Version: 3.06.1 | 11 | ;; Version: 3.06.1 |
| 12 | 12 | ||
| 13 | (defconst ps-print-version "3.06.1" | 13 | (defconst ps-print-version "3.06.1" |
| 14 | "ps-print.el, v 3.06.1 <98/05/05 vinicius> | 14 | "ps-print.el, v 3.06.1 <98/05/15 vinicius> |
| 15 | 15 | ||
| 16 | Vinicius's last change version -- this file may have been edited as part of | 16 | Vinicius's last change version -- this file may have been edited as part of |
| 17 | Emacs without changes to the version number. When reporting bugs, | 17 | Emacs without changes to the version number. When reporting bugs, |
| @@ -839,7 +839,7 @@ Please send all bug fixes and enhancements to | |||
| 839 | ;; Thanks to some suggestions on: | 839 | ;; Thanks to some suggestions on: |
| 840 | ;; * Face color map: Marco Melgazzi <marco@techie.com> | 840 | ;; * Face color map: Marco Melgazzi <marco@techie.com> |
| 841 | ;; * XEmacs compatibility: William J. Henney <will@astrosmo.unam.mx> | 841 | ;; * XEmacs compatibility: William J. Henney <will@astrosmo.unam.mx> |
| 842 | ;; * Check ps-paper-type: Sudhakar Frederick <sfrederi@asc.corp.mot.com> | 842 | ;; * Check `ps-paper-type': Sudhakar Frederick <sfrederi@asc.corp.mot.com> |
| 843 | ;; | 843 | ;; |
| 844 | ;; Thanks to Jacques Duthen <duthen@cegelec-red.fr> (Jack) for the 3.4 version | 844 | ;; Thanks to Jacques Duthen <duthen@cegelec-red.fr> (Jack) for the 3.4 version |
| 845 | ;; I started from. [vinicius] | 845 | ;; I started from. [vinicius] |
| @@ -995,25 +995,25 @@ example `letter', `legal' or `a4'." | |||
| 995 | (defcustom ps-print-control-characters 'control-8-bit | 995 | (defcustom ps-print-control-characters 'control-8-bit |
| 996 | "*Specifies the printable form for control and 8-bit characters. | 996 | "*Specifies the printable form for control and 8-bit characters. |
| 997 | That is, instead of sending, for example, a ^D (\004) to printer, | 997 | That is, instead of sending, for example, a ^D (\004) to printer, |
| 998 | it is sent the string \"^D\". | 998 | you can send ^ and D. |
| 999 | 999 | ||
| 1000 | Valid values are: | 1000 | Valid values are: |
| 1001 | 1001 | ||
| 1002 | `8-bit' This is the value to use when you want an ascii encoding of | 1002 | `8-bit' This is the value to use when you want an ASCII encoding of |
| 1003 | any control or non-ascii character. Control characters are | 1003 | any control or non-ASCII character. Control characters are |
| 1004 | encoded as \"^D\", and non-ascii characters have an | 1004 | encoded as \"^D\", and non-ascii characters have an |
| 1005 | octal encoding. | 1005 | octal encoding. |
| 1006 | 1006 | ||
| 1007 | `control-8-bit' This is the value to use when you want an ascii encoding of | 1007 | `control-8-bit' This is the value to use when you want an ASCII encoding of |
| 1008 | any control character, whether it is 7 or 8-bit. | 1008 | any control character, whether it is 7 or 8-bit. |
| 1009 | European 8-bits accented characters are printed according | 1009 | European 8-bits accented characters are printed according |
| 1010 | the current font. | 1010 | the current font. |
| 1011 | 1011 | ||
| 1012 | `control' Only ascii control characters have an ascii encoding. | 1012 | `control' Only ascii control characters have an ASCII encoding. |
| 1013 | European 8-bits accented characters are printed according | 1013 | European 8-bits accented characters are printed according |
| 1014 | the current font. | 1014 | the current font. |
| 1015 | 1015 | ||
| 1016 | nil No ascii encoding. Any character is printed according the | 1016 | nil No ASCII encoding. Any character is printed according the |
| 1017 | current font. | 1017 | current font. |
| 1018 | 1018 | ||
| 1019 | Any other value is treated as nil." | 1019 | Any other value is treated as nil." |
| @@ -3339,9 +3339,9 @@ page-height == bm + print-height + tm - ho - hh | |||
| 3339 | `(1+ (/ (1- ps-page-count) ps-number-of-columns))) | 3339 | `(1+ (/ (1- ps-page-count) ps-number-of-columns))) |
| 3340 | 3340 | ||
| 3341 | (defun ps-end-file () | 3341 | (defun ps-end-file () |
| 3342 | (ps-output "\nEndDoc\n\n%%Trailer\n%%Pages: " | 3342 | (ps-output "\n%%Trailer\n%%Pages: " |
| 3343 | (format "%d" (ps-page-number)) | 3343 | (format "%d" (ps-page-number)) |
| 3344 | "\n%%EOF\n")) | 3344 | "\n\nEndDoc\n\n%%EOF\n")) |
| 3345 | 3345 | ||
| 3346 | 3346 | ||
| 3347 | (defun ps-next-page () | 3347 | (defun ps-next-page () |