* lisp/jka-compr.el (jka-compr-load): Add MUST-SUFFIX argument.

diff --git a/lisp/jka-compr.el b/lisp/jka-compr.el
index 8db78ebcda057a98e424aa439bf814c162e7fb82..420d83ab1f1a58977c7beb1bba84f7f1e9457e3d 100644 (file)
--- a/lisp/jka-compr.el
+++ b/lisp/jka-compr.el
@@ -598,7 +598,7 @@ There should be no more than seven characters after the final `/'."
 
 
 ;; Support for loading compressed files.
-(defun jka-compr-load (file &optional noerror nomessage _nosuffix)
+(defun jka-compr-load (file &optional noerror nomessage _nosuffix _must-suffix)
   "Documented as original."
 
   (let* ((local-copy (jka-compr-file-local-copy file))