From f4f20ad5c830a169c7713cb99bfd4127c9c3b32d Mon Sep 17 00:00:00 2001 From: David Maus Date: Wed, 1 Jun 2011 06:47:03 +0200 Subject: [PATCH] Move defsubst `org-re-property' before its first use * org.el (org-re-property): Move before its first use. --- lisp/org.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 9562b6e9a..88976e225 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -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 -- 2.11.4.GIT