; Pacify recent shorthand unused lexarg warnings.

diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index 48859585bc22758db9eb08c0fc1acb0b408fce65..13da7f99a389d13a0324f847041bc135a94aabc5 100644 (file)
--- a/lisp/minibuffer.el
+++ b/lisp/minibuffer.el
@@ -4116,7 +4116,7 @@ which is at the core of flex logic.  The extra
                                           (+ (- point (length short))
                                              (length long))))))
 
-(defun completion-shorthand-all-completions (string table pred _point)
+(defun completion-shorthand-all-completions (_string _table _pred _point)
   ;; no-op: For now, we don't want shorthands to list all the possible
   ;; locally active longhands.  For the completion categories where
   ;; this style is active, it could hide other more interesting