|
Lines 4176-4189
Link Here
|
| 4176 |
entries from minibuffer." |
4176 |
entries from minibuffer." |
| 4177 |
(interactive "*P") |
4177 |
(interactive "*P") |
| 4178 |
(message "Starting to validate buffer...") |
4178 |
(message "Starting to validate buffer...") |
| 4179 |
(sit-for 1 nil t) |
4179 |
(sit-for 1 t) |
| 4180 |
(bibtex-realign) |
4180 |
(bibtex-realign) |
| 4181 |
(deactivate-mark) ; So bibtex-validate works on the whole buffer. |
4181 |
(deactivate-mark) ; So bibtex-validate works on the whole buffer. |
| 4182 |
(if (not (let (bibtex-maintain-sorted-entries) |
4182 |
(if (not (let (bibtex-maintain-sorted-entries) |
| 4183 |
(bibtex-validate))) |
4183 |
(bibtex-validate))) |
| 4184 |
(message "Correct errors and call `bibtex-convert-alien' again") |
4184 |
(message "Correct errors and call `bibtex-convert-alien' again") |
| 4185 |
(message "Starting to reformat entries...") |
4185 |
(message "Starting to reformat entries...") |
| 4186 |
(sit-for 2 nil t) |
4186 |
(sit-for 2 t) |
| 4187 |
(bibtex-reformat read-options) |
4187 |
(bibtex-reformat read-options) |
| 4188 |
(goto-char (point-max)) |
4188 |
(goto-char (point-max)) |
| 4189 |
(message "Buffer is now parsable. Please save it."))) |
4189 |
(message "Buffer is now parsable. Please save it."))) |
