Mercurial > hg > xemacs-beta

comparison lisp/packages/ps-print.el @ 6:27bc7f280385 r19-15b4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b4
author cvs
date Mon, 13 Aug 2007 08:47:15 +0200
parents b82b59fe008d
children 0293115a14e9
comparison
equal deleted inserted replaced
5:49b78a777eb4 6:27bc7f280385
1898 1898
1899 (if ps-razzle-dazzle 1899 (if ps-razzle-dazzle
1900 (message "Formatting...done"))))) 1900 (message "Formatting...done")))))
1901 1901
1902 ;; XEmacs change 1902 ;; XEmacs change
1903 (require 'message) ; Until We can get some sensible autoloads, or
1904 ; message-flatten-list gets put somewhere decent.
1903 ;; Permit dynamic evaluation at print time of ps-lpr-switches 1905 ;; Permit dynamic evaluation at print time of ps-lpr-switches
1904 (defun ps-do-despool (filename) 1906 (defun ps-do-despool (filename)
1905 (if (or (not (boundp 'ps-spool-buffer)) 1907 (if (or (not (boundp 'ps-spool-buffer))
1906 (not ps-spool-buffer)) 1908 (not ps-spool-buffer))
1907 (message "No spooled PostScript to print") 1909 (message "No spooled PostScript to print")