From c0d9ca7b1600ed24809b1796d9d9cc460e30392d Mon Sep 17 00:00:00 2001 From: Michael Heerdegen Date: Fri, 25 Mar 2016 01:54:23 +0100 Subject: [PATCH] Make el-search-pattern accept an optional NO-ERROR arg --- packages/el-search/el-search.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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))) -- 2.39.2