]> git.eshelyaron.com Git - emacs.git/commitdiff
* textmodes/reftex-cite.el (reftex-parse-bibtex-entry): Don't cut
authorTassilo Horn <tsdh@gnu.org>
Wed, 10 Apr 2013 14:48:44 +0000 (16:48 +0200)
committerTassilo Horn <tsdh@gnu.org>
Wed, 10 Apr 2013 14:48:44 +0000 (16:48 +0200)
off leading { and trailing } from field values.

lisp/ChangeLog
lisp/textmodes/reftex-cite.el

index a50f3bc8f15f9475360eb4edaa0d11a6d87bca4d..c7ac52fac32921d3d5b53c05976ba93cd3484e26 100644 (file)
@@ -1,3 +1,8 @@
+2013-04-10  Tassilo Horn  <tsdh@gnu.org>
+
+       * textmodes/reftex-cite.el (reftex-parse-bibtex-entry): Don't cut
+       off leading { and trailing } from field values.
+
 2013-04-10  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * emacs-lisp/timer.el (timer--check): New function.
index 079101b56ee9b1eb2bfa16962eb4d2edc161d0c4..ca29709de2e2ab01f024cb94c54dd27f240dd0bc 100644 (file)
           ;; remove extra whitespace
           (while (string-match "[\n\t\r]\\|[ \t][ \t]+" field)
             (setq field (replace-match " " nil t field)))
-          ;; remove leading garbage
-          (if (string-match (if raw "^[ \t]+" "^[ \t{]+") field)
-              (setq field (replace-match "" nil t field)))
-          ;; remove trailing garbage
-          (if (string-match (if raw "[ \t]+$" "[ \t}]+$") field)
-              (setq field (replace-match "" nil t field)))
           (push (cons key field) alist))))
     alist))