   (interactive "P")
   (let* ((current-prefix-arg (not non-recursive))
          (helm-current-prefix-arg non-recursive))
-    (call-interactively 'helm-do-grep)))
+    (call-interactively #'helm-do-grep)))
 
 ;; ggtags code indexing.
 ;; https://github.com/leoliu/ggtags

                               (auto-dim-other-buffers-mode t))))

(use-package key-chord :ensure t)
(key-chord-define-global "jj" 'ace-jump-char-mode)
(key-chord-define-global "jk" 'ace-jump-char-mode)
(key-chord-define-global "jl" 'ace-jump-line-mode)
(key-chord-define-global "xx" 'execute-extended-command)
(key-chord-define-global "kk" 'kill-whole-line)

;; From http://emacsredux.com/blog/2013/04/28/switch-to-previous-buffer
(defun ar/switch-to-previous-buffer ()

 helm-M-x-requires-pattern 0     ; show all candidates when set to 0
 helm-boring-file-regexp-list
 '("\\.git$" "\\.hg$" "\\.svn$" "\\.CVS$" "\\._darcs$" "\\.la$" "\\.o$" "\\.i$") ; do not show these files in helm buffer

 helm-ff-file-name-history-use-recentf t
 helm-move-to-line-cycle-in-source t ; move to end or beginning of source
 ido-use-virtual-buffers t
