Fix code typo in 3af4949a
This commit is contained in:
parent
06aa1b615c
commit
8d8dfacfc6
|
@ -9474,7 +9474,7 @@ The refresh happens only for the current tree (not subtree)."
|
|||
(goto-char (point-min))
|
||||
(put-text-property (point) (point-max) 'org-category def-cat)
|
||||
(while (re-search-forward
|
||||
"^[ \t]*\\(#\\+CATEGORY:\\|*:CATEGORY:\\)\\(.*\\)" nil t)
|
||||
"^[ \t]*\\(#\\+CATEGORY:\\|:CATEGORY:\\)\\(.*\\)" nil t)
|
||||
(setq pos (match-end 0)
|
||||
optionp (equal (char-after (match-beginning 0)) ?#)
|
||||
cat (org-trim (match-string 2)))
|
||||
|
|
Loading…
Reference in New Issue