Skip to content
This repository was archived by the owner on Apr 25, 2024. It is now read-only.

Commit 53ac3b9

Browse files
Version 1.7.0-beta3-r2
1 parent b4092de commit 53ac3b9

File tree

2 files changed

+4
-20
lines changed

2 files changed

+4
-20
lines changed

pom.xml

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -5,7 +5,7 @@
55
<artifactId>clojure</artifactId>
66
<name>clojure</name>
77
<packaging>jar</packaging>
8-
<version>1.7.0-beta3</version>
8+
<version>1.7.0-beta3-r2</version>
99
<url>http://clojure.org/</url>
1010
<description>Clojure core environment and runtime library.</description>
1111

src/clj/clojure/core.clj

Lines changed: 3 additions & 19 deletions
Original file line numberDiff line numberDiff line change
@@ -6751,27 +6751,11 @@
67516751

67526752
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; clojure version number ;;;;;;;;;;;;;;;;;;;;;;
67536753

6754-
(let [properties (with-open [version-stream (.getResourceAsStream
6755-
(clojure.lang.RT/baseLoader)
6756-
"clojure/version.properties")]
6757-
(doto (new java.util.Properties)
6758-
(.load version-stream)))
6759-
version-string (.getProperty properties "version")
6760-
[_ major minor incremental qualifier snapshot]
6761-
(re-matches
6762-
#"(\d+)\.(\d+)\.(\d+)(?:-([a-zA-Z0-9_]+))?(?:-(SNAPSHOT))?"
6763-
version-string)
6764-
clojure-version {:major (Integer/valueOf ^String major)
6765-
:minor (Integer/valueOf ^String minor)
6766-
:incremental (Integer/valueOf ^String incremental)
6767-
:qualifier (if (= qualifier "SNAPSHOT") nil qualifier)}]
6768-
(def ^:dynamic *clojure-version*
6769-
(if (.contains version-string "SNAPSHOT")
6770-
(clojure.lang.RT/assoc clojure-version :interim true)
6771-
clojure-version)))
6754+
(def ^:dynamic *clojure-version*
6755+
{:major 1, :minor 7, :incremental 0, :qualifier "beta3-r2"})
67726756

67736757
(add-doc-and-meta *clojure-version*
6774-
"The version info for Clojure core, as a map containing :major :minor
6758+
"The version info for Clojure core, as a map containing :major :minor
67756759
:incremental and :qualifier keys. Feature releases may increment
67766760
:minor and/or :major, bugfix releases will increment :incremental.
67776761
Possible values of :qualifier include \"GA\", \"SNAPSHOT\", \"RC-x\" \"BETA-x\""

0 commit comments

Comments
 (0)