Skip to content

Commit cd0a2d7

Browse files
committed
Add missing package-version property
1 parent 87506dc commit cd0a2d7

File tree

1 file changed

+7
-6
lines changed

1 file changed

+7
-6
lines changed

cider-apropos.el

Lines changed: 7 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -50,7 +50,8 @@ contains only one action key, the associated action function will be
5050
applied automatically. An action function can be any function that receives
5151
the symbol found by the apropos search as argument."
5252
:type '(alist :key-type string :value-type function)
53-
:group 'cider)
53+
:group 'cider
54+
:package-version '(cider . "0.13.0"))
5455

5556
(defun cider-apropos-doc (button)
5657
"Display documentation for the symbol represented at BUTTON."
@@ -89,8 +90,8 @@ and be case-sensitive (based on CASE-SENSITIVE-P)."
8990
(let* ((label (capitalize (if (string= type "variable") "var" type)))
9091
(help (concat "Display doc for this " (downcase label))))
9192
(cider-propertize-region (list 'apropos-symbol name
92-
'action 'cider-apropos-doc
93-
'help-echo help)
93+
'action 'cider-apropos-doc
94+
'help-echo help)
9495
(insert-text-button name 'type 'apropos-symbol)
9596
(insert "\n ")
9697
(insert-text-button label 'type (intern (concat "apropos-" type)))
@@ -152,9 +153,9 @@ optionally search doc strings (based on DOCS-P), include private vars
152153
"Apply selected action on SYMBOL."
153154
(let* ((first-action-key (car (car cider-apropos-actions)))
154155
(action-key (if (= 1 (length cider-apropos-actions))
155-
first-action-key
156-
(completing-read (format "Choose action to apply to `%s`: " symbol)
157-
cider-apropos-actions nil nil nil nil first-action-key)))
156+
first-action-key
157+
(completing-read (format "Choose action to apply to `%s`: " symbol)
158+
cider-apropos-actions nil nil nil nil first-action-key)))
158159
(action-fn (cdr (assoc action-key cider-apropos-actions))))
159160
(if action-fn
160161
(funcall action-fn symbol)

0 commit comments

Comments
 (0)