routine "org-vm-select-message" in "ol-vm.el"

routine "org-vm-select-message" in "ol-vm.el"

[Alan Wehmann]

[-- Attachment #1: Type: text/plain, Size: 1144 bytes --]

I am using:

Org mode version 9.4.6 (9.4.6-2-g21eb69-elpa @ /Users/alanwehmann/.emacs.d/elpa/org-20210524/)
GNU Emacs 27.1 (build 1, x86_64-apple-darwin18.7.0, NS appkit-1671.60 Version 10.14.6 (Build 18G95)) of 2020-08-12
VM version is: 8.2.0b
org-plus-contrib-20210531 package

I have found emails (in VM) which have e.g. the following lines in them:

Message-ID:
 <CH0PR20MB4028E04BA1B8CE21C1F57A3BAE2D9@CH0PR20MB4028.namprd20.prod.outlook.com>

i.e. a line break after the colon.

This cannot be matched by the following code from function "org-vm-select-message" found in "ol-vm.el" from "org-plus-contrib-20210531":

    (if (not (re-search-forward
              (concat "^" "message-id: *" (regexp-quote message-id))))
        (error "Could not find the specified message in this folder"))

The following change to this code works:

    (if (not (re-search-forward
              (concat "^" "message-id:\\s-*" (regexp-quote message-id))))
        (error "Could not find the specified message in this folder"))

since "\\s-" matches white space, including line breaks.

Alan Wehmann
alan.wehmann@gmail.com


[-- Attachment #2: Type: text/html, Size: 2753 bytes --]

Re: routine "org-vm-select-message" in "ol-vm.el"

[Bastien]

Hi Alan,

Alan Wehmann <alan.wehmann@gmail.com> writes:

> The following change to this code works:
>
>     (if (not (re-search-forward
>               (concat "^" "message-id:\\s-*" (regexp-quote message-id))))
>         (error "Could not find the specified message in this folder"))
>
> since "\\s-" matches white space, including line breaks.

thanks, fixed in org-contrib:
https://git.sr.ht/~bzg/org-contrib/commit/8bed20b1440f4fe26505eb6107dd52038ec993fd

-- 
 Bastien