summaryrefslogtreecommitdiff
path: root/lisp/jka-compr.el
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2011-04-19 15:44:55 +0200
committerJuanma Barranquero <lekktu@gmail.com>2011-04-19 15:44:55 +0200
commit06b605171f1c9d8b42bd3326a243b8b03d2e4e58 (patch)
treee96c135042999136bf0e75d113aae306e51983e3 /lisp/jka-compr.el
parent04c569546ad52f6270d8fc6d4aa0750950a0ac05 (diff)
downloademacs-06b605171f1c9d8b42bd3326a243b8b03d2e4e58.tar.gz
lisp/*.el: Lexical-binding cleanup.
Diffstat (limited to 'lisp/jka-compr.el')
-rw-r--r--lisp/jka-compr.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/jka-compr.el b/lisp/jka-compr.el
index 6fb3ffdd719..37c9d40ec65 100644
--- a/lisp/jka-compr.el
+++ b/lisp/jka-compr.el
@@ -247,7 +247,7 @@ There should be no more than seven characters after the final `/'."
:type 'string
:group 'jka-compr)
-(defun jka-compr-make-temp-name (&optional local-copy)
+(defun jka-compr-make-temp-name (&optional _local-copy)
"This routine will return the name of a new file."
(make-temp-file jka-compr-temp-name-template))
@@ -572,7 +572,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)
"Documented as original."
(let* ((local-copy (jka-compr-file-local-copy file))