From becff06c71d277647eda4378203d03ab36e141eb Mon Sep 17 00:00:00 2001 From: mattkae Date: Tue, 17 May 2022 07:07:37 -0400 Subject: Evil mode and latex support --- elpa/auctex-13.1.3/style/paralist.el | 115 +++++++++++++++++++++++++++++++++++ 1 file changed, 115 insertions(+) create mode 100644 elpa/auctex-13.1.3/style/paralist.el (limited to 'elpa/auctex-13.1.3/style/paralist.el') diff --git a/elpa/auctex-13.1.3/style/paralist.el b/elpa/auctex-13.1.3/style/paralist.el new file mode 100644 index 0000000..ee5cef8 --- /dev/null +++ b/elpa/auctex-13.1.3/style/paralist.el @@ -0,0 +1,115 @@ +;;; paralist.el -- AUCTeX style for paralist.sty -*- lexical-binding: t; -*- + +;; Copyright (C) 2003-2005, 2014, 2018, 2020 Free Software Foundation, Inc. + +;; Author: Ralf Angeli +;; Maintainer: auctex-devel@gnu.org +;; Created: 2003-10-22 +;; 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 `paralist.sty'. + +;;; Code: + +(require 'tex) +(require 'latex) + +;; Silence the compiler: +(declare-function font-latex-add-keywords + "font-latex" + (keywords class)) + +;; Insert an itemize-ish environment and ask for an optional label +(defun LaTeX-paralist-env-item-opt-label (environment) + "Insert ENVIRONMENT, an optional label and the first item." + (LaTeX-insert-environment + environment + (let ((label (TeX-read-string "(Optional) Label: "))) + (concat (unless (zerop (length label)) + (format "[%s]" label))))) + (LaTeX-find-matching-begin) + (end-of-line 1) + (delete-char 1) + (delete-horizontal-space) + (LaTeX-insert-item)) + +(TeX-add-style-hook + "paralist" + (lambda () + + ;; Add compactdesc to the list of environments which have an optional + ;; argument for each item. + (add-to-list 'LaTeX-item-list '("compactdesc" . LaTeX-item-argument)) + + ;; New symbols + (TeX-add-symbols + '("pointedenum") + '("pointlessenum") + '("paradescriptionlabel") + '("setdefaultitem" "First level" "Second level" "Third level" + "Fourth level") + '("setdefaultenum" "First level" "Second level" "Third level" + "Fourth level") + '("setdefaultleftmargin" "First level" "Second level" "Third level" + "Fourth level" "Fifth level" "Sixth level")) + + ;; New environments + (LaTeX-add-environments + '("asparaenum" LaTeX-paralist-env-item-opt-label) + '("inparaenum" LaTeX-paralist-env-item-opt-label) + '("compactenum" LaTeX-paralist-env-item-opt-label) + '("asparaitem" LaTeX-paralist-env-item-opt-label) + '("inparaitem" LaTeX-paralist-env-item-opt-label) + '("compactitem" LaTeX-paralist-env-item-opt-label) + '("compactdesc" LaTeX-env-item)) + ;; Environments (re)defined only when the package is loaded with particular + ;; options. + (unless (LaTeX-provided-package-options-member "paralist" "olditem") + (LaTeX-add-environments + '("itemize" LaTeX-paralist-env-item-opt-label))) + (unless (LaTeX-provided-package-options-member "paralist" "oldenum") + (LaTeX-add-environments + '("enumerate" LaTeX-paralist-env-item-opt-label))) + (when (LaTeX-provided-package-options-member "paralist" "defblank") + (LaTeX-add-environments + '("asparablank" LaTeX-env-item) + '("inparablank" LaTeX-env-item))) + + ;; Fontification + (when (and (featurep 'font-latex) + (eq TeX-install-font-lock 'font-latex-setup)) + (font-latex-add-keywords '(("setdefaultitem" "{{{{") + ("setdefaultenum" "{{{{") + ("setdefaultleftmargin" "{{{{{{")) + 'variable))) + TeX-dialect) + +(defvar LaTeX-paralist-package-options '("newitem" "olditem" "newenum" + "oldenum" "alwaysadjust" + "neveradjust" "neverdecrease" + "increaseonly" "defblank" + "pointedenum" "pointlessenum" + "cfg" "nocfg" "flushright" + "flushleft") + "Package options for the paralist package.") + +;;; paralist.el ends here -- cgit v1.2.1