|
@@ -13509,6 +13509,11 @@ Being in this list makes sure that they are offered for completion.")
|
|
|
org-property-end-re "\\)\n?")
|
|
|
"Matches an entire clock drawer.")
|
|
|
|
|
|
+(defsubst org-re-property (property)
|
|
|
+ "Return a regexp matching PROPERTY.
|
|
|
+Match group 1 will be set to the value "
|
|
|
+ (concat "^[ \t]*:" (regexp-quote property) ":[ \t]*\\(\\S-.*\\)"))
|
|
|
+
|
|
|
(defun org-property-action ()
|
|
|
"Do an action on properties."
|
|
|
(interactive)
|
|
@@ -13976,11 +13981,6 @@ formats in the current buffer."
|
|
|
|
|
|
(sort rtn (lambda (a b) (string< (upcase a) (upcase b))))))
|
|
|
|
|
|
-(defsubst org-re-property (property)
|
|
|
- "Return a regexp matching PROPERTY.
|
|
|
-Match group 1 will be set to the value "
|
|
|
- (concat "^[ \t]*:" (regexp-quote property) ":[ \t]*\\(\\S-.*\\)"))
|
|
|
-
|
|
|
(defun org-property-values (key)
|
|
|
"Return a list of all values of property KEY in the current buffer."
|
|
|
(save-excursion
|