diff --git a/elisp/chronometrist.el b/elisp/chronometrist.el index bdc498b..b92a932 100644 --- a/elisp/chronometrist.el +++ b/elisp/chronometrist.el @@ -2202,10 +2202,10 @@ FILTER must be a filter specifier as described by (defun chronometrist-details-set-filter () "Prompt user for filter for current `chronometrist-details' buffer." (interactive) - (let* ((input (completing-read - (concat "Filter (blank, one or more keywords, " + (let* ((input (read-from-minibuffer + (concat "Filter (blank, a list of keywords, " "a plist, or a predicate): ") - nil nil nil + nil nil nil nil (pcase chronometrist-details-filter ('nil "") ((pred consp) (format "%S" chronometrist-details-filter))))) diff --git a/elisp/chronometrist.org b/elisp/chronometrist.org index fc5d26c..5fa89b2 100644 --- a/elisp/chronometrist.org +++ b/elisp/chronometrist.org @@ -3466,10 +3466,10 @@ FILTER must be a filter specifier as described by (defun chronometrist-details-set-filter () "Prompt user for filter for current `chronometrist-details' buffer." (interactive) - (let* ((input (completing-read - (concat "Filter (blank, one or more keywords, " + (let* ((input (read-from-minibuffer + (concat "Filter (blank, a list of keywords, " "a plist, or a predicate): ") - nil nil nil + nil nil nil nil (pcase chronometrist-details-filter ('nil "") ((pred consp) (format "%S" chronometrist-details-filter)))))