5 |
|
|
6 |
;; Author: Vinicius Jose Latorre <viniciusjl@ig.com.br> |
;; Author: Vinicius Jose Latorre <viniciusjl@ig.com.br> |
7 |
;; Maintainer: Vinicius Jose Latorre <viniciusjl@ig.com.br> |
;; Maintainer: Vinicius Jose Latorre <viniciusjl@ig.com.br> |
8 |
;; Time-stamp: <2004/11/17 19:27:57 vinicius> |
;; Time-stamp: <2004/11/21 20:56:53 vinicius> |
9 |
;; Keywords: wp, print, PostScript |
;; Keywords: wp, print, PostScript |
10 |
;; Version: 6.8.3 |
;; Version: 6.8.3 |
11 |
;; X-URL: http://www.cpqd.com.br/~vinicius/emacs/ |
;; X-URL: http://www.cpqd.com.br/~vinicius/emacs/ |
4280 |
(list |
(list |
4281 |
(concat "\n;;; printing.el version " pr-version "\n") |
(concat "\n;;; printing.el version " pr-version "\n") |
4282 |
";; internal vars" |
";; internal vars" |
4283 |
|
(ps-comment-string "emacs-version " emacs-version) |
4284 |
(ps-comment-string "pr-txt-command " pr-txt-command) |
(ps-comment-string "pr-txt-command " pr-txt-command) |
4285 |
(ps-comment-string "pr-txt-switches " |
(ps-comment-string "pr-txt-switches " |
4286 |
(pr-switches-string pr-txt-switches "pr-txt-switches")) |
(pr-switches-string pr-txt-switches "pr-txt-switches")) |
4356 |
(let (ps-prefix-quote) |
(let (ps-prefix-quote) |
4357 |
(mapconcat |
(mapconcat |
4358 |
#'ps-print-quote |
#'ps-print-quote |
4359 |
'("\n;;; lpr.el settings\n" |
(list |
4360 |
(25 . printer-name) |
"\n;;; lpr.el settings\n" |
4361 |
(25 . lpr-switches) |
(ps-comment-string "emacs-version" emacs-version) |
4362 |
(25 . lpr-add-switches) |
nil |
4363 |
(25 . lpr-command) |
'(25 . printer-name) |
4364 |
(25 . lpr-headers-switches) |
'(25 . lpr-switches) |
4365 |
(25 . print-region-function) |
'(25 . lpr-add-switches) |
4366 |
(25 . lpr-page-header-program) |
'(25 . lpr-command) |
4367 |
(25 . lpr-page-header-switches) |
'(25 . lpr-headers-switches) |
4368 |
")\n\n;;; lpr.el - end of settings\n") |
'(25 . print-region-function) |
4369 |
|
'(25 . lpr-page-header-program) |
4370 |
|
'(25 . lpr-page-header-switches) |
4371 |
|
")\n\n;;; lpr.el - end of settings\n") |
4372 |
"\n"))) |
"\n"))) |
4373 |
|
|
4374 |
|
|