We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 2634280 commit c596ac7Copy full SHA for c596ac7
src/top/utop.el
@@ -1236,8 +1236,8 @@ Special keys for utop:
1236
(declare-function company-begin-backend "ext:company")
1237
(declare-function company-grab-symbol-cons "ext:company")
1238
1239
-(defun utop-company-backend (command &optional _arg &rest ignored)
1240
- "company backend for utop completions"
+(defun utop-company-backend (command &optional _arg &rest _ignored)
+ "Perform an action determined by COMMAND."
1241
(interactive (list 'interactive))
1242
(pcase command
1243
('interactive (company-begin-backend 'utop-company-backend))
0 commit comments