bug#20781: Xemacs 21.4.22 MaC OS Yosmite: (customize-option 'TeX-view-program-list) fails with error

[Uwe Brauer]

Using Xemacs 21.4.22 mule on Mac OS Yosmite, I obtain the following
error when trying to run 
(customize-option 'TeX-view-program-list) fails with error
However 
(customize-option 'TeX-command-list)

Works!!

Uwe Brauer 

Debugger entered--Lisp error: (void-function nil)
  nil((alist :key-type (string :tag "Name") :value-type (choice (group :tag 
"Command" ...) (group :tag "Command parts" ...) (group :tag "Function" 
function))) (("okular" "okular -unique %o#src:%n%b")))
  widget-apply((alist :key-type (string :tag "Name") :value-type (choice (group 
:tag "Command" ...) (group :tag "Command parts" ...) (group :tag "Function" 
function))) :match (("okular" "okular -unique %o#src:%n%b")))
  custom-variable-value-create((custom-variable :custom-form edit :value 
TeX-view-program-list :tag "Tex View Program List" :custom-state unknown 
:documentation-shown t))
  widget-apply((custom-variable :custom-form edit :value TeX-view-program-list 
:tag "Tex View Program List" :custom-state unknown :documentation-shown t) 
:value-create)
  widget-default-create((custom-variable :custom-form edit :value 
TeX-view-program-list :tag "Tex View Program List" :custom-state unknown 
:documentation-shown t))
  widget-apply((custom-variable :custom-form edit :value TeX-view-program-list 
:tag "Tex View Program List" :custom-state unknown :documentation-shown t) 
:create)
  widget-create(custom-variable :documentation-shown t :custom-state unknown 
:tag "Tex View Program List" :value TeX-view-program-list)
  #<compiled-function (entry) "...(19)" [entry widget-create 
:documentation-shown t :custom-state unknown :tag custom-unlispify-tag-name 
:value] 10>((TeX-view-program-list custom-variable))
  mapcar(#<compiled-function (entry) "...(19)" [entry widget-create 
:documentation-shown t :custom-state unknown :tag custom-unlispify-tag-name 
:value] 10> ((TeX-view-program-list custom-variable)))
  custom-buffer-create-internal(((TeX-view-program-list custom-variable)) nil)
  custom-buffer-create(((TeX-view-program-list custom-variable)) "*Customize 
Variable: Tex View Program List*")
  #<compiled-function (symbol) "...(13)" [symbol custom-buffer-create 
custom-variable format "*Customize Variable: %s*" custom-unlispify-tag-name] 6 
("/opt/local/lib/xemacs-21.4.22/lisp/cus-edit.elc" . 18275) 
(custom-variable-prompt)>(TeX-view-program-list)
  call-interactively(customize-option)
  command-execute(customize-option t)
  execute-extended-command(nil)
  call-interactively(execute-extended-command)


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



Emacs  : XEmacs 21.4 (patch 22) "Instant Classic" [Lucid] 
(i386-apple-darwin14.0.0, Mule) of Mon Nov  3 2014 on AroberiMac.local
Package: 11.88

current state:
==============
(setq
 AUCTeX-date "2014-10-29"
 window-system 'x
 LaTeX-version "2e"
 TeX-style-path '("/usr/local/var/auctex/" 
"/opt/local/lib/xemacs-21.4.22/xemacs-packages/etc/auctex/style"
                  "/Users/arober/.emacs.d/auctex/auto" 
"/Users/arober/.emacs.d/auctex/style" "auto" "style")
 TeX-auto-save nil
 TeX-parse-self nil
 TeX-master t
 TeX-command-list '(("TeX" "%(PDF)%(tex) %(extraopts) %`%S%(PDFout)%(mode)%' 
%t" TeX-run-TeX nil
                     (plain-tex-mode texinfo-mode ams-tex-mode) :help "Run 
plain TeX")
                    ("LaTeX" "%`%l%(mode)%' %t" TeX-run-TeX t (latex-mode 
doctex-mode) :help "Run LaTeX")
                    ("Makeinfo" "makeinfo %(extraopts) %t" TeX-run-compile nil 
(texinfo-mode) :help
                     "Run Makeinfo with Info output")
                    ("Makeinfo HTML" "makeinfo %(extraopts) --html %t" 
TeX-run-compile nil (texinfo-mode) :help
                     "Run Makeinfo with HTML output")
                    ("AmSTeX" "%(PDF)amstex %(extraopts) %`%S%(PDFout)%(mode)%' 
%t" TeX-run-TeX t (ams-tex-mode)
                     :help "Run AMSTeX")
                    ("ConTeXt" "texexec --once --texutil %(extraopts) 
%(execopts)%t" TeX-run-TeX nil
                     (context-mode) :help "Run ConTeXt once")
                    ("ConTeXt Full" "texexec %(extraopts) %(execopts)%t" 
TeX-run-TeX nil (context-mode) :help
                     "Run ConTeXt until completion")
                    ("BibTeX" "bibtex %s" TeX-run-BibTeX nil t :help "Run 
BibTeX")
                    ("Biber" "biber %s" TeX-run-Biber nil t :help "Run Biber")
                    ("pdflatex" "pdflatex %t" TeX-run-command t t)
                    ("milatex" "latex -src-specials %t" TeX-run-command t t)
                    ("mipdf" "dvips %d -o %f |ps2pdf %f" TeX-run-command t t)
                    ("dvips" "dvips %d -o %f" TeX-run-command t t) ("ps2pdf" 
"ps2pdf %f" TeX-run-command t t)
                    ("View" "%V" TeX-run-discard-or-function t t :help "Run 
Viewer")
                    ("xdvi" "xdvi %d" TeX-run-command t t)
                    ("Preview" "open -a Preview %s.pdf" TeX-run-command t t)
                    ("Skim" "open -a  Skim %s.pdf" TeX-run-command t t)
                    ("Print" "%p" TeX-run-command t t :help "Print the file")
                    ("Queue" "%q" TeX-run-background nil t :help "View the 
printer queue" :visible
                     TeX-queue-command)
                    ("File" "%(o?)dvips %d -o %f " TeX-run-command t t :help 
"Generate PostScript file")
                    ("Index" "makeindex %s" TeX-run-command nil t :help "Create 
index file")
                    ("Xindy" "texindy %s" TeX-run-command nil t :help "Run 
xindy to create index file")
                    ("dos2unix" "dos2unix %t" TeX-run-command t t)
                    ("Check" "lacheck %s" TeX-run-compile t (latex-mode) :help
                     "Check LaTeX file for correctness")
                    ("ChkTeX" "chktex -v6 %s" TeX-run-compile nil (latex-mode) 
:help
                     "Check LaTeX file for common mistakes")
                    ("Spell" "(TeX-ispell-document \"\")" TeX-run-function nil 
t :help
                     "Spell-check the document")
                    ("Clean" "TeX-clean" TeX-run-function nil t :help "Delete 
generated intermediate files")
                    ("Clean All" "(TeX-clean t)" TeX-run-function nil t :help
                     "Delete generated intermediate and output files")
                    ("Other" "" TeX-run-command t t :help "Run an arbitrary 
command"))
 )