       "Windows"  "windows"
       "unknown")))
 
-(defm os-arch []
+(defn os-arch []
   (or (first (:arch *opts*))
-      (let [arch (if (bake-port) (bake [] (System/getProperty "os.arch")) (System/getProperty "os.arch"))]
+      (*config* "project.arch")
+      (let [arch (System/getProperty "os.arch")]
         (case arch
           "amd64" "x86_64"
           "i386"  "x86"

   ["clojure-snapshots" "http://build.clojure.org/snapshots"]
   ["clojars"           "http://clojars.org/repo/"]])

(defm os-name []
  (let [name (System/getProperty "os.name")]
    (condp #(.startsWith %2 %1) name
      "Linux"    "linux"

(ns cake.tasks.dependencies
  (:use cake cake.core cake.ant
        [cake.project :only [group]]
        [clojure.java.shell :only [sh]])
  (:import [org.apache.maven.artifact.ant DependenciesTask RemoteRepository WritePomTask Pom]
