Bläddra i källkod

org-agenda-get-timestamps: Improve performance

* lisp/org-agenda.el (org-agenda-get-timestamps): Pass element at
point to `org-agenda-skip'.
Ihor Radchenko 2 år sedan
förälder
incheckning
4657cea495
1 ändrade filer med 1 tillägg och 1 borttagningar
  1. 1 1
      lisp/org-agenda.el

+ 1 - 1
lisp/org-agenda.el

@@ -5794,7 +5794,7 @@ displayed in agenda view."
 			 (org-at-clock-log-p))
                     (not (org-at-timestamp-p 'agenda)))
 	    (throw :skip nil))
-	  (org-agenda-skip))
+	  (org-agenda-skip (org-element-at-point)))
 	(let* ((pos (match-beginning 0))
 	       (repeat (match-string 1))
 	       (sexp-entry (match-string 3))