diff --git a/racket-describe.el b/racket-describe.el index fd52556a..76e54798 100644 --- a/racket-describe.el +++ b/racket-describe.el @@ -646,12 +646,13 @@ browser program -- are given `racket-ext-link-face'. (lambda (v) (apply racket-doc-index-predicate-function (get-text-property 0 'racket-affix v)))) + (prompt "Search Racket documentation: ") (require-match t) (initial-input nil) (history 'racket-identifier) (default (racket--thing-at-point 'symbol t)) (history-add-new-input nil)) ;we'll do below - (when-let (str (completing-read "Describe: " + (when-let (str (completing-read prompt collection predicate require-match