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

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

[nongnu] elpa/helm 80a37c6d5e 5/6: Add a variable to controls diacritics


From: ELPA Syncer
Subject: [nongnu] elpa/helm 80a37c6d5e 5/6: Add a variable to controls diacritics usage in helm-occur
Date: Thu, 12 May 2022 04:58:31 -0400 (EDT)

branch: elpa/helm
commit 80a37c6d5e5960a3b4a54037377625b47311b649
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Add a variable to controls diacritics usage in helm-occur
---
 helm-occur.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/helm-occur.el b/helm-occur.el
index bf60561dfd..c4ec05fcc4 100644
--- a/helm-occur.el
+++ b/helm-occur.el
@@ -130,6 +130,11 @@ This happen only in `helm-source-occur' which is always 
related to
 `current-buffer'."
   :group 'helm-regexp
   :type 'boolean)
+
+(defcustom helm-occur-ignore-diacritics nil
+  "When non nil helm-occur will ignore diacritics in patterns."
+  :group 'helm-regexp
+  :type 'boolean)
 
 (defface helm-moccur-buffer
   `((t ,@(and (>= emacs-major-version 27) '(:extend t))
@@ -290,7 +295,7 @@ engine beeing completely different and also much faster."
                (when (string-match helm-occur--search-buffer-regexp
                                    candidate)
                  (match-string 2 candidate)))
-             :diacritics t
+             :diacritics helm-occur-ignore-diacritics
              :search (lambda (pattern)
                        (when (string-match "\\`\\^\\([^ ]*\\)" pattern)
                          (setq pattern (concat "^[0-9]* \\{1\\}" (match-string 
1 pattern))))



reply via email to

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