Merge pull request #271 from vito/entrypoints

Support configuring `ENTRYPOINT` and `CMD`

bass/bass.bass

@@ -10,7 +10,7 @@
 (defn checkout [sha]
   (git:github/vito/bass/sha/ sha))
 
-(provide [subgit]
+(provide [subgit git-submodules]
   ; produces a fresh checkout of the last commit that affected the given paths
   (defn subgit [src & paths]
     (git:checkout (remote src) (latest-commit src paths)))
@@ -27,19 +27,7 @@
     (git-out src ($ git remote get-url origin)))
 
   (defn latest-commit [src paths]
-    (git-out src ($ git log -n1 "--pretty=format:%H" -- & $paths))))
-
-(provide [git-submodules]
-  ; TODO: remove once this ships and bass-loop is upgraded
-  ;
-  ; reads all values from the source into a list
-  ;
-  ; => (take-all (list->source [1 2 3]))
-  (defn take-all [source]
-    (let [val (next source _)]
-      (if (ignore? val)
-        []
-        (cons val (take-all source)))))
+    (git-out src ($ git log -n1 "--pretty=format:%H" -- & $paths)))
 
   (defn git-submodules [src]
     (map (fn [[_ path]] (string->dir path))