 (ke/create-compilation-function "deb-main-deploy")
 
 (require 'cc-mode)
+(require 'eshell)
 
 ;; Compilation
 (ke/bind-key-to-dired-and-c-map ke/default-prefix "k" 'ke/compile)

;; Set the bear command
(defun ke/generate-bear-command ()
  "Return a compatible bear command for the buffer"
  (let* ((full-path (ke/find-where-to-compile (if (eq major-mode 'dired-mode)
                                                  (dired-current-directory)
                                                (file-name-directory buffer-file-name)))))
    (concat ke/bear-path " -o " full-path "/compile_commands.json -- ")))

(defmacro ke/create-compilation-function (argument)

(ke/bind-key-to-dired-and-c-map ke/opinel-prefix "s" 'ke/opinel-get-services-status)
(ke/bind-key-to-dired-and-c-map ke/opinel-prefix "x" 'ke/run-opinel-remote-command)

;; Eshell
(defun eshell/ke-compile (argument)
  (ke/compile argument :pre-make (ke/generate-bear-command)))

(provide 'init-orange)
