浏览代码

Merge branch 'maint'

Nicolas Goaziou 10 年之前
父节点
当前提交
fac4677e51
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      lisp/ox.el

+ 1 - 1
lisp/ox.el

@@ -5843,7 +5843,7 @@ and `org-export-to-file' for more specialized functions."
            ;; Register running process in stack.
            (org-export-add-to-stack (get-buffer ,proc-buffer) nil ,process)
            ;; Set-up sentinel in order to catch results.
-           (let ((handler ,fun))
+           (let ((handler ',fun))
              (set-process-sentinel
               ,process
               `(lambda (p status)