 
 
   (cond ((executable-find "rg")
-         (validate-setq helm-ag-base-command "rg --vimgrep --no-heading --ignore-case"))
+         (vsetq helm-ag-base-command "rg --vimgrep --no-heading --ignore-case"))
         ((executable-find "pt")
-         (validate-setq helm-ag-base-command "pt -e --nocolor --nogroup"))
+         (vsetq helm-ag-base-command "pt -e --nocolor --nogroup"))
         ((executable-find "ag")
-         (validate-setq helm-ag-base-command "ag --nocolor --nogroup"))
+         (vsetq helm-ag-base-command "ag --nocolor --nogroup"))
         (t
-         (validate-setq helm-ag-base-command "ack --nocolor --nogroup"))))
+         (vsetq helm-ag-base-command "ack --nocolor --nogroup"))))
 
 ;;;; Helm END
 

    (interactive "P")
    (defvar ar/helm-ag--default-locaction nil)
    (when (or arg (not ar/helm-ag--default-locaction))
      (validate-setq ar/helm-ag--default-locaction
                     (read-directory-name "search in: " default-directory nil t)))
    (helm-do-ag ar/helm-ag--default-locaction))


  :config
  (use-package char-fold)

  (vsetq search-default-mode #'char-fold-to-regexp)

  ;; Prepopulate isearch with selectionn.
  ;; From http://www.reddit.com/r/emacs/comments/2amn1v/isearch_selected_text
