Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

* helm-locate.el: Fix docstrings.

* helm-match-plugin.el: Use optional arg of helm-set-case-fold-search.
  • Loading branch information...
commit d055c3e49024a140cae57627b188063c31b98efa 1 parent daeb588
@thierryvolpiatto thierryvolpiatto authored
Showing with 11 additions and 6 deletions.
  1. +10 −5 helm-locate.el
  2. +1 −1  helm-match-plugin.el
View
15 helm-locate.el
@@ -46,15 +46,20 @@ Note that this happen only when locate is launched with a prefix arg."
(defcustom helm-c-locate-command nil
"A list of arguments for locate program.
+Normally you should not have to modify this yourself.
+
If nil it will be calculated when `helm-locate' startup
with these default values for different systems:
-Gnu/linux: \"locate -i -r %s\"
-berkeley-unix: \"locate -i %s\"
-windows-nt: \"es -r %s\"
-Others: \"locate %s\"
+Gnu/linux: \"locate %s -r %s\"
+berkeley-unix: \"locate %s %s\"
+windows-nt: \"es %s -r %s\"
+Others: \"locate %s %s\"
This string will be passed to format so it should end with `%s'.
+The first format spec is used for the \"-i\" value of locate/es,
+So don't set it directly but use `helm-locate-case-fold-search'
+for this.
The \"-r\" option must be the last option."
:type 'string
:group 'helm-locate)
@@ -164,7 +169,7 @@ See `helm-locate-with-db' and `helm-locate'."
('gnu/linux "locate %s -r %s")
('berkeley-unix "locate %s %s")
('windows-nt "es %s -r %s")
- (t "locate %s")))))
+ (t "locate %s %s")))))
(defvar helm-file-name-history nil)
(defun helm-locate-with-db (&optional db initial-input default)
View
2  helm-match-plugin.el
@@ -378,7 +378,7 @@ e.g \"bar foo\" will match \"barfoo\" but not \"foobar\" contrarily to
(defun helm-mp-highlight-region (start end regexp face)
(save-excursion
(goto-char start)
- (let ((case-fold-search (helm-set-case-fold-search)) me)
+ (let ((case-fold-search (helm-set-case-fold-search regexp)) me)
(while (and (setq me (re-search-forward regexp nil t))
(< (point) end)
(< 0 (- (match-end 0) (match-beginning 0))))
Please sign in to comment.
Something went wrong with that request. Please try again.