/[emacs]/emacs/lisp/printing.el
ViewVC logotype

Diff of /emacs/lisp/printing.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.25 by viniciusjl, Thu Nov 18 00:11:32 2004 UTC revision 1.26 by viniciusjl, Sun Nov 21 23:05:20 2004 UTC
# Line 5  Line 5 
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/
# Line 4280  Or choose the menu option Printing/Show Line 4280  Or choose the menu option Printing/Show
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"))
# Line 4355  Or choose the menu option Printing/Show Line 4356  Or choose the menu option Printing/Show
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    

Legend:
Removed from v.1.25  
changed lines
  Added in v.1.26

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26