diff options
Diffstat (limited to 'lisp/textmodes/refbib.el')
-rw-r--r-- | lisp/textmodes/refbib.el | 27 |
1 files changed, 10 insertions, 17 deletions
diff --git a/lisp/textmodes/refbib.el b/lisp/textmodes/refbib.el index bff57128c51..084b17c676b 100644 --- a/lisp/textmodes/refbib.el +++ b/lisp/textmodes/refbib.el @@ -1,4 +1,4 @@ -;;; refbib.el --- convert refer-style references to ones usable by Latex bib +;;; refbib.el --- convert refer-style references to ones usable by Latex bib -*- lexical-binding: t; -*- ;; Copyright (C) 1989, 2001-2021 Free Software Foundation, Inc. @@ -65,8 +65,7 @@ (defcustom r2b-trace-on nil "Non-nil means trace conversion." - :type 'boolean - :group 'refbib) + :type 'boolean) (defcustom r2b-journal-abbrevs '( @@ -83,8 +82,7 @@ letter, even if it really doesn't. \(\"Ijcai81\" \"ijcai7\")) would expand Aij to the text string \"Artificial Intelligence\", but would replace Ijcai81 with the BibTeX macro \"ijcai7\"." - :type '(repeat (list string string)) - :group 'refbib) + :type '(repeat (list string string))) (defcustom r2b-booktitle-abbrevs '( @@ -101,8 +99,7 @@ should be listed as beginning with a capital letter, even if it doesn't. \(\"Ijcai81\" \"ijcai7\")) would expand Aij to the text string \"Artificial Intelligence\", but would replace Ijcai81 with the BibTeX macro \"ijcai7\"." - :type '(repeat (list string string)) - :group 'refbib) + :type '(repeat (list string string))) (defcustom r2b-proceedings-list '() @@ -119,8 +116,7 @@ a conference, and its expansion is the BibTeX macro \"ijcai7\". Then expansion were \"Proceedings of the Seventh International Conference on Artificial Intelligence\", then you would NOT need to include Ijcai81 in `r2b-proceedings-list' (although it wouldn't cause an error)." - :type '(repeat (list string string)) - :group 'refbib) + :type '(repeat (list string string))) (defvar r2b-additional-stop-words "Some\\|What" @@ -129,8 +125,7 @@ This is in addition to the `r2b-capitalize-title-stop-words'.") (defcustom r2b-delimit-with-quote t "If true, then use \" to delimit fields, otherwise use braces." - :type 'boolean - :group 'refbib) + :type 'boolean) ;********************************************************** ; Utility Functions @@ -205,13 +200,11 @@ This is in addition to the `r2b-capitalize-title-stop-words'.") (defcustom r2b-out-buf-name "*Out*" "Name of buffer for output from refer-to-bibtex." - :type 'string - :group 'refbib) + :type 'string) (defcustom r2b-log-name "*Log*" "Name of buffer for logs errors from refer-to-bibtex." - :type 'string - :group 'refbib) + :type 'string) (defvar r2b-in-buf nil) (defvar r2b-out-buf nil) @@ -418,7 +411,7 @@ title if CAPITALIZE is true. Returns value of VAR." with a comma and newline; if ABBREVS list is given, then try to replace the {DATA} with an abbreviation." (if data - (let (match nodelim multi-line index) + (let (match nodelim index) ;; multi-line (cond ((and abbrevs (setq match (assoc data abbrevs))) (if (null (cdr match)) @@ -514,7 +507,7 @@ but not a publisher." (defun r2b-barf-output () "Generate bibtex based on global variables." - (let ((standard-output r2b-out-buf) (case-fold-search t) match) + (let ((standard-output r2b-out-buf) (case-fold-search t)) ;; match (r2b-trace "...barfing") (sit-for 0) |