diff options
| -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))))) |