Fix commit 41882a99
authorBastien Guerry <bzg@altern.org>
Wed, 27 Feb 2013 07:46:26 +0000 (08:46 +0100)
committerBastien Guerry <bzg@altern.org>
Wed, 27 Feb 2013 07:46:26 +0000 (08:46 +0100)
Thanks to Tassilo Horn for reporting this.

lisp/org-macs.el

index 470bcb3..57b2d8a 100644 (file)
@@ -263,7 +263,8 @@ in `org-rm-props'."
   (cond ((eq key t) t)
        ((eq option t) t)
        ((assoc key option) (cdr (assoc key option)))
-       (t (delq nil (cdr (assq 'default option))))))
+       (t (let ((r (cdr (assq 'default option))))
+            (if (listp r) (delq nil r) r)))))
 
 (defsubst org-check-external-command (cmd &optional use no-error)
   "Check if external program CMD for USE exists, error if not.