2020-05-30 20:12:29 +00:00
|
|
|
#!/usr/bin/env bb
|
|
|
|
|
|
|
|
|
|
(ns changelog
|
|
|
|
|
(:require [clojure.string :as str]))
|
|
|
|
|
|
|
|
|
|
(let [changelog (slurp "CHANGELOG.md")
|
|
|
|
|
replaced (str/replace changelog
|
2020-06-10 21:54:48 +00:00
|
|
|
#" #(\d+)"
|
2020-05-30 20:12:29 +00:00
|
|
|
(fn [[_ issue after]]
|
2021-01-01 10:26:31 +00:00
|
|
|
(format " [#%s](https://github.com/babashka/babashka/issues/%s)%s"
|
2020-06-10 22:13:47 +00:00
|
|
|
issue issue (str after))))
|
2020-08-21 08:31:54 +00:00
|
|
|
replaced (str/replace replaced
|
|
|
|
|
#" borkdude/sci#(\d+)"
|
|
|
|
|
(fn [[_ issue after]]
|
|
|
|
|
(format " [borkdude/sci#%s](https://github.com/borkdude/sci/issues/%s)%s"
|
|
|
|
|
issue issue (str after))))
|
|
|
|
|
replaced (str/replace replaced
|
|
|
|
|
#" babashka/babashka.nrepl#(\d+)"
|
|
|
|
|
(fn [[_ issue after]]
|
|
|
|
|
(format " [babashka/babashka.nrepl#%s](https://github.com/babashka/babashka.nrepl/issues/%s)%s"
|
|
|
|
|
issue issue (str after))))
|
2020-06-01 08:56:00 +00:00
|
|
|
replaced (str/replace replaced
|
2020-08-26 18:43:16 +00:00
|
|
|
#"@([a-zA-Z0-9-_]+)([, \.)])"
|
2020-06-01 08:56:00 +00:00
|
|
|
(fn [[_ name after]]
|
|
|
|
|
(format "[@%s](https://github.com/%s)%s"
|
|
|
|
|
name name after)))]
|
2020-05-30 20:12:29 +00:00
|
|
|
(spit "CHANGELOG.md" replaced))
|
