tyrel/advisory-circular
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Replace - with _ in hashtags.

Browse Source
This commit is contained in:
John Wiseman 2020-05-20 15:04:02 -07:00
parent 5f078b4e54
commit 46b863fa36
2 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/main/lemondronor/advisorycircular.cljs
View File

@ -324,7 +324,7 @@
;; Landmark. ;; Landmark.
"?:[{nearbydistance} miles from {nearbylandmark} ]" "?:[{nearbydistance} miles from {nearbylandmark} ]"
;; Hashtag based on registration. ;; Hashtag based on registration.
"?:[#{registration} |#{militaryregistration} ]" "?:[#{registration|hashtag} |#{militaryregistration|hashtag} ]"
;; tar1090 link. ;; tar1090 link.
"https://tar1090.adsbexchange.com/?icao={icao}&zoom=13")])) "https://tar1090.adsbexchange.com/?icao={icao}&zoom=13")]))

3
src/main/lemondronor/advisorycircular/generation.cljc
View File

@ -63,7 +63,8 @@
(if (re-find #"^[FHLMNRSX](\b|[A-Z0-9])" s) (if (re-find #"^[FHLMNRSX](\b|[A-Z0-9])" s)
(str "an " s) (str "an " s)
(str "a " s)) (str "a " s))
(str "an " s)))}) (str "an " s)))
:hashtag #(string-replace % #"-" "_")})
(defn apply-filter [s filter-name] (defn apply-filter [s filter-name]