Bläddra i källkod

org.el (org-entry-add-to-multivalued-property): Add the new value by appending it at the end of the line

* org.el (org-entry-add-to-multivalued-property): Add the new
value by appending it at the end of the line.

Thanks to Thorsten Jolitz for a preliminary patch for this.
Bastien Guerry 12 år sedan
förälder
incheckning
1ab084ba73
1 ändrade filer med 1 tillägg och 1 borttagningar
  1. 1 1
      lisp/org.el

+ 1 - 1
lisp/org.el

@@ -15098,7 +15098,7 @@ an empty drawer to delete."
 	 (values (and old (org-split-string old "[ \t]"))))
     (setq value (org-entry-protect-space value))
     (unless (member value values)
-      (setq values (cons value values))
+      (setq values (append values (list value)))
       (org-entry-put pom property
 		     (mapconcat 'identity values " ")))))