diff options
author | Glenn Morris <rgm@gnu.org> | 2018-03-01 20:28:03 -0500 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2018-03-01 20:28:03 -0500 |
commit | 7995f44bced3b9e97e52efa5704125bd5ca1f46e (patch) | |
tree | 344db019261f9042345a9817725f6387efa9c8eb /lisp/ses.el | |
parent | 2038b6a1dd2a4a27ac363a0901276255c37e79d8 (diff) | |
download | emacs-7995f44bced3b9e97e52efa5704125bd5ca1f46e.tar.gz |
Quieten ses.el compilation
* lisp/ses.el (ses--edit-cell-completion-at-point-function)
(ses--read-printer-completion-at-point-function):
Mark unused arguments.
Diffstat (limited to 'lisp/ses.el')
-rw-r--r-- | lisp/ses.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/ses.el b/lisp/ses.el index 9097bf5d819..bcf8bdb6368 100644 --- a/lisp/ses.el +++ b/lisp/ses.el @@ -2495,7 +2495,7 @@ to are recalculated first." prefix-length) (when (and prefix (null (string= prefix ""))) (setq prefix-length (length prefix)) - (maphash (lambda (key val) + (maphash (lambda (key _val) (let ((key-name (symbol-name key))) (when (and (>= (length key-name) prefix-length) (string= prefix (substring key-name 0 prefix-length))) @@ -2648,7 +2648,7 @@ cells." prefix-length) (when prefix (setq prefix-length (length prefix)) - (maphash (lambda (key val) + (maphash (lambda (key _val) (let ((key-name (symbol-name key))) (when (and (>= (length key-name) prefix-length) (string= prefix (substring key-name 0 prefix-length))) |