diff options
| author | Roland Winkler | 2009-01-16 15:10:16 +0000 |
|---|---|---|
| committer | Roland Winkler | 2009-01-16 15:10:16 +0000 |
| commit | 8a62c4708eaa910647be7b16272d8ed4ce5fcebf (patch) | |
| tree | a66d1a2c462054f8a176d9bfb6359dcad32ad79a | |
| parent | e7abcdfba953b60958c6665773fa24197bc5d01d (diff) | |
| download | emacs-8a62c4708eaa910647be7b16272d8ed4ce5fcebf.tar.gz emacs-8a62c4708eaa910647be7b16272d8ed4ce5fcebf.zip | |
(bibtex-format-entry): Fix previous change.
| -rw-r--r-- | lisp/textmodes/bibtex.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/textmodes/bibtex.el b/lisp/textmodes/bibtex.el index 80265071347..0114f234dd6 100644 --- a/lisp/textmodes/bibtex.el +++ b/lisp/textmodes/bibtex.el | |||
| @@ -2006,11 +2006,11 @@ Formats current entry according to variable `bibtex-entry-format'." | |||
| 2006 | (if (looking-at bibtex-field-const) | 2006 | (if (looking-at bibtex-field-const) |
| 2007 | (goto-char (match-end 0)) | 2007 | (goto-char (match-end 0)) |
| 2008 | (let ((boundaries (bibtex-parse-field-string))) | 2008 | (let ((boundaries (bibtex-parse-field-string))) |
| 2009 | (unless (looking-at right-delim-re) | 2009 | (unless (looking-at left-delim-re) |
| 2010 | (delete-char 1) | 2010 | (delete-char 1) |
| 2011 | (insert (bibtex-field-left-delimiter))) | 2011 | (insert (bibtex-field-left-delimiter))) |
| 2012 | (goto-char (1- (cdr boundaries))) | 2012 | (goto-char (1- (cdr boundaries))) |
| 2013 | (if (looking-at left-delim-re) | 2013 | (if (looking-at right-delim-re) |
| 2014 | (forward-char) | 2014 | (forward-char) |
| 2015 | (delete-char 1) | 2015 | (delete-char 1) |
| 2016 | (insert (bibtex-field-right-delimiter))))) | 2016 | (insert (bibtex-field-right-delimiter))))) |