This commit is contained in:
Michiel Borkent 2020-04-12 20:47:31 +02:00
parent af1c8fd4d8
commit ed4fb6cd34

View file

@ -1156,7 +1156,7 @@ clojure.core/ffirst
(defn sha1 (defn sha1
[s] [s]
(let [hashed (.digest (.getInstance java.security.MessageDigest "SHA-1") (let [hashed (.digest (java.security.MessageDigest/getInstance "SHA-1")
(.getBytes s)) (.getBytes s))
sw (java.io.StringWriter.)] sw (java.io.StringWriter.)]
(binding [*out* sw] (binding [*out* sw]