Bug fix done keywords.

Was reorted by Bernt Hansen.
This commit is contained in:
Carsten Dominik 2008-02-21 05:19:50 +01:00
parent c3f63bddec
commit 580d29e93b

2
org.el
View file

@ -4670,7 +4670,7 @@ This will extract info from a string like \"WAIT(w@/!)\"."
(defun org-remove-keyword-keys (list) (defun org-remove-keyword-keys (list)
(mapcar (lambda (x) (mapcar (lambda (x)
(if (string-match "(..?)$" x) (if (string-match "(.*)$" x)
(substring x 0 (match-beginning 0)) (substring x 0 (match-beginning 0))
x)) x))
list)) list))