[gnu.emacs.bug] bibtex.el, very minor bug

wolfgang@MGM.MIT.EDU (Wolfgang Rupprecht) (09/21/88)

In GNU Emacs 18.52.6 of Tue Sep 20 1988 on mgm.mit.edu (berkeley-unix)

Function bibtex-entry inserts an unwanted comma after the last entry
if the "optional list" is nil.  A comma is only needed when BOTH the
"required list" and the "optional list" are non-nil.

cd /u/src/gnuemacs-18.52/lisp/
diff -c bibtex.el.~1~ bibtex.el
*** bibtex.el.~1~	Mon May 16 21:20:26 1988
--- bibtex.el	Tue Sep 20 22:09:41 1988
***************
*** 172,178 ****
    (insert (concat "@" entry-type "{,\n\n}\n\n"))
    (previous-line 3)
    (insert (mapconcat 'bibtex-make-entry required ",\n"))
!   (if required (insert ",\n"))
    (insert (mapconcat 'bibtex-make-opt-entry optional ",\n"))
    (up-list -1)
    (forward-char 1))
--- 172,178 ----
    (insert (concat "@" entry-type "{,\n\n}\n\n"))
    (previous-line 3)
    (insert (mapconcat 'bibtex-make-entry required ",\n"))
!   (if (and required optional) (insert ",\n"))
    (insert (mapconcat 'bibtex-make-opt-entry optional ",\n"))
    (up-list -1)
    (forward-char 1))