summaryrefslogtreecommitdiff
path: root/parsebib.el
diff options
context:
space:
mode:
Diffstat (limited to 'parsebib.el')
-rw-r--r--parsebib.el12
1 files changed, 7 insertions, 5 deletions
diff --git a/parsebib.el b/parsebib.el
index 552c4d1..f1d6526 100644
--- a/parsebib.el
+++ b/parsebib.el
@@ -168,11 +168,13 @@ if non-nil."
"Replace STRINGS with expansions in ABBREVS."
(mapcar (lambda (str)
(or (gethash str abbrevs)
- (cond
- ((string-match "\\`[\"{]\\(.*?\\)[\"}]\\'" str)
- (match-string 1 str))
- ((string-match "[0-9]+" str)
- str))))
+ (progn (setq str (replace-regexp-in-string "[ \t\n\f]+" " " str))
+ (cond
+ ((string-match "\\`[\"{]\\(.*?\\)[\"}]\\'" str)
+ (match-string 1 str))
+ ((string-match "[0-9]+" str)
+ str)
+ (t str)))))
strings))
;;;;;;;;;;;;;;;;;;;