Path: utzoo!telly!ddsw1!mcdchg!rutgers!tut.cis.ohio-state.edu!MGM.MIT.EDU!wolfgang From: wolfgang@MGM.MIT.EDU (Wolfgang Rupprecht) Newsgroups: gnu.emacs.bug Subject: bibtex.el, very minor bug Message-ID: <8809210219.AA01121@MGM.MIT.EDU> Date: 21 Sep 88 02:19:04 GMT Sender: daemon@tut.cis.ohio-state.edu Distribution: gnu Organization: Freelance Software Consultant, Boston, Ma. Lines: 28 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))