Re: [O] [PATCH 3/4] Do not export TYPE property as field when allowing arbitrary fields

[Matt Lundin]

The subject should be patch 3/4 - sorry.

Matt Lundin <address@hidden> writes:

> * lisp/org-bibtex.el (org-bibtex-headline): Don't export TYPE property
>   as field
> ---
>  lisp/org-bibtex.el |   12 +++++++-----
>  1 files changed, 7 insertions(+), 5 deletions(-)
>
> diff --git a/lisp/org-bibtex.el b/lisp/org-bibtex.el
> index cf7fc49..513519b 100644
> --- a/lisp/org-bibtex.el
> +++ b/lisp/org-bibtex.el
> @@ -320,11 +320,13 @@ This variable is relevant only if 
> `org-bibtex-export-tags-as-keywords` is t."
>                                 org-bibtex-prefix)
>                            (mapcar 
>                             (lambda (kv)
> -                             (when (string-match org-bibtex-prefix (car kv))
> -                               (cons (downcase (replace-regexp-in-string 
> -                                                org-bibtex-prefix ""
> -                                                (car kv)))
> -                                     (cdr kv))))
> +                             (let ((key (car kv)) (val (cdr kv)))
> +                               (when (and (string-match org-bibtex-prefix 
> key)
> +                                          (not (equalp 
> +                                                (concat org-bibtex-prefix 
> "TYPE") key)))
> +                                 (cons (downcase (replace-regexp-in-string 
> +                                                  org-bibtex-prefix "" key))
> +                                       val))))
>                             (org-entry-properties nil 'standard))
>                          (mapcar
>                           (lambda (field)