diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el
index 41b239fbef9..5e696c091b2 100644
--- a/lisp/arc-mode.el
+++ b/lisp/arc-mode.el
@@ -1956,6 +1956,7 @@ This doesn't recover lost files, it just undoes changes in the buffer itself."
 ;; -------------------------------------------------------------------------
 ;;; Section: Zip Archives
 
+(declare-function w32-get-console-codepage "w32proc.c")
 (defun archive-zip-summarize ()
   (goto-char (- (point-max) (- 22 18)))
   (search-backward-regexp "[P]K\005\006")