From b7d0b16a480d6dddec71f029f8057c69590ac571 Mon Sep 17 00:00:00 2001 From: Syohei YOSHIDA Date: Wed, 22 Apr 2015 16:12:08 +0900 Subject: Use string-match-p/looking-at-p as possible --- cider-selector.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'cider-selector.el') diff --git a/cider-selector.el b/cider-selector.el index 9c77f658..162e3a6a 100644 --- a/cider-selector.el +++ b/cider-selector.el @@ -50,7 +50,7 @@ DESCRIPTION is a one-line description of what the key selects.") Only considers buffers that are not already visible." (cl-loop for buffer in (buffer-list) when (and (with-current-buffer buffer (eq major-mode mode)) - (not (string-match "^ " (buffer-name buffer))) + (not (string-match-p "^ " (buffer-name buffer))) (null (get-buffer-window buffer 'visible))) return buffer finally (error "Can't find unshown buffer in %S" mode))) -- cgit v1.2.3