diff options
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/reftex-cite.el | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/lisp/textmodes/reftex-cite.el b/lisp/textmodes/reftex-cite.el index 079101b56ee..ca29709de2e 100644 --- a/lisp/textmodes/reftex-cite.el +++ b/lisp/textmodes/reftex-cite.el | |||
| @@ -514,12 +514,6 @@ | |||
| 514 | ;; remove extra whitespace | 514 | ;; remove extra whitespace |
| 515 | (while (string-match "[\n\t\r]\\|[ \t][ \t]+" field) | 515 | (while (string-match "[\n\t\r]\\|[ \t][ \t]+" field) |
| 516 | (setq field (replace-match " " nil t field))) | 516 | (setq field (replace-match " " nil t field))) |
| 517 | ;; remove leading garbage | ||
| 518 | (if (string-match (if raw "^[ \t]+" "^[ \t{]+") field) | ||
| 519 | (setq field (replace-match "" nil t field))) | ||
| 520 | ;; remove trailing garbage | ||
| 521 | (if (string-match (if raw "[ \t]+$" "[ \t}]+$") field) | ||
| 522 | (setq field (replace-match "" nil t field))) | ||
| 523 | (push (cons key field) alist)))) | 517 | (push (cons key field) alist)))) |
| 524 | alist)) | 518 | alist)) |
| 525 | 519 | ||