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/italian.el | 56 +++++++++++++++++++++++++++++++++++++ 1 file changed, 56 insertions(+) create mode 100644 elpa/auctex-13.1.3/style/italian.el (limited to 'elpa/auctex-13.1.3/style/italian.el') diff --git a/elpa/auctex-13.1.3/style/italian.el b/elpa/auctex-13.1.3/style/italian.el new file mode 100644 index 0000000..16db718 --- /dev/null +++ b/elpa/auctex-13.1.3/style/italian.el @@ -0,0 +1,56 @@ +;;; italian.el --- Setup AUCTeX for editing Italian text. -*- lexical-binding: t; -*- + +;; Copyright (C) 2004, 2005, 2018, 2020, 2022 Free Software Foundation, Inc. + +;; Author: Davide G. M. Salvetti +;; Maintainer: Davide G. M. Salvetti +;; Created: 2004-05-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: +;; +;; I believe that the Italian correct quoting is achieved with `\"<' and +;; `\">'. However, I will be glad to see a normative reference. -- DGMS + +;;; Code: + +(require 'tex) + +;; Silence the compiler: +(declare-function font-latex-add-quotes + "font-latex" + (quotes)) + +(defvar TeX-language-it-hook nil + "Hook run for Italian texts.") + +(TeX-add-style-hook + "italian" + (lambda () + (unless (eq (car TeX-quote-language) 'override) + (setq TeX-quote-language + `("italian" "\"<" "\">" ,TeX-quote-after-quote))) + ;; Fontification of quotation marks. + (when (fboundp 'font-latex-add-quotes) + (font-latex-add-quotes '("\"<" "\">" french))) + (run-hooks 'TeX-language-it-hook)) + TeX-dialect) + +;;; italian.el ends here -- cgit v1.2.1