org.el: Fix indentation of a property line starting at the beginning of a line.

* org.el (org-indent-line): Fix indentation of a property line
starting at the beginning of a line.
This commit is contained in:
Bastien Guerry 2012-07-26 08:09:22 +02:00
parent 2dfa6aaf79
commit 0b54bce2c4

View file

@ -20594,7 +20594,7 @@ If point is in an inline task, mark that task instead."
(setq column (current-column))
(beginning-of-line 1)
(if (looking-at
"\\([ \t]+\\)\\(:[-_0-9a-zA-Z]+:\\)[ \t]*\\(\\S-.*\\(\\S-\\|$\\)\\)")
"\\([ \t]*\\)\\(:[-_0-9a-zA-Z]+:\\)[ \t]*\\(\\S-.*\\(\\S-\\|$\\)\\)")
(replace-match (concat (match-string 1)
(format org-property-format
(match-string 2) (match-string 3)))