- (concat
- (if (listp keywords)
- (mapconcat 'identity keywords ", ")
- keywords)
- (when (not (string= "" (bibtex-autokey-get-field "keywords")))
- (concat ", " (bibtex-autokey-get-field "keywords")))))
+ (if arg
+ ;; replace with arg
+ (if (listp keywords)
+ (mapconcat 'identity keywords ", ")
+ keywords)
+ ;; else concatentate
+ (concat
+ (if (listp keywords)
+ (mapconcat 'identity keywords ", ")
+ keywords)
+ (when (not (string= "" (bibtex-autokey-get-field "keywords")))
+ (concat ", " (bibtex-autokey-get-field "keywords"))))))