summaryrefslogtreecommitdiff
path: root/elpa/auctex-13.1.3/style/inputenc.el
diff options
context:
space:
mode:
authormattkae <mattkae@protonmail.com>2022-06-07 08:23:47 -0400
committermattkae <mattkae@protonmail.com>2022-06-07 08:23:47 -0400
commitbd18a38c2898548a3664a9ddab9f79c84f2caf4a (patch)
tree95b9933376770381bd8859782ae763be81c2d72b /elpa/auctex-13.1.3/style/inputenc.el
parentb07628dddf418d4f47b858e6c35fd3520fbaeed2 (diff)
parentef160dea332af4b4fe5e2717b962936c67e5fe9e (diff)
Merge conflict
Diffstat (limited to 'elpa/auctex-13.1.3/style/inputenc.el')
-rw-r--r--elpa/auctex-13.1.3/style/inputenc.el89
1 files changed, 0 insertions, 89 deletions
diff --git a/elpa/auctex-13.1.3/style/inputenc.el b/elpa/auctex-13.1.3/style/inputenc.el
deleted file mode 100644
index 14ff61c..0000000
--- a/elpa/auctex-13.1.3/style/inputenc.el
+++ /dev/null
@@ -1,89 +0,0 @@
-;;; inputenc.el --- AUCTeX style for `inputenc.sty' -*- lexical-binding: t; -*-
-
-;; Copyright (C) 2005-2021 Free Software Foundation, Inc.
-
-;; Author: Arne Jørgensen <arne@arnested.dk>
-;; 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 Street, Fifth Floor, Boston,
-;; MA 02110-1301, USA.
-
-;;; Commentary:
-
-;; This file adds support for `inputenc.sty'.
-
-;;; Code:
-
-(require 'tex)
-
-(defun LaTeX-inputenc-package-options nil
- "Prompt for package options for the inputenc package."
- ;; separate the condition in three to silence the byte compiler
- (if (boundp 'latex-inputenc-coding-alist)
- (when (fboundp 'latexenc-coding-system-to-inputenc)
- (when (fboundp 'latexenc-inputenc-to-coding-system)
- (let ((default (latexenc-coding-system-to-inputenc
- (or coding-system-for-write
- buffer-file-coding-system)))
- (selected 'undecided))
- (setq selected (completing-read
- (if default
- (format "Input encoding (default %s): " default)
- "Input encoding: ")
- (mapcar #'car latex-inputenc-coding-alist)
- nil
- nil
- nil
- nil
- default))
-
- ;; if necessary offer to set the coding system for saving
- ;; this buffer based on the selected input encoding
- (when (and (null
- (coding-system-equal
- (coding-system-base
- (or coding-system-for-write
- buffer-file-coding-system))
- (coding-system-base
- (latexenc-inputenc-to-coding-system selected))))
- (y-or-n-p "Set coding system for saving this buffer? ")
- (set-buffer-file-coding-system
- (coding-system-base
- (latexenc-inputenc-to-coding-system selected)))
- (message nil)))
-
- ;; return selected input encoding
- selected)))
- (TeX-read-string "Input encoding: ")))
-
-(defun LaTeX-arg-inputenc-inputenc (_optional)
- "Prompt for input encoding."
- (TeX-argument-insert (LaTeX-inputenc-package-options) nil))
-
-(TeX-add-style-hook
- "inputenc"
- (lambda ()
- ;; New symbols
- (TeX-add-symbols
- '("inputencoding" LaTeX-arg-inputenc-inputenc)))
- TeX-dialect)
-
-;; Local Variables:
-;; coding: utf-8
-;; End:
-
-;;; inputenc.el ends here