瀏覽代碼

Fix two regular expressions

* lisp/org.el (org-property-drawer-re): Make less greedy to avoid
overreaching matches.
(org-clock-drawer-re): Make less greedy to avoid
overreaching matches.
Carsten Dominik 11 年之前
父節點
當前提交
08d9c1b42c
共有 1 個文件被更改,包括 2 次插入2 次删除
  1. 2 2
      lisp/org.el

+ 2 - 2
lisp/org.el

@@ -15051,12 +15051,12 @@ Being in this list makes sure that they are offered for completion.")
   "Regular expression matching the first line of a property drawer.")
 
 (defconst org-property-drawer-re
-  (concat "\\(" org-property-start-re "\\)[^\000]*\\("
+  (concat "\\(" org-property-start-re "\\)[^\000]*?\\("
 	  org-property-end-re "\\)\n?")
   "Matches an entire property drawer.")
 
 (defconst org-clock-drawer-re
-  (concat "\\(" org-clock-drawer-start-re "\\)[^\000]*\\("
+  (concat "\\(" org-clock-drawer-start-re "\\)[^\000]*?\\("
 	  org-property-end-re "\\)\n?")
   "Matches an entire clock drawer.")