 (defvar mymake-compile-frame nil "Use a new frame when compiling.")
 (defvar mymake-compilation-w 100 "Compilation window width")
 (defvar mymake-compilation-h 83 "Compilation window height")
-(defvar mymake-compilation-adjust 30 "Compilation window adjustment")
-
+(defvar mymake-compilation-adjust 10 "Compilation window adjustment")
 
 ;; Keybindings
 (global-set-key (kbd "M-p") 'mymake-compile)

(global-set-key (kbd "C-c C-k") 'mymake-kill)
(global-set-key (kbd "C-c C-r") 'mymake-release)

;; Bindable functions

;; Compile using buildconfig (if it exists). Command line overridable by passing extra parameter.
(defun mymake-compile (force)
  (interactive "P")
  (mymake-run :force force))

;; Clean project.
(defun mymake-clean ()
  (interactive)
  (mymake-run :prepend "-c"))

;; Compile in release mode.
(defun mymake-release (force)
  (interactive "P")
  (mymake-run :force force :replace "release"))

;; Compile in release mode for x64.
(defun mymake-release-64 (force)
  (interactive "P")
  (mymake-run :force force :replace "release 64"))

;; Implementations.


    (progn
      (if (eq mymake-compilation-frame 'nil)
	  (mymake-create-compilation-frame)
	(if (not (frame-live-p mymake-compilation-frame))
	    (mymake-create-compilation-frame)))
      (window--display-buffer buffer mymake-compilation-window 'frame alist)
      mymake-compilation-window)))
