/[emacs]/emacs/lisp/ps-print.el
ViewVC logotype

Diff of /emacs/lisp/ps-print.el

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

revision 1.153 by handa, Tue Feb 22 06:18:38 2005 UTC revision 1.154 by viniciusjl, Sat Mar 19 04:11:54 2005 UTC
# Line 1  Line 1 
1  ;;; ps-print.el --- print text from the buffer as PostScript  ;;; ps-print.el --- print text from the buffer as PostScript
2    
3  ;; Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002,  ;; Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002,
4  ;; 2003, 2004 Free Software Foundation, Inc.  ;; 2003, 2004, 2005 Free Software Foundation, Inc.
5    
6  ;; Author: Jim Thompson (was <thompson@wg2.waii.com>)  ;; Author: Jim Thompson (was <thompson@wg2.waii.com>)
7  ;;      Jacques Duthen (was <duthen@cegelec-red.fr>)  ;;      Jacques Duthen (was <duthen@cegelec-red.fr>)
# Line 10  Line 10 
10  ;; Maintainer: Kenichi Handa <handa@etl.go.jp> (multi-byte characters)  ;; Maintainer: Kenichi Handa <handa@etl.go.jp> (multi-byte characters)
11  ;;      Vinicius Jose Latorre <viniciusjl@ig.com.br>  ;;      Vinicius Jose Latorre <viniciusjl@ig.com.br>
12  ;; Keywords: wp, print, PostScript  ;; Keywords: wp, print, PostScript
13  ;; Time-stamp: <2004/07/21 23:12:05 vinicius>  ;; Time-stamp: <2005/03/19 00:40:12 vinicius>
14  ;; Version: 6.6.5  ;; Version: 6.6.6
15  ;; X-URL: http://www.cpqd.com.br/~vinicius/emacs/  ;; X-URL: http://www.cpqd.com.br/~vinicius/emacs/
16    
17  (defconst ps-print-version "6.6.5"  (defconst ps-print-version "6.6.6"
18    "ps-print.el, v 6.6.5 <2004/07/21 vinicius>    "ps-print.el, v 6.6.6 <2004/07/21 vinicius>
19    
20  Vinicius's last change version -- this file may have been edited as part of  Vinicius's last change version -- this file may have been edited as part of
21  Emacs without changes to the version number.  When reporting bugs, please also  Emacs without changes to the version number.  When reporting bugs, please also
# Line 4831  page-height == ((floor print-height ((th Line 4831  page-height == ((floor print-height ((th
4831                         ((stringp (car content))                         ((stringp (car content))
4832                          (car content))                          (car content))
4833                         ;; function symbol                         ;; function symbol
4834                         ((and (symbolp (car content)) (fboundp (car content)))                         ((functionp (car content))
4835                          (concat "(" (funcall (car content)) ")"))                          (concat "(" (funcall (car content)) ")"))
4836                         ;; variable symbol                         ;; variable symbol
4837                         ((and (symbolp (car content)) (boundp (car content)))                         ((and (symbolp (car content)) (boundp (car content)))
# Line 4869  page-height == ((floor print-height ((th Line 4869  page-height == ((floor print-height ((th
4869    
4870     ;; Functions are called -- they should return strings; they will be inserted     ;; Functions are called -- they should return strings; they will be inserted
4871     ;; as strings and the PS string delimiters added.     ;; as strings and the PS string delimiters added.
4872     ((and (symbolp content) (fboundp content))     ((functionp content)
4873      (ps-output-string (ps-mule-encode-header-string (funcall content)      (ps-output-string (ps-mule-encode-header-string (funcall content)
4874                                                      fonttag)))                                                      fonttag)))
4875    

Legend:
Removed from v.1.153  
changed lines
  Added in v.1.154

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