printing.el again

[Stefan]

In your merge of the two menus, why do you still bother with

          (pr-:visible (if (eq ps-print-emacs-type 'emacs)
                           :visible     ; GNU Emacs
                         :included))

since on Emacs, :visible and :included are synonyms anyway.
Also you now do

    (let (...
          pr-:help)
      (if (eq ps-print-emacs-type 'emacs)
          (defalias 'pr-:help #'(lambda (text) (list :help text))) ; GNU Emacs
        (defalias 'pr-:help 'ignore))                              ; XEmacs

which does not do what you think.  The `let' binding of the `pr-:help'
variable has *no effect* on the `pr-:help' function (the two name spaces are
separate).  I.e. the pr-:help function ends up defined globally anyway so
you had better define it at toplevel so it's less misleading (or otherwise,
you'd want to use CL's `flet' if you want to locally define a function).


        Stefan