>From 88f1e0f5cef6a95bc0dd38dac7ece4152429f34a Mon Sep 17 00:00:00 2001 From: Arash Esbati Date: Sat, 12 Sep 2015 20:08:10 +0200 Subject: [PATCH 2/3] Add new style Alegreya.el. * Makefile.in (STYLESRC): Add new style. * style/Alegreya.el: New file. --- ChangeLog | 4 +++ Makefile.in | 2 +- style/Alegreya.el | 100 ++++++++++++++++++++++++++++++++++++++++++++++++++++++ 3 files changed, 105 insertions(+), 1 deletion(-) create mode 100644 style/Alegreya.el diff --git a/ChangeLog b/ChangeLog index 697c5d2..85f9637 100644 --- a/ChangeLog +++ b/ChangeLog @@ -2,6 +2,10 @@ * Makefile.in (STYLESRC): Add new style. + * style/Alegreya.el: New file. + + * Makefile.in (STYLESRC): Add new style. + * style/fontenc.el: New file. 2015-09-09 Mosè Giordano diff --git a/Makefile.in b/Makefile.in index 2a11b68..b6de1e6 100644 --- a/Makefile.in +++ b/Makefile.in @@ -151,7 +151,7 @@ STYLESRC = style/prosper.el \ style/newpxtext.el style/newpxmath.el style/pdfpages.el \ style/mnras.el style/environ.el style/polyglossia.el \ style/vwcol.el style/textpos.el style/transparent.el \ - style/fontenc.el style/gloss-italian.el + style/fontenc.el style/Alegreya.el style/gloss-italian.el STYLEELC = $(STYLESRC:.el=.elc) diff --git a/style/Alegreya.el b/style/Alegreya.el new file mode 100644 index 0000000..90448c7 --- /dev/null +++ b/style/Alegreya.el @@ -0,0 +1,100 @@ +;;; Alegreya.el --- AUCTeX style for `Alegreya.sty' (v2015/09/02) + +;; Copyright (C) 2015 Free Software Foundation, Inc. + +;; Author: Arash Esbati +;; Maintainer: address@hidden +;; Created: 2015-09-12 +;; 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 `Alegreya.sty' (v2015/09/02). +;; `Alegreya.sty' is part of TeXLive. + +;;; Code: + +(TeX-add-style-hook + "Alegreya" + (lambda () + + ;; Run style hook for packages loaded by Alegreya + (TeX-run-style-hooks "textcomp") + + ;; Load `fontaxes' or `fontspec' dep. on `type1' option: + (if (or (LaTeX-provided-package-options-member "Alegreya" "type1") + (LaTeX-provided-package-options-member "Alegreya" "type1=true")) + (TeX-run-style-hooks "fontaxes") + (TeX-run-style-hooks "fontspec")) + + (TeX-add-symbols + ;; Should be used in preamble only + '("useosf") + ;; Text commands + '("Alegreya" -1) + '("AlegreyaSC" -1) + '("AlegreyaBlack" -1) + '("AlegreyaLF" -1) + '("AlegreyaOsF" -1) + '("AlegreyaTLF" -1) + '("AlegreyaTOsF" -1) + '("textsu" t) ; superior figures + '("sufigures" -1) ; + '("textin" t) ; inferior figures + '("infigures" -1)) + + ;; Fontification + (when (and (featurep 'font-latex) + (eq TeX-install-font-lock 'font-latex-setup)) + (font-latex-add-keywords '(("textsu" "{") + ("textin" "{")) + 'type-command) + (font-latex-add-keywords '(("Alegreya" "") + ("AlegreyaSC" "") + ("AlegreyaBlack" "") + ("AlegreyaLF" "") + ("AlegreyaOsF" "") + ("AlegreyaTLF" "") + ("AlegreyaTOsF" "") + ("sufigures" "") + ("infigures" "")) + 'type-declaration))) + LaTeX-dialect) + +(defvar LaTeX-Alegreya-package-options + '(("lining" ("true" "false")) + ("lf" ("true" "false")) + ("oldstyle" ("true" "false")) + ("osf" ("true" "false")) + ("tabular" ("true" "false")) + ("tf" ("true" "false")) + ("proportional" ("true" "false")) + ("pf" ("true" "false")) + ("black" ("true" "false")) + ("type1" ("true" "false")) + ("scaled") + ("scale")) + "Package options for the Alegreya package.") + +(defun LaTeX-Alegreya-package-options () + "Prompt for package options for the Alegreya package." + (TeX-read-key-val t LaTeX-Alegreya-package-options)) + +;;; Alegreya.el ends here -- 2.5.1