This commit is contained in:
Carsten Dominik 2008-10-01 12:44:50 +02:00
parent 802e1175fe
commit 0ec6021080
1 changed files with 1 additions and 1 deletions

View File

@ -9816,7 +9816,7 @@ VALUES should be a list of strings. Spaces will be protected."
(org-entry-put pom property (org-entry-put pom property
(mapconcat 'org-entry-protect-space values " ")) (mapconcat 'org-entry-protect-space values " "))
(let* ((value (org-entry-get pom property)) (let* ((value (org-entry-get pom property))
(values (and old (org-split-string value "[ \t]")))) (values (and value (org-split-string value "[ \t]"))))
(mapcar 'org-entry-restore-space values))) (mapcar 'org-entry-restore-space values)))
(defun org-entry-protect-space (s) (defun org-entry-protect-space (s)