Lines Matching +defs:lpr +defs:region
72 ;; ps-print-region
73 ;; ps-print-region-with-faces
76 ;; ps-spool-region
77 ;; ps-spool-region-with-faces
107 ;; The word "buffer" or "region" in the command name determines how much of the
112 ;; region - Print just the current region.
127 ;; ps-spool-region-with-faces - print just the current region; include
158 ;; `ps-spool-buffer-with-faces', `ps-spool-region-with-faces', and
162 ;; (global-set-key '(shift f22) 'ps-spool-region-with-faces)
169 ;; The variables `ps-lpr-command' and `ps-lpr-switches' determine what command
171 ;; give the command. These are analogous to `lpr-command' and `lpr-switches'.
181 ;; `ps-printer-name' is a non-empty string. If you're using lpr utility to
184 ;; NOTE: `ps-lpr-command' and `ps-lpr-switches' take their initial values from
185 ;; the variables `lpr-command' and `lpr-switches'. If you have
186 ;; `lpr-command' set to invoke a pretty-printer such as `enscript', then
187 ;; ps-print won't work properly. `ps-lpr-command' must name a program
194 ;; The variable `ps-print-region-function' specifies a function to print the
195 ;; region on a PostScript printer.
196 ;; See definition of `call-process-region' for calling conventions. The fourth
209 ;; `ps-printer-name-option', `ps-lpr-command', `ps-lpr-switches' and
586 ;; lpr-switches duplex and page size are configured by `ps-lpr-switches'.
587 ;; Don't forget to set `ps-lpr-switches' to select duplex
598 ;; The default value is `lpr-switches'.
623 ;; buffer (or region) is ^L (\014).
919 ;; and end of a region to cut out when printing.
1187 ;; The commands `ps-nb-pages-buffer' and `ps-nb-pages-region' display the
1189 ;; allow the number of lines of the current buffer or of its current region to
1266 ;; `ps-print-region-function'
1294 ;; Dynamic evaluation at print time of `ps-lpr-switches'.
1338 ;; `ps-nb-pages-buffer' and `ps-nb-pages-region' don't take care of folding
1348 ;; `ps-nb-pages-buffer' and `ps-nb-pages-region' should take care of folding
1362 ;; region to cut out when printing and footer suggestions.
1404 ;; region.
1407 ;; print time of `ps-lpr-switches'.
1446 (require 'lpr)
1520 (if (fboundp 'region-active-p)
1521 'region-active-p ; XEmacs
1623 (defgroup ps-print-printer '((lpr custom-group))
1737 On Unix-like systems, a string value should be a name understood by lpr's -P
1742 `ps-lpr-command' is \"\". By default it is the same as `printer-name'; typical
1751 Set to t, if the utility given by `ps-lpr-command' needs an empty printer name.
1761 (string :tag "Pipe to ps-lpr-command"))
1774 On Unix-like systems, if `lpr' is in use, this should be the string
1782 Set this to \"\" or nil, if the utility given by `ps-lpr-command'
1796 (defcustom ps-lpr-command lpr-command
1803 the destination for output; any other program is treated like `lpr' except that
1809 (defcustom ps-lpr-switches lpr-switches
1810 "*A list of extra switches to pass to `ps-lpr-command'."
1811 :type '(repeat :tag "PostScript lpr Switches"
1812 (choice :menu-tag "PostScript lpr Switch"
1813 :tag "PostScript lpr Switch"
1818 (defcustom ps-print-region-function nil
1819 "*Specify a function to print the region on a PostScript printer.
1820 See definition of `call-process-region' for calling conventions. The fourth
2648 'lpr-switches)
2653 `lpr-switches' duplex and page size are configured by `ps-lpr-switches'.
2654 Don't forget to set `ps-lpr-switches' to select duplex
2676 (const lpr-switches) (const setpagedevice)
3334 It's like the very first character of buffer (or region) is ^L (\\014)."
3400 "*Specify regexp which is start of a region to cut out when printing.
3418 "*Specify regexp which is end of the region to cut out when printing.
3482 (defun ps-print-region (from to &optional filename)
3483 "Generate and print a PostScript image of the region.
3484 Like `ps-print-buffer', but prints just the current region."
3485 (interactive (ps-print-preprint-region current-prefix-arg))
3490 (defun ps-print-region-with-faces (from to &optional filename)
3491 "Generate and print a PostScript image of the region.
3492 Like `ps-print-region', but includes font, color, and underline information in
3495 (interactive (ps-print-preprint-region current-prefix-arg))
3523 (defun ps-spool-region (from to)
3524 "Generate a PostScript image of the region and spool locally.
3525 Like `ps-spool-buffer', but spools just the current region.
3533 (defun ps-spool-region-with-faces (from to)
3534 "Generate a PostScript image of the region and spool locally.
3535 Like `ps-spool-region', but includes font, color, and underline information in
3573 (defun ps-nb-pages-region (nb-lines)
3574 "Display number of pages to print the region, for various font heights.
3597 '(25 . ps-lpr-command)
3598 '(25 . ps-lpr-switches)
3601 '(25 . ps-print-region-function)
4265 (defun ps-print-without-faces (from to &optional filename region-p)
4266 (ps-spool-without-faces from to region-p)
4270 (defun ps-spool-without-faces (from to &optional region-p)
4273 (ps-printing-region region-p from to)
4277 (defun ps-print-with-faces (from to &optional filename region-p)
4278 (ps-spool-with-faces from to region-p)
4282 (defun ps-spool-with-faces (from to &optional region-p)
4285 (ps-printing-region region-p from to)
4303 (defvar ps-printing-region nil
4304 "Variable used to indicate the region that ps-print is printing.
4305 It is a cons, the car of which is the line number where the region begins, and
4312 (defvar ps-printing-region-p nil
4313 "Non-nil means ps-print is printing a region.")
4316 (defun ps-printing-region (region-p from to)
4317 (setq ps-printing-region-p region-p
4318 ps-printing-region
4319 (cons (if region-p
4646 (defun ps-print-preprint-region (prefix-arg)
5725 (unless (eq ps-spool-config 'lpr-switches)
5796 (and ps-printing-region-p "Subset of: ")
5889 (delete-region (match-beginning 0) (point-max))))
5899 ps-showline-count (car ps-printing-region)
6185 (defun ps-plot-region (from to font &optional fg-color bg-color effects)
6207 ;; Starting at the beginning of the specified region...
6211 ;; ...break the region up into chunks separated by tabs, linefeeds,
6224 ;; region with some control characters or some multi-byte characters
6291 ;; region without control characters nor multi-byte characters
6416 (ps-plot-region from to 0))
6428 (ps-plot-region
6495 (defalias 'ps-lazify 'lazy-lock-fontify-region)
6524 (narrow-to-region from to)
6647 (ps-plot-region from to 0))
6657 (narrow-to-region from to)
6705 (delete-region (marker-position safe-marker) (point-max))))))
6715 (total-lines (cdr ps-printing-region))
6753 ;; Permit dynamic evaluation at print time of `ps-lpr-switches'.
6764 (write-region (point-min) (point-max) filename))
6774 (ps-lpr-switches
6775 (append ps-lpr-switches
6784 (apply (or ps-print-region-function 'call-process-region)
6785 (point-min) (point-max) ps-lpr-command nil
6789 (mapcar 'ps-eval-switch ps-lpr-switches)))))
6988 (global-set-key [(shift f22)] 'ps-spool-region-with-faces)
6997 ps-lpr-command "lpr"
6998 ps-lpr-switches '("-Jjct,duplex_long"))
7009 ps-lpr-command "lpr"
7010 ps-lpr-switches nil
7050 "Generate PostScript code for plotting characters in the region FROM and TO.
7052 It is assumed that all characters in this region belong to the same charset.
7068 This checks if all multi-byte characters in the region are printable or not.")