[Bug-AUCTeX] bug#19178: 11.88; 11.88 Xemacs 11.88 problem with env and labels

[Mosè Giordano]

Hi Uwe,

2014-11-25 15:11 GMT+01:00 Uwe Brauer :
>
>
> Hello
>
> I used for years the following function
>
> (defun LaTeX-rem-insert (environment)   ;Version:1.20
>   (if (y-or-n-p
>(format "Do you want a title "))
>   (let ((title (read-input " Title: ")))
> (LaTeX-insert-environment "rem" (concat "[" title "]"))
> (and (LaTeX-label environment)
>  (newline-and-indent)))
> (LaTeX-insert-environment "rem")
> (and (LaTeX-label environment)
>(newline-and-indent
>
> Which worked till version 11.87, however in 11.88 an error is triggered
> which I attach below.

This is not a bug: `LaTeX-label' now has two arguments, the label to
be inserted and the type, either environment or section, so you have
to replace your call to `LaTeX-label' with
(LaTeX-label environment 'environment)

Bye,
Mosè



___
bug-auctex mailing list
bug-auctex@gnu.org
https://lists.gnu.org/mailman/listinfo/bug-auctex

[Bug-AUCTeX] bug#19178: 11.88; 11.88 Xemacs 11.88 problem with env and labels

[Uwe Brauer]

Hello

I used for years the following function 

(defun LaTeX-rem-insert (environment)   ;Version:1.20
  (if (y-or-n-p
   (format "Do you want a title "))
  (let ((title (read-input " Title: ")))
(LaTeX-insert-environment "rem" (concat "[" title "]"))
(and (LaTeX-label environment)
 (newline-and-indent)))
(LaTeX-insert-environment "rem")
(and (LaTeX-label environment)
   (newline-and-indent

Which worked till version 11.87, however in 11.88 an error is triggered
which I attach below.

BTW I promised to sync 11.88 with the official xemacs pkg, but I was a bit
busy these days. Now that the bug appeared I have an excuse

Uwe Brauer 




Emacs  : XEmacs 21.5  (beta33) "horseradish" [Lucid] (i686-pc-linux, Mule) of 
Fri Oct 17 2014 on Burrurr
Package: 11.88

current state:
==
(setq
 AUCTeX-date "2014-10-29"
 window-system 'x
 LaTeX-version "2e"
 TeX-style-path '("/home/oub/.xemacs/xemacs-packages/etc/auctex/auto/"
  
"/home/oub/.xemacs/xemacs-packages/etc/auctex/style" 
"/home/oub/.emacs.d/auctex/auto"
  "/home/oub/.emacs.d/auctex/style" "auto" 
"style")
 TeX-auto-save t
 TeX-parse-self t
 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 
nil (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 nil
 (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")
("View" "%V" 
TeX-run-discard-or-function t t :help "Run Viewer")
("evince" "/usr/bin/evince %G" 
TeX-run-command t t)
("xpdf" "/usr/bin/xpdf %G" 
TeX-run-command t t)
("fullxpdf" "/usr/bin/xpdf -fullscreen 
%G" TeX-run-command t t)
("oolatex" "/usr/share/tex4ht/oolatex 
%t" TeX-run-command t t)
("panlatex2odt" "pandoc -s -R -f latex 
--toc %t -t odt -o %O" TeX-run-command t t)
("panlatex2rtf" "pandoc -s -R -f latex 
--toc %t -t rtf -o %R" TeX-run-command t t)
("latex2rtf" "latex2rtf -f0 %t" 
TeX-run-command nil t)
("oabiword" "abiword %O" 
TeX-run-command nil t)
("rabiword" "abiword %R" 
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 | ps2pdf 
%f" TeX-run-command t t :help
 "Generate PostScript file")
("Index" "makeindex %s" TeX-run-command 
nil t :help "Create index file")
("makenomen" "makeindex %s.nlo -s 
nomencl.ist -o %s.nls" TeX-run-command t t)
("Xindy" "texindy %s" TeX-run-command 
nil t :help "Run xindy to create index file")
("Check" "lacheck %s" TeX-run-compile 
nil (latex-mode) :help
 "Check LaTeX file for correctness")
("ChkTeX" "chktex -v6 %s" 
TeX-run-compile nil (latex-mode) :help
 "Check La