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.
This commit is contained in:
Nicolas Goaziou 2012-08-27 14:34:39 +02:00
parent dc116caf10
commit 4d789f4c30
1 changed files with 1 additions and 1 deletions

View File

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