Browse Source

org-export: Fix filters returning a nil value

* contrib/lisp/org-export.el (org-export-filter-apply-functions): If
  a filter returns nil, return last non-nil value.
Nicolas Goaziou 12 years ago
parent
commit
4d789f4c30
1 changed files with 1 additions and 1 deletions
  1. 1 1
      contrib/lisp/org-export.el

+ 1 - 1
contrib/lisp/org-export.el

@@ -2449,7 +2449,7 @@ specified filters, if any, are called first."
   (catch 'exit
   (catch 'exit
     (dolist (filter filters value)
     (dolist (filter filters value)
       (let ((result (funcall filter value (plist-get info :back-end) info)))
       (let ((result (funcall filter value (plist-get info :back-end) info)))
-	(cond ((not value))
+	(cond ((not result) value)
 	      ((equal value "") (throw 'exit nil))
 	      ((equal value "") (throw 'exit nil))
 	      (t (setq value result)))))))
 	      (t (setq value result)))))))