diff --git a/lisp/ox-html.el b/lisp/ox-html.el
index 293aec38f..a3c68527e 100644
--- a/lisp/ox-html.el
+++ b/lisp/ox-html.el
@@ -2465,7 +2465,7 @@ standalone images, do the following.
 DESC is the description part of the link, or the empty string.
 INFO is a plist holding contextual information.  See
 `org-export-data'."
-  (let* ((--link-org-files-as-html-maybe
+  (let* ((link-org-files-as-html-maybe
 	  (function
 	   (lambda (raw-path info)
 	     "Treat links to `file.org' as links to `file.html', if needed.
@@ -2488,7 +2488,7 @@ INFO is a plist holding contextual information.  See
 	   ((string= type "file")
 	    ;; Treat links to ".org" files as ".html", if needed.
 	    (setq raw-path
-		  (funcall --link-org-files-as-html-maybe raw-path info))
+		  (funcall link-org-files-as-html-maybe raw-path info))
 	    ;; If file path is absolute, prepend it with protocol
 	    ;; component - "file://".
 	    (when (file-name-absolute-p raw-path)
@@ -2556,7 +2556,7 @@ INFO is a plist holding contextual information.  See
 	  (plain-text
 	   (let ((fragment (concat "ID-" path))
 		 ;; Treat links to ".org" files as ".html", if needed.
-		 (path (funcall --link-org-files-as-html-maybe
+		 (path (funcall link-org-files-as-html-maybe
 				destination info)))
 	     (format "<a href=\"%s#%s\"%s>%s</a>"
 		     path fragment attributes (or desc destination))))