浏览代码

fixup! org-agenda-get-sexps: Improve performance

Ihor Radchenko 2 年之前
父节点
当前提交
6a5f67567e
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      lisp/org-agenda.el

+ 1 - 1
lisp/org-agenda.el

@@ -5919,7 +5919,7 @@ displayed in agenda view."
 	(setq b (point))
 	(forward-sexp 1)
 	(setq sexp (buffer-substring b (point)))
-	(setq sexp-entry (if (org-looking-at "[ \t]*\\(\\S-.*\\)")
+	(setq sexp-entry (if (looking-at "[ \t]*\\(\\S-.*\\)")
                              (buffer-substring
                               (match-beginning 1)
                               (save-excursion