Fix time regexp in org-get-entries-from-diary

[Thomas Fitzsimmons]

Dear Org developers,

I filed a bug report in Emacs debbugs, but probably should have sent it
here instead:

   http://debbugs.gnu.org/cgi/bugreport.cgi?bug=38599

The attached patch appears to fix the bug.  Does it look OK?

Thanks,
Thomas

>From 6102f07d61ee5d128701b7d3799b2e278aa79248 Mon Sep 17 00:00:00 2001
From: Thomas Fitzsimmons <address@hidden>
Date: Sun, 15 Dec 2019 12:20:05 -0500
Subject: [PATCH] Fix time regexp in org-get-entries-from-diary

* lisp/org-agenda.el (org-get-entries-from-diary): Make time regular
expression more precise.

Reported-by: Justin Abrahms <address@hidden>
---
 lisp/org-agenda.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 6391e0e9c..f07c86b9a 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -5135,6 +5135,7 @@ (defun org-get-entries-from-diary (date)
          (cons 'org-diary-default-entry diary-list-entries-hook))
         (diary-file-name-prefix nil) ; turn this feature off
         (diary-modify-entry-list-string-function 
'org-modify-diary-entry-string)
+        (diary-time-regexp (concat "^" diary-time-regexp))
         entries
         (org-disable-agenda-to-diary t))
     (save-excursion
-- 
2.24.1