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


(defmacro ke/with-compilation-path (&rest body)
  (let ((current-path (getenv "PATH")))
    (ke/setup-path)
    `(unwind-protect
         (progn ,@body)
       (setenv "PATH" ,current-path))))

(defun ke/notify (text)
  (interactive "sInsert the text of the notification: ")

       (ke/compile ,argument))))

(defmacro ke/bind-key-to-dired-and-c-map (prefix key symbol)
  "Binds the same key to both dired and c-mode"
  `(progn
     (define-key dired-mode-map (concat ,prefix ,key) ,symbol)
     (define-key c-mode-base-map (concat ,prefix ,key) ,symbol)))

(ke/create-compilation-function "clean")
(ke/create-compilation-function "all")
