monnier pushed a commit to branch externals/auctex
in repository elpa.
commit baf0c9077326a6caf5eb914f7bc1a48ea204e01c
Author: Tassilo Horn <[email protected]>
Date: Wed Feb 13 19:59:18 2013 +0000
* Makefile.in (STYLESRC): Activate new style filecontents.el.
* style/filecontents.el: New style.
---
ChangeLog | 8 +++++++
Makefile.in | 2 +-
style/filecontents.el | 54 +++++++++++++++++++++++++++++++++++++++++++++++++
3 files changed, 63 insertions(+), 1 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index c0deaf1..948f3dc 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,13 @@
2013-02-13 Tassilo Horn <[email protected]>
+ * Makefile.in (STYLESRC): Activate new style filecontents.el.
+
+2013-01-23 Mads Jensen <[email protected]>
+
+ * style/filecontents.el: New style.
+
+2013-02-13 Tassilo Horn <[email protected]>
+
* Makefile.in (STYLESRC): Activate new style fancynum.el.
2013-02-08 Mads Jensen <[email protected]>
diff --git a/Makefile.in b/Makefile.in
index be83051..f1d4154 100644
--- a/Makefile.in
+++ b/Makefile.in
@@ -129,7 +129,7 @@ STYLESRC = style/prosper.el \
style/multirow.el style/imakeidx.el style/afterpage.el \
style/longtable.el style/lipsum.el style/kantlipsum.el \
style/memoir.el style/placeins.el style/nameref.el \
- style/fancynum.el
+ style/fancynum.el style/filecontents.el
STYLEELC = $(STYLESRC:.el=.elc)
CLEANFILES = $(AUCELC) $(STYLEELC) $(MULEELC)
diff --git a/style/filecontents.el b/style/filecontents.el
new file mode 100644
index 0000000..776c768
--- /dev/null
+++ b/style/filecontents.el
@@ -0,0 +1,54 @@
+;;; filecontents.el --- AUCTeX style for `filecontents.sty'
+
+;; Copyright (C) 2013 Free Software Foundation, Inc.
+
+;; Author: Mads Jensen <[email protected]>
+;; Maintainer: [email protected]
+;; Created: 2013-01-01
+;; Keywords: tex
+
+;; This file is part of AUCTeX.
+
+;; AUCTeX is free software; you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; AUCTeX is distributed in the hope that it will be useful, but
+;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+;; General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with AUCTeX; see the file COPYING. If not, write to the Free
+;; Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
+;; 02110-1301, USA.
+
+;;; Commentary:
+
+;; This file adds support for `filecontents.sty'. The package removes the two
+;; constraints that `filecontents' from LaTeX2e has, namely that the
environment
+;; must be before the documentclass (or \begin{document} according to some
+;; sources), and that existing files are not overwritten.
+
+;;; Code:
+
+(TeX-add-style-hook
+ "filecontents"
+ (lambda ()
+ (LaTeX-add-environments
+ '("filecontents" LaTeX-env-filecontents)
+ '("filecontents*" LaTeX-env-filecontents))))
+
+(defun LaTeX-env-filecontents (environment)
+ "Insert ENVIRONMENT with filename for contents."
+ (LaTeX-insert-environment environment
+ (concat TeX-grop
+ (read-string "File: ")
+ TeX-grcl))
+ (delete-horizontal-space))
+
+(defvar LaTeX-filecontents-package-options nil
+ "Package options for filecontents.")
+
+;; filecontents.el ends here
