This commit is contained in:
Carsten Dominik 2008-10-01 12:44:50 +02:00
parent 802e1175fe
commit 0ec6021080

View file

@ -9816,7 +9816,7 @@ VALUES should be a list of strings. Spaces will be protected."
(org-entry-put pom property
(mapconcat 'org-entry-protect-space values " "))
(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)))
(defun org-entry-protect-space (s)