andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Quieten ses.el compilation

Browse source 
* lisp/ses.el (ses--edit-cell-completion-at-point-function)
(ses--read-printer-completion-at-point-function):
Mark unused arguments.
This commit is contained in:
Glenn Morris 2018-03-01 20:28:03 -05:00
parent 2038b6a1dd
commit 7995f44bce
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ses.el
View file

@ -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)))