 	(rcmd "docker zip"))
     (setq version (read-string "Version: "))
     (setq path (read-directory-name "Path: "))
-    (setq platform (ido-completing-read "Platform: " rsuite-docker-platforms))
+    (setq platform (ido-completing-read "Platform: " rsuite/docker-platforms))
     (setq rcmd (concat rcmd
 		       " --dest=" path
 		       " --platform=" platform))

      )
    curr-dir))


(defun rsuite-proj-start ()
  "Start project."

    
    (setq version (read-string "Version: "))
    (setq tag (read-string "Tag: "))
    (setq platform (ido-completing-read "Platform: " rsuite/docker-platforms))
    (setq rcmd (concat rcmd
		       " --tag=" tag
		       " --platform=" platform))
