"Fossies" - the Fresh Open Source Software Archive

Member "auctex-12.3/style/expl3.el" (18 Oct 2020, 1938 Bytes) of package /linux/misc/auctex-12.3.tar.gz:


As a special service "Fossies" has tried to format the requested source page into HTML format using (guessed) Lisp source code syntax highlighting (style: standard) with prefixed line numbers. Alternatively you can here view or download the uninterpreted source code file. See also the latest Fossies "Diffs" side-by-side code changes report for "expl3.el": 12.2_vs_12.3.

    1 ;;; expl3.el --- AUCTeX style for `expl3.sty'
    2 
    3 ;; Copyright (C) 2015, 2017-2020 Free Software Foundation, Inc.
    4 
    5 ;; Author: Tassilo Horn <tsdh@gnu.org>
    6 ;; Maintainer: auctex-devel@gnu.org
    7 ;; Created: 2015-02-22
    8 ;; Keywords: tex
    9 
   10 ;; This file is part of AUCTeX.
   11 
   12 ;; AUCTeX is free software; you can redistribute it and/or modify it
   13 ;; under the terms of the GNU General Public License as published by
   14 ;; the Free Software Foundation; either version 3, or (at your option)
   15 ;; any later version.
   16 
   17 ;; AUCTeX is distributed in the hope that it will be useful, but
   18 ;; WITHOUT ANY WARRANTY; without even the implied warranty of
   19 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   20 ;; General Public License for more details.
   21 
   22 ;; You should have received a copy of the GNU General Public License
   23 ;; along with AUCTeX; see the file COPYING.  If not, write to the Free
   24 ;; Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
   25 ;; 02110-1301, USA.
   26 
   27 ;;; Commentary:
   28 
   29 ;; This file adds support for `expl3.sty'.
   30 
   31 ;;; Code:
   32 
   33 (defvar font-latex-match-simple-include-list)
   34 
   35 (defvar LaTeX-expl3-syntax-table
   36   (let ((st (copy-syntax-table LaTeX-mode-syntax-table)))
   37     ;; Make _ and : symbol chars
   38     (modify-syntax-entry ?\_ "_" st)
   39     (modify-syntax-entry ?\: "_" st)
   40     st))
   41 
   42 (TeX-add-style-hook
   43  "expl3"
   44  (lambda ()
   45    (set-syntax-table LaTeX-expl3-syntax-table)
   46    (when (and (eq TeX-install-font-lock 'font-latex-setup))
   47      ;; Fontify _ and : as part of macros.
   48      (add-to-list 'font-latex-match-simple-include-list "_" t)
   49      (add-to-list 'font-latex-match-simple-include-list ":" t)))
   50  LaTeX-dialect)
   51 
   52 (defun LaTeX-expl3-package-options ()
   53   "Read the expl3 package options from the user."
   54   (TeX-read-key-val t '(("check-declarations" ("true" "false"))
   55             ("log-functions" ("true" "false"))
   56             ("driver" ("auto"    "latex2e"
   57                    "dvips"   "dvipdfmx"
   58                    "pdfmode" "xdvipdfmx")))))
   59 
   60 ;;; expl3.el ends here