emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 02add7a 15/22: give feedback in the echo area again


From: Michael Heerdegen
Subject: [elpa] master 02add7a 15/22: give feedback in the echo area again
Date: Sat, 31 Oct 2015 18:41:41 +0000

branch: master
commit 02add7ab069922db7558d4596c324092f64a2b18
Author: Michael Heerdegen <address@hidden>
Commit: Michael Heerdegen <address@hidden>

    give feedback in the echo area again
---
 packages/el-search/el-search.el |    7 +++----
 1 files changed, 3 insertions(+), 4 deletions(-)

diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index 091ec51..e2f1b5a 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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]