diff options
| author | Glenn Morris | 2018-03-01 20:28:03 -0500 |
|---|---|---|
| committer | Glenn Morris | 2018-03-01 20:28:03 -0500 |
| commit | 7995f44bced3b9e97e52efa5704125bd5ca1f46e (patch) | |
| tree | 344db019261f9042345a9817725f6387efa9c8eb | |
| parent | 2038b6a1dd2a4a27ac363a0901276255c37e79d8 (diff) | |
| download | emacs-7995f44bced3b9e97e52efa5704125bd5ca1f46e.tar.gz emacs-7995f44bced3b9e97e52efa5704125bd5ca1f46e.zip | |
Quieten ses.el compilation
* lisp/ses.el (ses--edit-cell-completion-at-point-function)
(ses--read-printer-completion-at-point-function):
Mark unused arguments.
| -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." | |||
| 2495 | prefix-length) | 2495 | prefix-length) |
| 2496 | (when (and prefix (null (string= prefix ""))) | 2496 | (when (and prefix (null (string= prefix ""))) |
| 2497 | (setq prefix-length (length prefix)) | 2497 | (setq prefix-length (length prefix)) |
| 2498 | (maphash (lambda (key val) | 2498 | (maphash (lambda (key _val) |
| 2499 | (let ((key-name (symbol-name key))) | 2499 | (let ((key-name (symbol-name key))) |
| 2500 | (when (and (>= (length key-name) prefix-length) | 2500 | (when (and (>= (length key-name) prefix-length) |
| 2501 | (string= prefix (substring key-name 0 prefix-length))) | 2501 | (string= prefix (substring key-name 0 prefix-length))) |
| @@ -2648,7 +2648,7 @@ cells." | |||
| 2648 | prefix-length) | 2648 | prefix-length) |
| 2649 | (when prefix | 2649 | (when prefix |
| 2650 | (setq prefix-length (length prefix)) | 2650 | (setq prefix-length (length prefix)) |
| 2651 | (maphash (lambda (key val) | 2651 | (maphash (lambda (key _val) |
| 2652 | (let ((key-name (symbol-name key))) | 2652 | (let ((key-name (symbol-name key))) |
| 2653 | (when (and (>= (length key-name) prefix-length) | 2653 | (when (and (>= (length key-name) prefix-length) |
| 2654 | (string= prefix (substring key-name 0 prefix-length))) | 2654 | (string= prefix (substring key-name 0 prefix-length))) |