 (helm-mode 1)
 
 (defun ar/helm-do-grep-recursive (&optional non-recursive)
-  "Like `helm-do-grep', but greps recursively by default."
+  "Like `helm-do-grep', but greps recursively by default.
+Optional argument NON-RECURSIVE to shallow-search."
   (interactive "P")
   (let* ((current-prefix-arg (not non-recursive))
          (helm-current-prefix-arg non-recursive))

                        (make-glyph-code ?|))

(defun ar/split-camel-region ()
  "Splits camelCaseWord to camel case word"
  (interactive)
  (progn (replace-regexp "\\([A-Z]\\)" " \\1" nil (region-beginning)(region-end))
         (downcase-region (region-beginning)(region-end))))

(setq shell-pop-window-position "bottom")

(defun ar/disable-non-prog-minor-modes ()
  "Disable non-programming minor modes, likely slowing things down."
  (centered-cursor-mode -1)
  (linum-mode -1))

