mirror of
https://github.com/penpot/penpot.git
synced 2025-02-03 04:49:03 -05:00
19 lines
514 B
Clojure
19 lines
514 B
Clojure
|
;; This Source Code Form is subject to the terms of the Mozilla Public
|
||
|
|
;; License, v. 2.0. If a copy of the MPL was not distributed with this
|
||
|
|
;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
|
||
|
|
;;
|
||
|
|
;; Copyright (c) 2019 Andrey Antukh <niwi@niwi.nz>
|
||
|
|
|
||
|
|
(ns uxbox.tests.main
|
||
|
|
(:require [clojure.test :as test]))
|
||
|
|
|
||
|
|
(defn -main
|
||
|
|
[& args]
|
||
|
|
(require 'uxbox.tests.test-projects)
|
||
|
|
(let [{:keys [fail]} (test/run-all-tests #"^uxbox.tests.*")]
|
||
|
|
(if (pos? fail)
|
||
|
|
(System/exit fail)
|
||
|
|
(System/exit 0))))
|
||
|
|
|
||
|
|
|