Re: ps-right-footer interactive setting

[Rodolfo Medina <rodolfo.medina@gmail.com>]

Rodolfo Medina <rodolfo.medina@gmail.com> writes:

>>>> Now I'm working on the ps-right-footer variable.  I wish to be prompted
>>>> for a page number so that the variable is set to:
>>>> 
>>>>  (list <page number>)
>>>> 
>>>> .  I did:
>>>> 
>>>> (defun my-ps-right-footer ()
>>>>   (interactive)
>>>>   (let ((my-page-number (read-number "page number? ")))
>>>>     (setq ps-print-footer t)
>>>>     (setq ps-right-footer (list 'my-page-number))
>>>>     )
>>>>   )
>>>> 
>>>> , but it doesn't work.  Any suggestion?



Barry Margolin <barmar@alum.mit.edu> writes:

>>> It should be (list my-page number).  Quoting prevents the variable from 
>>> being evaluated.



Rodolfo:

>> Unfortunately it doesn't work either:
>>
>> (defun my-ps-right-footer ()
>>   (interactive)
>>   (let ((my-page-number (read-number "page number? ")))
>>     (setq ps-print-footer t)
>>     (setq ps-right-footer (list my-page-number))
>>     )
>>   )
>>
>> produces a ps print error.  I can't find a solution.  Thanks for furhter
>> suggestions.




Chetan <Chet.xspam@xspam.sbcglobal.net> writes:

> It is a postscript string...
> (list (concat "(" (number-to-string my-page-number) ")"))



Thanks, this worked!
Rodolfo