X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/37fcd54a632122f70869a1ad9bf209ef2b856d08..9726856f297522b1773e8aadaec34dd1a8e68a14:/lisp/textmodes/bibtex-style.el diff --git a/lisp/textmodes/bibtex-style.el b/lisp/textmodes/bibtex-style.el index 8afc92968d..f4113e1c27 100644 --- a/lisp/textmodes/bibtex-style.el +++ b/lisp/textmodes/bibtex-style.el @@ -1,24 +1,24 @@ -;;; bibtex-style.el --- Major mode for BibTeX Style files +;;; bibtex-style.el --- Major mode for BibTeX Style files -*- lexical-binding: t -*- -;; Copyright (C) 2005,2007 Free Software Foundation, Inc. +;; Copyright (C) 2005, 2007-2016 Free Software Foundation, Inc. ;; Author: Stefan Monnier -;; Keywords: +;; Keywords: tex -;; This file is free software; you can redistribute it and/or modify +;; This file is part of GNU Emacs. + +;; GNU Emacs 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 2, or (at your option) -;; any later version. +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. -;; This file is distributed in the hope that it will be useful, +;; GNU Emacs 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 GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, -;; Boston, MA 02110-1301, USA. +;; along with GNU Emacs. If not, see . ;;; Commentary: @@ -63,8 +63,6 @@ ("\\<\\(FUNCTION\\|MACRO\\)\\s-+{\\([^}\n]+\\)}" (2 font-lock-function-name-face)))) -;;;###autoload (add-to-list 'auto-mode-alist '("\\.bst\\'" . bibtex-style-mode)) - ;;;###autoload (define-derived-mode bibtex-style-mode nil "BibStyle" "Major mode for editing BibTeX style files." @@ -95,7 +93,9 @@ (defcustom bibtex-style-indent-basic 2 "Basic amount of indentation to use in BibTeX Style mode." - :type 'integer) + :version "22.2" + :type 'integer + :group 'bibtex) (defun bibtex-style-calculate-indentation (&optional virt) (or @@ -141,7 +141,7 @@ (looking-at "if\\$")) (scan-error nil)))) (save-excursion - (condition-case err + (condition-case nil (while (progn (backward-sexp 1) (save-excursion (skip-chars-backward " \t{") (not (bolp))))) @@ -151,5 +151,4 @@ (provide 'bibtex-style) -;; arch-tag: b20ad41a-fd36-466e-8fd2-cc6137f9c55c ;;; bibtex-style.el ends here