bug#19675: 11.88; Use default argument of completing-read in LaTeX-section-heading

[Anders Johansson]

Hi,
Using LaTeX-section with helm the default sectioning command is not 
properly selected when just pressing enter. Providing this as the 
/default/ argument to completing-read in LaTeX-section-heading would 
solve this problem
...
  (let ((string (completing-read
         (concat "Level: (default " name ") ")
         LaTeX-section-list
         nil nil nil nil name)))
...

This is similar to commit 5f31fc:
http://git.savannah.gnu.org/cgit/auctex.git/commit/latex.el?id=5f31fced0fe7f83797860a08e69be711ae7f6799


Perhaps there are even more instances of completing-read that should be 
given a default argument?

Cheers,
Anders Johansson

------------------------------------------------------------------------
Emacs  : GNU Emacs 24.4.1 (x86_64-unknown-linux-gnu, GTK+ Version 3.10.8)
 of 2014-11-02 on ajeb
Package: 11.88

current state:
==============
(setq
 AUCTeX-date "2014-10-29"
 window-system 'x
 LaTeX-version "2e"
 TeX-style-path '("~/.emacs.d/auctex" 
"/home/aj/.emacs.d/elpa/auctex-11.88/style"
                  "/home/aj/.emacs.d/auctex/.auctex-auto" 
"~/.emacs.d/auctex/.auctex-style"
                  ".auctex-auto")
 TeX-auto-save t
 TeX-parse-self t
 TeX-master t
 TeX-command-list '(("latexmk"
                     "latexmk -g -pdf -e '$pdflatex=~s/pdflatex %%O 
%%S/%l%(mode) %%O %%S/' %s"
                     aj/TeX-run-latexmk nil t :help "Run Latexmk on file")
                    ("xelatexmk" "latexmk -g -recorder -xelatex -pv %s" 
aj/TeX-run-latexmk nil nil
                     :help "Run XeLatexmk on file")
                    ("cleanmk"
                     "latexmk -c -g -pdf -e '$pdflatex=~s/pdflatex %%O 
%%S/%l%(mode) %%O %%S/' %s"
                     TeX-run-discard nil t :help "Clean with latexk")
                    ("Nomenclature" "makeindex %s.nlo -s nomencl.ist -o 
%s.nls" TeX-run-command t t)
                    ("LaTeX shell-escape" "%`%l --shell-escape 
%(mode)%' %t" TeX-run-TeX t
                     (latex-mode doctex-mode))
                    ("TeX" "%(PDF)%(tex) %(extraopts) 
%`%S%(PDFout)%(mode)%' %t" TeX-run-TeX nil
                     (plain-tex-mode ams-tex-mode texinfo-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")
                    ("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")
                    ("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 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"))
 )