diff --git a/lisp/ol-docview.el b/lisp/ol-docview.el
index fcde863aa..bb9b34a17 100644
--- a/lisp/ol-docview.el
+++ b/lisp/ol-docview.el
@@ -57,17 +57,17 @@
:export #'org-docview-export
:store #'org-docview-store-link)
-(defun org-docview-export (link description format)
- "Export a docview link from Org files."
+(defun org-docview-export (link description backend _info)
+ "Export a docview LINK with DESCRIPTION for BACKEND."
(let ((path (if (string-match "\\(.+\\)::.+" link) (match-string 1 link)
link))
(desc (or description link)))
(when (stringp path)
(setq path (expand-file-name path))
(cond
- ((eq format 'html) (format "%s" path desc))
- ((eq format 'latex) (format "\\href{%s}{%s}" path desc))
- ((eq format 'ascii) (format "%s (%s)" desc path))
+ ((eq backend 'html) (format "%s" path desc))
+ ((eq backend 'latex) (format "\\href{%s}{%s}" path desc))
+ ((eq backend 'ascii) (format "%s (%s)" desc path))
(t path)))))
(defun org-docview-open (link _)