X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=blobdiff_plain;f=emacs%2Fnotmuch.el;fp=emacs%2Fnotmuch.el;h=ccece8118831b722fc28d8b9346ed6c93db35232;hp=f8c97c5df85db83a382f5e6b0a259b9135e4ee2f;hb=b614ea756316a18d90f5acfa352e82f2ffec8a67;hpb=692acdf9da2ca93d46259ca31780ed632c2975c4 diff --git a/emacs/notmuch.el b/emacs/notmuch.el index f8c97c5d..ccece811 100644 --- a/emacs/notmuch.el +++ b/emacs/notmuch.el @@ -232,8 +232,6 @@ there will be called at other points of notmuch execution." (defvar notmuch-search-target-thread) (defvar notmuch-search-target-line) -(defvar notmuch-search-disjunctive-regexp "\\<[oO][rR]\\>") - ;;; Movement (defun notmuch-search-scroll-up () @@ -1079,10 +1077,8 @@ default sort order is defined by `notmuch-search-oldest-first'." (defun notmuch-group-disjunctive-query-string (query-string) "Group query if it contains a complex expression. - -Enclose QUERY-STRING in parentheses if it matches -`notmuch-search-disjunctive-regexp'." - (if (string-match-p notmuch-search-disjunctive-regexp query-string) +Enclose QUERY-STRING in parentheses if contains \"OR\" operators." + (if (string-match-p "\\<[oO][rR]\\>" query-string) (concat "( " query-string " )") query-string))