(defun dockerfile-read-image-name ()
  "Read a docker image name."
  (ido-completing-read "Image name: "
		       dockerfile-image-name-history 
		       nil nil nil nil
		       (car dockerfile-image-name-history)))

(bind-key "C-c C-c" #'dockerfile-build-buffer 'dockerfile-mode-map)