Mercurial > emacs
comparison lisp/printing.el @ 91003:2e0d11dc863d
Require lpr and ps-print when loading printing package
| author | Vinicius Jose Latorre <viniciusjl@ig.com.br> |
|---|---|
| date | Mon, 06 Aug 2007 12:36:07 +0000 |
| parents | 8f9a5f52f99f |
| children | 14c4a6aac623 |
comparison
equal
deleted
inserted
replaced
| 91002:8f9a5f52f99f | 91003:2e0d11dc863d |
|---|---|
| 1023 ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 1023 ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 1024 | 1024 |
| 1025 ;;; Code: | 1025 ;;; Code: |
| 1026 | 1026 |
| 1027 | 1027 |
| 1028 (eval-when-compile | 1028 (require 'lpr) |
| 1029 (require 'lpr) | 1029 (require 'ps-print) |
| 1030 (require 'ps-print)) | |
| 1031 | 1030 |
| 1032 | 1031 |
| 1033 (and (string< ps-print-version "6.6.4") | 1032 (and (string< ps-print-version "6.6.4") |
| 1034 (error "`printing' requires `ps-print' package version 6.6.4 or later")) | 1033 (error "`printing' requires `ps-print' package version 6.6.4 or later")) |
| 1035 | 1034 |
| 5194 (defun pr-update-menus (&optional force) | 5193 (defun pr-update-menus (&optional force) |
| 5195 "Update utility, PostScript and text printer menus. | 5194 "Update utility, PostScript and text printer menus. |
| 5196 | 5195 |
| 5197 If FORCE is non-nil, update menus doesn't matter if `pr-ps-printer-alist', | 5196 If FORCE is non-nil, update menus doesn't matter if `pr-ps-printer-alist', |
| 5198 `pr-txt-printer-alist' or `pr-ps-utility-alist' were modified or not; | 5197 `pr-txt-printer-alist' or `pr-ps-utility-alist' were modified or not; |
| 5199 otherwise, update PostScript printer menu iff `pr-ps-printer-menu-modified' is | 5198 otherwise, update PostScript printer menu if `pr-ps-printer-menu-modified' is |
| 5200 non-nil, update text printer menu iff `pr-txt-printer-menu-modified' is | 5199 non-nil, update text printer menu if `pr-txt-printer-menu-modified' is |
| 5201 non-nil, and update PostScript File menus iff `pr-ps-utility-menu-modified' is | 5200 non-nil, and update PostScript File menus if `pr-ps-utility-menu-modified' is |
| 5202 non-nil. | 5201 non-nil. |
| 5203 | 5202 |
| 5204 If menu binding was not done, calls `pr-menu-bind'." | 5203 If menu binding was not done, calls `pr-menu-bind'." |
| 5205 (interactive "P") | 5204 (interactive "P") |
| 5206 (if pr-menu-print-item ; since v6.8.4 | 5205 (if pr-menu-print-item ; since v6.8.4 |