Merge branch 'maint'

2013-11-03 11:38:28 +01:00 · 2013-11-03 11:38:28 +01:00 · d3756ccd84
parent e7397d3d97 d7379053c0
commit d3756ccd84
1 changed files with 1 additions and 2 deletions
--- a/lisp/ox.el
+++ b/lisp/ox.el
@ -3207,8 +3207,7 @@ locally for the subtree through node properties."
    (when options
      (let ((items
 	     (mapcar
-	      (lambda (opt)
-		(format "%s:%s" (car opt) (format "%s" (cdr opt))))
+	      #'(lambda (opt) (format "%s:%S" (car opt) (cdr opt)))
 	      (sort options (lambda (k1 k2) (string< (car k1) (car k2)))))))
 	(if subtreep
 	    (org-entry-put