Function: cider-repl-history-read-regexp

cider-repl-history-read-regexp is a byte-compiled function defined in cider-repl-history.el.

Signature

(cider-repl-history-read-regexp MSG USE-DEFAULT-P)

Documentation

Get a regular expression from the user.

Prompts with MSG; previous entry is default if USE-DEFAULT-P.

Source Code

;; Defined in ~/.emacs.d/elpa/cider-20260414.1619/cider-repl-history.el
(defun cider-repl-history-read-regexp (msg use-default-p)
  "Get a regular expression from the user.
Prompts with MSG; previous entry is default if USE-DEFAULT-P."
  (let* ((default (car regexp-history))
         (prompt (if (and default use-default-p)
                     (format "%s for regexp (default `%s'): "
                             msg
                             default)
                   (format "%s (regexp): " msg)))
         (input
          (read-from-minibuffer prompt nil nil nil 'regexp-history
                                (if use-default-p nil default))))
    (if (equal input "")
        (if use-default-p default nil)
      input)))