;; strip enclosing brackets from title if they are there
((= l ?t) (org-ref-reftex-get-bib-field "title" entry))
((= l ?T) (reftex-abbreviate-title
;; strip enclosing brackets from title if they are there
((= l ?t) (org-ref-reftex-get-bib-field "title" entry))
((= l ?T) (reftex-abbreviate-title
((= l ?v) (org-ref-reftex-get-bib-field "volume" entry))
((= l ?y) (org-ref-reftex-get-bib-field "year" entry)))))
((= l ?v) (org-ref-reftex-get-bib-field "volume" entry))
((= l ?y) (org-ref-reftex-get-bib-field "year" entry)))))
(setq format (replace-match "%" t t format)))
(while (string-match "[ ,.;:]*%<" format)
(setq format (replace-match "" t t format)))
(setq format (replace-match "%" t t format)))
(while (string-match "[ ,.;:]*%<" format)
(setq format (replace-match "" t t format)))