printing problems

gfp <[email protected]>
Newsgroups gmane.emacs.help
Message-ID <[email protected]>
Hi,

after changing all my "setq"  to "setopt"
today opening emacs
I got a backtrace:

Debugger entered--Lisp error: (error "Invalid text printer name 
‘prt_06a’ for variable ‘pr-txt-name’")
   error("Invalid text printer name `%s' for variable `pr-txt-name'" 
prt_06a)
   pr-txt-set-printer(prt_06a)
   pr-menu-set-txt-title(prt_06a)
   pr-txt-name-custom-set(pr-txt-name prt_06a)
   setopt--set(pr-txt-name prt_06a)
   load-with-code-conversion("/home/gfp/.config/emacs/init.el" 
"/home/gfp/.config/emacs/init.el" t t)
   load("/home/gfp/.config/emacs/init" noerror nomessage)
   #f(compiled-function () #<bytecode 0x810b596305a1f90>)()
   startup--load-user-init-file(#f(compiled-function () #<bytecode 
-0x6238d89e15d8e90>) #f(compiled-function () #<bytecode 
-0x15951949e52b234f>) t)
   command-line()
   normal-top-level()
---------------------------------------------------------


customize apropos:

                                           Search

Operate on all settings in this buffer:
  Revert...   Apply   Apply and Save

Hide Pr Txt Name: Symbol: prt_06a
     State : CHANGED outside Customize.
    Specify a printer for printing a text file. Hide

    The printer name symbol should be defined on ‘pr-txt-printer-alist’ 
(see it for
    documentation).

    This variable should be modified by customization engine.  If this 
variable is
    modified by other means (for example, a Lisp function), use 
‘pr-update-menus’
    function (see it for documentation) to update text printer menu.
Groups: Printing Utilities
---------------------------------------------------------------------

"prt_06a" is  defined in printing.el

-----------------------------------------------------------------

init.el:

;;printer (slides=two-..., number-up=2... bei Querformat)
(setopt lpr-switches
       (append '("-P" "HP-Officejet-J4500-series"
               "-o" "sides=one-sided-long-edge"
               "-o" "number-up=1"
               "-o" "print-quality=3")
               lpr-switches))

;;print preview
  (setopt ps-lpr-command "print_preview")

;;M-x ps-print-buffer or M-x ps-print-region to print to a PostScript 
printer 2 pages on an A4 paper
;; 2 column landscape size 7 prints column 0-78, lines 1 to 70
;;Now you can use ‘M-x ps-print-buffer’, ‘M-x 
ps-print-buffer-with-faces’, ‘M-x ps-print-region’, and ‘M-x 
ps-print-region-with-faces’.
;;Use the C-u prefix to save the PostScript code into a file instead of 
printing it.

(setopt ps-paper-type 'a4
	  ps-font-size 10.0
	  ps-print-header nil
	  ps-portrait-mode t
	  ps-number-of-columns 1
	  ps-left-margin 15.0
	  ps-right-margin 15.0)

(gnus)

;; printing.el options

(require 'printing)
     (setopt pr-path-alist
	    '((unix      "." "/home/gfp/.guix-profile/bin" ghostview mpage 
PATH)  ;;'((unix      "." "~/bin" ghostview mpage PATH)
	      (ghostview "/home/gfp/.guix-profile/bin/gsview-dir") 
   ;;  (ghostview "$HOME/bin/gsview-dir")
	      (mpage     "/home/gfp/.guix-profile/bin/mpage-dir") 
   ;;  (mpage     "$HOME/bin/mpage-dir")
	      ))
     (setopt pr-txt-name      'prt_06a)
     (setopt pr-txt-printer-alist
           '((prt_06a "lpr" nil "prt_06a")
             (prt_07c nil   nil "prt_07c")
             ))
     (setopt pr-ps-name       'lps_06b)
     (setopt pr-ps-printer-alist
           '((lps_06b "lpr" nil "-P" "lps_06b")
             (lps_07c "lpr" nil nil  "lps_07c")
             (lps_08c nil   nil nil  "lps_08c")
             ))
     (setopt pr-temp-dir      "/tmp/")
     (setopt pr-gv-command    "gv")
     (setopt pr-gs-command    "gs")
     (setopt pr-gs-switches '("-q -dNOPAUSE -I/usr/share/ghostscript/5.10"))
     (setopt pr-gs-device     "uniprint")
     (setopt pr-gs-resolution 300)
     (setopt pr-ps-utility    'mpage)
     (setopt pr-ps-utility-alist
     '((mpage "mpage" nil    "-b%s" "-%d" "-l" "-t" "-T" ">" nil)
       (psnup "psnup" ("-q") "-P%s" "-%d" "-l" nil  nil  " " nil
      (inherits-from: . no-duplex))
       ))
    (setopt pr-setting-database
     '((no-duplex
        nil nil nil
	       (pr-file-duplex . nil)
	       (pr-file-tumble . nil))
	      ))
     (pr-update-menus t)		; update now printer and utility menus
---------------------------------------------------------------------------------

What do I have to change?

-------------------------------------------------------


thanks

Gottfried
OpenPGP_0xAC95367953582A3C.asc (application/pgp-keys, 636 B)
-----BEGIN PGP PUBLIC KEY BLOCK-----

xjMEaabDLRYJKwYBBAHaRw8BAQdAb7YT561Dj5CV9io77VLLjpOOSCz+xjHVL2Bj
+S/FSUbNGmdmcCAoMjAyNikgPGdmcEBwb3N0ZW8uYXQ+wpMEExYKADsWIQQkU+mE
m7kVmbEo/+eslTZ5U1gqPAUCaabDLQIbAwULCQgHAgIiAgYVCgkICwIEFgIDAQIe
BwIXgAAKCRCslTZ5U1gqPOPkAQDhysdwuz2eJo6kCGuVszxhEw6znPKV14R8a3vn
enCgywD9GulbjLKlGTpx6WyFmZ0bBZI1GVpIVr3qGbyFcAFZZADOOARppsMtEgor
BgEEAZdVAQUBAQdAX5BGmJLZB5B2ioEAy0C0iqgJ0GzUK4IP7gSGE9k/RQIDAQgH
wngEGBYKACAWIQQkU+mEm7kVmbEo/+eslTZ5U1gqPAUCaabDLQIbDAAKCRCslTZ5
U1gqPDixAP4teZj90382b6mB2mZT+KjjZz0opx/rahnOejBcW/+SkgD/StQdLbeZ
DqGFJ0TlGeHGxNB28C1fUE815wapzB6cKg4=
=u+uM
-----END PGP PUBLIC KEY BLOCK-----
OpenPGP_signature.asc (application/pgp-signature, 236 B)
-----BEGIN PGP SIGNATURE-----

wnsEABYIACMWIQQkU+mEm7kVmbEo/+eslTZ5U1gqPAUCac4pwgUDAAAAAAAKCRCslTZ5U1gqPNQV
AQC5wPZq5/xs3wbnX3PzT4pX3P6UzqS3ehIgA7tVD1NXSgEA2TZFkZ18oMBp5TgsKxrb9X0ub7Ef
LeqbgrPkH71hIAM=
=1uVq
-----END PGP SIGNATURE-----
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.