forked from mirrors/org-mode
org-agenda: Fix last commit
* lisp/org-agenda.el (org-agenda-get-deadlines): (org-agenda-get-scheduled): Fix last commit.
This commit is contained in:
parent
005aa06ed5
commit
b369da2339
|
@ -6055,7 +6055,7 @@ specification like [h]h:mm."
|
|||
(goto-char (point-min))
|
||||
(while (re-search-forward regexp nil t)
|
||||
(catch :skip
|
||||
(unless (org-at-planning-p) (throw :skip nil))
|
||||
(unless (save-match-data (org-at-planning-p)) (throw :skip nil))
|
||||
(org-agenda-skip)
|
||||
(setq s (match-string 1)
|
||||
txt nil
|
||||
|
@ -6201,7 +6201,7 @@ an hour specification like [h]h:mm."
|
|||
(goto-char (point-min))
|
||||
(while (re-search-forward regexp nil t)
|
||||
(catch :skip
|
||||
(unless (org-at-planning-p) (throw :skip nil))
|
||||
(unless (save-match-data (org-at-planning-p)) (throw :skip nil))
|
||||
(org-agenda-skip)
|
||||
(setq s (match-string 1)
|
||||
txt nil
|
||||
|
|
Loading…
Reference in a new issue