branch: elpa/helm
commit 80a37c6d5e5960a3b4a54037377625b47311b649
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@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))))
