From 02add7ab069922db7558d4596c324092f64a2b18 Mon Sep 17 00:00:00 2001 From: Michael Heerdegen Date: Sun, 25 Oct 2015 00:02:17 +0200 Subject: [PATCH] give feedback in the echo area again --- packages/el-search/el-search.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el index 091ec51d1..e2f1b5abb 100644 --- a/packages/el-search/el-search.el +++ b/packages/el-search/el-search.el @@ -156,9 +156,6 @@ ;; ;; TODO: ;; -;; - display something useful in the echo area. or leave it for being -;; able to `message' in the pattern? -;; ;; - implement backward searching ;; ;; - improve docstrings @@ -457,9 +454,11 @@ return nil (no error)." ;; wrap search (goto-char (point-min)))) (setq el-search-success nil) + (message "%s" (substitute-command-keys "Type \\[el-search-pattern] to repeat")) (when (condition-case nil (el-search--search-pattern pattern) - (end-of-buffer (message "No match") + (end-of-buffer (message "No match; %s" + (substitute-command-keys "Type \\[el-search-pattern] to wrap")) (goto-char opoint) (el-search-hl-remove) (ding) -- 2.39.2