diff options
| author | Glenn Morris | 2008-02-02 04:17:02 +0000 |
|---|---|---|
| committer | Glenn Morris | 2008-02-02 04:17:02 +0000 |
| commit | 723bbcec6ecd5cd39a578d6e6e4819a2d18961b3 (patch) | |
| tree | 162944553efb4db967d42de9995eab7ce305f308 | |
| parent | f6bcd65fa55b64529060cd5fcec3610e1d8ab572 (diff) | |
| download | emacs-723bbcec6ecd5cd39a578d6e6e4819a2d18961b3.tar.gz emacs-723bbcec6ecd5cd39a578d6e6e4819a2d18961b3.zip | |
(ps-mule-initialize, ps-mule-begin-job)
(ps-mule-end-job): Declare as functions.
| -rw-r--r-- | lisp/ps-print.el | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/lisp/ps-print.el b/lisp/ps-print.el index 2579cc6ff13..28acf220a3a 100644 --- a/lisp/ps-print.el +++ b/lisp/ps-print.el | |||
| @@ -1,7 +1,8 @@ | |||
| 1 | ;;; ps-print.el --- print text from the buffer as PostScript | 1 | ;;; ps-print.el --- print text from the buffer as PostScript |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, | 3 | ;; Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, |
| 4 | ;; 2002, 2003, 2004, 2005, 2006, 2007, 2008 Free Software Foundation, Inc. | 4 | ;; 2002, 2003, 2004, 2005, 2006, 2007, 2008 |
| 5 | ;; Free Software Foundation, Inc. | ||
| 5 | 6 | ||
| 6 | ;; Author: Jim Thompson (was <thompson@wg2.waii.com>) | 7 | ;; Author: Jim Thompson (was <thompson@wg2.waii.com>) |
| 7 | ;; Jacques Duthen (was <duthen@cegelec-red.fr>) | 8 | ;; Jacques Duthen (was <duthen@cegelec-red.fr>) |
| @@ -6409,6 +6410,12 @@ If FACE is not a valid face name, use default face." | |||
| 6409 | (defun ps-generate-postscript (from to) | 6410 | (defun ps-generate-postscript (from to) |
| 6410 | (ps-plot-region from to 0)) | 6411 | (ps-plot-region from to 0)) |
| 6411 | 6412 | ||
| 6413 | ;; These are autoloaded, but ps-mule generates autoloads at the end of | ||
| 6414 | ;; this file, so they are unknown at this point when compiling. | ||
| 6415 | (declare-function ps-mule-initialize "ps-mule" ()) | ||
| 6416 | (declare-function ps-mule-begin-job "ps-mule" (from to)) | ||
| 6417 | (declare-function ps-mule-end-job "ps-mule" ()) | ||
| 6418 | |||
| 6412 | (defun ps-generate (buffer from to genfunc) | 6419 | (defun ps-generate (buffer from to genfunc) |
| 6413 | (save-excursion | 6420 | (save-excursion |
| 6414 | (let ((from (min to from)) | 6421 | (let ((from (min to from)) |