Re: ps-right-footer interactive setting

[Chetan]

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

> Rodolfo Medina <rodolfo.medina@gmail.com> wrote:
>
>>> 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.
>
>
>
> 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.
> Rodolfo
It is a postscript string...
(list (concat "(" (number-to-string my-page-number) ")"))