[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[ps-print] Why imposing symbols for user functions?
From: |
drkm |
Subject: |
[ps-print] Why imposing symbols for user functions? |
Date: |
Mon, 07 Mar 2005 15:16:44 +0100 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/21.3.50 (windows-nt) |
Hi
Why does PS Print impose user functions (in `ps-left-header' for
example) to be symbols? `ps-generate-string-list' and
`ps-generate-header-line' use `symbolp' and `fboundp' instead of
`functionp'. Why don't use the following, to allowing lambdas in PS
Print customs:
*** ps-print.el-orig Thu Dec 23 07:02:00 2004
--- ps-print.el Mon Mar 7 15:06:00 2005
***************
*** 4823,4829 ****
((stringp (car content))
(car content))
;; function symbol
! ((and (symbolp (car content)) (fboundp (car content)))
(concat "(" (funcall (car content)) ")"))
;; variable symbol
((and (symbolp (car content)) (boundp (car content)))
--- 4823,4829 ----
((stringp (car content))
(car content))
;; function symbol
! ((functionp (car content))
(concat "(" (funcall (car content)) ")"))
;; variable symbol
((and (symbolp (car content)) (boundp (car content)))
***************
*** 4863,4869 ****
;; Functions are called -- they should return strings; they will be
inserted
;; as strings and the PS string delimiters added.
! ((and (symbolp content) (fboundp content))
(ps-output-string (ps-mule-encode-header-string (funcall content)
fonttag)))
--- 4863,4869 ----
;; Functions are called -- they should return strings; they will be
inserted
;; as strings and the PS string delimiters added.
! ((functionp content)
(ps-output-string (ps-mule-encode-header-string (funcall content)
fonttag)))
--drkm
- [ps-print] Why imposing symbols for user functions?,
drkm <=