Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
635618a4
Commit
635618a4
authored
Jan 17, 2009
by
Roland Winkler
Browse files
(bibtex-format-entry): Simplify previous change.
parent
511744bd
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
9 additions
and
6 deletions
+9
-6
lisp/ChangeLog
lisp/ChangeLog
+5
-0
lisp/textmodes/bibtex.el
lisp/textmodes/bibtex.el
+4
-6
No files found.
lisp/ChangeLog
View file @
635618a4
2009-01-17 Roland Winkler <Roland.Winkler@physik.uni-erlangen.de>
* textmodes/bibtex.el (bibtex-format-entry): Simplify previous
change.
2009-01-17 Eli Zaretskii <eliz@gnu.org>
* dos-w32.el (find-buffer-file-type-coding-system): If `(car
...
...
lisp/textmodes/bibtex.el
View file @
635618a4
...
...
@@ -1893,7 +1893,6 @@ Formats current entry according to variable `bibtex-entry-format'."
strings
)
bibtex-entry-format
))
(
left-delim-re
(
regexp-quote
(
bibtex-field-left-delimiter
)))
(
right-delim-re
(
regexp-quote
(
bibtex-field-right-delimiter
)))
bounds
crossref-key
req-field-list
default-field-list
field-list
alt-fields
error-field-name
)
(
unwind-protect
...
...
@@ -2006,12 +2005,11 @@ Formats current entry according to variable `bibtex-entry-format'."
(
if
(
looking-at
bibtex-field-const
)
(
goto-char
(
match-end
0
))
(
let
((
boundaries
(
bibtex-parse-field-string
)))
(
unless
(
looking-at
left-delim-re
)
(
if
(
looking-at
left-delim-re
)
(
goto-char
(
cdr
boundaries
))
(
delete-char
1
)
(
insert
(
bibtex-field-left-delimiter
)))
(
goto-char
(
1-
(
cdr
boundaries
)))
(
if
(
looking-at
right-delim-re
)
(
forward-char
)
(
insert
(
bibtex-field-left-delimiter
))
(
goto-char
(
1-
(
cdr
boundaries
)))
(
delete-char
1
)
(
insert
(
bibtex-field-right-delimiter
)))))
(
if
(
looking-at
"[ \t\n]*#[ \t\n]*"
)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment