Update offline test metadata & run configuration

project.clj

@@ -32,7 +32,8 @@
                              clj-http.core
                              ordered.map]}}
   :test-selectors {:default (complement :disabled)
-                   :offline (complement :online)}
+                   :offline (comp (partial not-any? identity)
+                                  (juxt :online :disabled))}
   :source-paths ["leiningen-core/src" "src"]
   ;; work around Clojure bug http://dev.clojure.org/jira/browse/CLJ-1034
   :uberjar-exclusions [#"^data_readers.clj$"]

test/leiningen/test/compile.clj

@@ -18,13 +18,13 @@
                        (file "test_projects" "sample_failing" "target") true)
                       (f)))
 
-(deftest test-compile
+(deftest ^:online test-compile
   (compile sample-project "nom.nom.nom")
   (is (.exists (file "test_projects" "sample" "target"
                      "classes" "nom" "nom" "nom.class")))
   (is (thrown? Exception (compile sample-failing-project))))
 
-(deftest test-compile-all
+(deftest ^:online test-compile-all
   (compile sample-project ":all")
   (is (.exists (file "test_projects" "sample" "target"
                      "classes" "nom" "nom" "nom.class"))))
@@ -40,7 +40,7 @@
 
 (def eip-check (atom false))
 
-(deftest test-plugin
+(deftest ^:online test-plugin
   (reset! eip-check false)
   (eval/eval-in-project (assoc sample-project
                           :eval-in :leiningen
@@ -49,7 +49,7 @@
                         `(reset! eip-check true))
   (is @eip-check))
 
-(deftest test-cleared-transitive-aot
+(deftest ^:online test-cleared-transitive-aot
   (compile (assoc sample-project :clean-non-project-classes true) "nom.nom.nom")
   (eval/eval-in-project sample-project '(require 'nom.nom.nom))
   (let [classes (seq (.list (file "test_projects" "sample" "target"
@@ -62,7 +62,7 @@
   (is (not (.exists (file "test_projects" "sample" "target"
                           "classes" "sample2" "alt.class")))))
 
-(deftest test-cleared-transitive-aot-by-regexes
+(deftest ^:online test-cleared-transitive-aot-by-regexes
   (compile (assoc sample-project :clean-non-project-classes [#"core"])
            "nom.nom.nom")
   (let [classes (seq (.list (file "test_projects" "sample" "target"
@@ -75,7 +75,7 @@
   (is (.exists (file "test_projects" "sample" "target" "classes"
                      "sample2" "alt__init.class"))))
 
-(deftest test-injection
+(deftest ^:online test-injection
   (eval/eval-in-project (assoc sample-project
                           :injections ['(do (ns inject.stuff)
                                             (def beef :hot))])

test/leiningen/test/deploy.clj

@@ -27,15 +27,15 @@
       ;; TODO: this is vulnerable to the y3k bug!
       (is (seq (filter #(re-find #"nomnomnom-0.5.0-2\d{7}\." %) files))))))
 
-(deftest test-deploy
+(deftest ^:online test-deploy
   (testing "simple deployment to `snapshots` already defined in project.clj"
     (deploy-snapshots sample-project "lein-repo")))
 
-(deftest test-deploy-custom-url
+(deftest ^:online test-deploy-custom-url
   (testing "deployment to a repo specified as a URL argument to `deploy`"
     (deploy-snapshots sample-project "lein-custom-repo" true)))
 
-(deftest test-deploy-repositories-key
+(deftest ^:online test-deploy-repositories-key
   (testing "preferring repository in :deploy-repositories over :repositories"
     (deploy-snapshots (assoc sample-project
                         :deploy-repositories