From: Michael Heerdegen <michael_heerdegen@web.de>
Date: Fri, 25 Mar 2016 00:54:23 +0000 (+0100)
Subject: Make el-search-pattern accept an optional NO-ERROR arg
X-Git-Url: https://code.delx.au/gnu-emacs-elpa/commitdiff_plain/c0d9ca7b1600ed24809b1796d9d9cc460e30392d?ds=sidebyside

Make el-search-pattern accept an optional NO-ERROR arg
---

diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index de219de9a..4afcd9107 100644
--- a/packages/el-search/el-search.el
+++ b/packages/el-search/el-search.el
@@ -937,7 +937,7 @@ You need `diff-hl-mode' turned on, provided by the library
 ;;;; Core functions
 
 ;;;###autoload
-(defun el-search-pattern (pattern)
+(defun el-search-pattern (pattern &optional no-error)
   "Start new or resume last elisp search.
 
 Search current buffer for expressions that are matched by `pcase'
@@ -964,7 +964,7 @@ The following additional pattern types are currently defined:"
                            (error "Please don't forget the quote when searching for a symbol"))
                          (el-search--wrap-pattern pattern)))))
   (if (not (called-interactively-p 'any))
-      (el-search--search-pattern pattern)
+      (el-search--search-pattern pattern no-error)
     (setq this-command 'el-search-pattern) ;in case we come from isearch
     (setq el-search-current-pattern pattern)
     (let ((opoint (point)))