            ("C-M-x" . lua-send-proc)
            ("M-." . dumb-jump-go)
            ("M-," . 'dumb-jump-back))
-
-(when *rtags*
-  (require 'rtags)
-  (setq rtags-display-result-backend 'ivy)
-  (setq rtags-imenu-syntax-highlighting t))
-
-(defun my-imenu ()
-  (interactive)
-  (if (and *rtags* (rtags-is-indexed))
-      (rtags-imenu)
-    (imenu)))     ;; TODO: counsel-imenu-in-all-buffers -> imenu-anywhere (ivy)
 
 (defun my-non-special-modes-setup ()
   (setq indicate-empty-lines t)

;; see
;; http://stackoverflow.com/questions/15489319/how-can-i-skip-in-file-included-from-in-emacs-c-compilation-mode
(setf (nth 5 (assoc 'gcc-include compilation-error-regexp-alist-alist)) 0)

(defun my-c-mode-common-hook ()
  (when *rtags*
    (add-to-list 'company-backends 'company-rtags))
  (setq-local fill-column 90))

(add-hook 'c-mode-common-hook 'my-c-mode-common-hook)

(require 'cff)
(add-to-list 'cff-source-regexps '("\\.m$" . (lambda (base) (concat base ".m"))))

(require 'clang-format)
(fset 'c-indent-region 'clang-format-region)

(bind-keys :map c-mode-base-map
           ("<C-tab>" . company-complete)
           ("C-M-\\" . clang-format-region)
           ("C-i" . clang-format)
           ("M-." . dumb-jump-go)
           ("M-," . dumb-jump-back)
           ("M-o" . cff-find-other-file))

(setq inf-clojure-program '("localhost" . 9999))   ;; "planck"
(add-hook 'clojure-mode-hook 'inf-clojure-minor-mode)
