+ (let ((output))
+ (setq output (org-ref-get-bibtex-entry-citation key))
+ ;; unescape the &
+ (setq output (replace-regexp-in-string "\\\\&" "&" output))
+ ;; hack to replace {} around text
+ (setq output (replace-regexp-in-string " {\\(.*\\)} " " \\1 " output))
+ ;; get rid of empty parens
+ (setq output (replace-regexp-in-string "()" "" output))
+ (format "<li><a id=\"%s\">[%s] %s</a></li>"
+ key key output)))