Mercurial > emacs
comparison lisp/textmodes/refbib.el @ 60918:58a53f588384
* textmodes/refbib.el, textmodes/refer.el, textmodes/reftex-cite.el,
textmodes/reftex-index.el, textmodes/reftex-parse.el,
textmodes/reftex-ref.el, textmodes/reftex-vars.el,
textmodes/reftex.el, textmodes/org.el: Replace `illegal' with
`invalid'.
author | Werner LEMBERG <wl@gnu.org> |
---|---|
date | Fri, 25 Mar 2005 09:03:24 +0000 |
parents | 695cf19ef79e |
children | a8fa7c632ee4 4da4a09e8b1b |
comparison
equal
deleted
inserted
replaced
60917:87f9bb9d3718 | 60918:58a53f588384 |
---|---|
1 ;;; refbib.el --- convert refer-style references to ones usable by Latex bib | 1 ;;; refbib.el --- convert refer-style references to ones usable by Latex bib |
2 | 2 |
3 ;; Copyright (C) 1989 Free Software Foundation, Inc. | 3 ;; Copyright (C) 1989, 2005 Free Software Foundation, Inc. |
4 | 4 |
5 ;; Author: Henry Kautz <kautz@research.att.com> | 5 ;; Author: Henry Kautz <kautz@research.att.com> |
6 ;; Keywords: bib, tex | 6 ;; Keywords: bib, tex |
7 | 7 |
8 ;; This file is part of GNU Emacs. | 8 ;; This file is part of GNU Emacs. |
33 | 33 |
34 ;; HISTORY | 34 ;; HISTORY |
35 ;; 9/88, created H.Kautz | 35 ;; 9/88, created H.Kautz |
36 ;; modified 1/19/89, allow books with editor but no author; | 36 ;; modified 1/19/89, allow books with editor but no author; |
37 ;; added %O ordering field; | 37 ;; added %O ordering field; |
38 ;; appended illegal multiple fields, instead of | 38 ;; appended invalid multiple fields, instead of |
39 ;; discarding; | 39 ;; discarding; |
40 ;; added rule, a tech report whose %R number | 40 ;; added rule, a tech report whose %R number |
41 ;; contains "ISBN" is really a book | 41 ;; contains "ISBN" is really a book |
42 ;; added rule, anything with an editor is a book | 42 ;; added rule, anything with an editor is a book |
43 ;; or a proceedings | 43 ;; or a proceedings |
290 ) | 290 ) |
291 (if (null val) | 291 (if (null val) |
292 (setq val item) | 292 (setq val item) |
293 (if unique | 293 (if unique |
294 (progn | 294 (progn |
295 (r2b-warning "*Illegal multiple field %s %s" field item) | 295 (r2b-warning "*Invalid multiple field %s %s" field item) |
296 (setq val (concat val "\n" item)) | 296 (setq val (concat val "\n" item)) |
297 ) | 297 ) |
298 (setq val (concat val "\n\t\tand " item)) | 298 (setq val (concat val "\n\t\tand " item)) |
299 ) | 299 ) |
300 ) | 300 ) |