/[emacs]/emacs/lisp/textmodes/refbib.el
ViewVC logotype

Diff of /emacs/lisp/textmodes/refbib.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.18 by miles, Mon Sep 1 15:45:40 2003 UTC revision 1.19 by wl, Fri Mar 25 09:03:24 2005 UTC
# Line 1  Line 1 
1  ;;; refbib.el --- convert refer-style references to ones usable by Latex bib  ;;; refbib.el --- convert refer-style references to ones usable by Latex bib
2    
3  ;; Copyright (C) 1989 Free Software Foundation, Inc.  ;; Copyright (C) 1989, 2005 Free Software Foundation, Inc.
4    
5  ;; Author: Henry Kautz <kautz@research.att.com>  ;; Author: Henry Kautz <kautz@research.att.com>
6  ;; Keywords: bib, tex  ;; Keywords: bib, tex
# Line 35  Line 35 
35  ;; 9/88, created H.Kautz  ;; 9/88, created H.Kautz
36  ;; modified 1/19/89, allow books with editor but no author;  ;; modified 1/19/89, allow books with editor but no author;
37  ;;                   added %O ordering field;  ;;                   added %O ordering field;
38  ;;                   appended illegal multiple fields, instead of  ;;                   appended invalid multiple fields, instead of
39  ;;                     discarding;  ;;                     discarding;
40  ;;                   added rule, a tech report whose %R number  ;;                   added rule, a tech report whose %R number
41  ;;                     contains "ISBN" is really a book  ;;                     contains "ISBN" is really a book
# Line 292  title if CAPITALIZE is true.  Returns va Line 292  title if CAPITALIZE is true.  Returns va
292              (setq val item)              (setq val item)
293              (if unique              (if unique
294                 (progn                 (progn
295                    (r2b-warning "*Illegal multiple field %s %s" field item)                    (r2b-warning "*Invalid multiple field %s %s" field item)
296                    (setq val (concat val "\n" item))                    (setq val (concat val "\n" item))
297                    )                    )
298                 (setq val (concat val "\n\t\tand " item))                 (setq val (concat val "\n\t\tand " item))

Legend:
Removed from v.1.18  
changed lines
  Added in v.1.19

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26