branch: master commit dc1a8ee51e5ed8365aa969c1e845ba6b70203848 Author: Arash Esbati <ar...@gnu.org> Commit: Arash Esbati <ar...@gnu.org>
Delete `LaTeX-env-contents' * doc/auctex.texi (Adding Environments): * latex.el (LaTeX-env-contents): Delete now unused function. --- doc/auctex.texi | 3 --- latex.el | 19 ------------------- 2 files changed, 22 deletions(-) diff --git a/doc/auctex.texi b/doc/auctex.texi index 05695f0f..ca1eb339 100644 --- a/doc/auctex.texi +++ b/doc/auctex.texi @@ -5839,9 +5839,6 @@ Insert the given environment with width and height specifications. @item LaTeX-env-bib Insert the given environment with a label for a bibitem. -@item LaTeX-env-contents -Insert the given environment with a filename as its argument. - @item LaTeX-env-args Insert the given environment with arguments. You can use this as a hook in case you want to specify multiple complex arguments just like in diff --git a/latex.el b/latex.el index af9bc6be..e66f4116 100644 --- a/latex.el +++ b/latex.el @@ -1451,25 +1451,6 @@ Just like array and tabular." (delete-horizontal-space) (LaTeX-insert-item)) -(defun LaTeX-env-contents (environment) - "Insert ENVIRONMENT with optional argument and filename for contents." - (let* ((opt '("overwrite" "force" "nosearch" "nowarn")) - (arg (mapconcat #'identity - (TeX-completing-read-multiple - (TeX-argument-prompt t nil "Options") - (if (string= environment "filecontents*") - opt - (cons "noheader" opt))) - ","))) - (LaTeX-insert-environment environment - (concat - (when (and arg (not (string= arg ""))) - (concat LaTeX-optop arg LaTeX-optcl)) - TeX-grop - (TeX-read-string "File: ") - TeX-grcl))) - (delete-horizontal-space)) - (defun LaTeX-env-args (environment &rest args) "Insert ENVIRONMENT and arguments defined by ARGS." (LaTeX-insert-environment environment)