소스 검색

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 년 전
부모
커밋
1ab084ba73
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  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 " ")))))