Merge branch 'maint'

This commit is contained in:
Nicolas Goaziou 2014-10-10 11:11:06 +02:00
commit fac4677e51

View file

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