zilti
/
sompani-toolbox
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fixed warnings, set the MX priority default to 0

This commit is contained in:
Daniel Ziltener 2020-08-21 15:25:47 +02:00
parent d2b9c6a32b
commit 532bb967c3
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/com/sompani/onboarding.clj
View File

@ -9,7 +9,7 @@
LinkOption)
(java.nio.file.attribute PosixFileAttributeView
FileAttribute)
(java.io BufferedReader File)
(java.io BufferedReader #_File)
(org.openqa.selenium.firefox FirefoxDriver)
(org.openqa.selenium By)))
@ -93,7 +93,7 @@
(Files/getFileAttributeView path PosixFileAttributeView (into-array LinkOption [LinkOption/NOFOLLOW_LINKS]))
(.setOwner owner)))
(defn- set-group [path group]
#_(defn- set-group [path group]
(->
(Files/getFileAttributeView path PosixFileAttributeView (into-array LinkOption [LinkOption/NOFOLLOW_LINKS]))
(.setGroup group)))
@ -152,7 +152,7 @@
(printf " ok.\n"))
;; ## Certificates
(defn generate-certs! [{:keys [company-name company-domain] :as datamap}]
(defn generate-certs! [{:keys [_company-name _company-domain] :as datamap}]
(println "Generating certificates...")
(let [command (map #(cljstache/render % datamap)
["certbot" "certonly" "--nginx"
@ -174,8 +174,8 @@
{:type "A" :name (format "staging.%s" company-name) :content "185.163.117.139"}
{:type "AAAA" :name company-name :content "2a03:4000:3b:2bb:18ea:e0ff:fe8c:aa9a"}
{:type "AAAA" :name (format "staging.%s" company-name) :content "2a03:4000:3b:2bb:18ea:e0ff:fe8c:aa9a"}
{:type "MX" :name company-name :content "mx.yandex.net." :priority 50}
{:type "MX" :name (format "m.%s.talent.careers" company-name) :content "feedback-smtp.eu-west-1.amazonses.com" :priority 50}
{:type "MX" :name company-name :content "mx.yandex.net." :priority 0}
{:type "MX" :name (format "m.%s.talent.careers" company-name) :content "feedback-smtp.eu-west-1.amazonses.com" :priority 0}
{:type "TXT" :name (format "m.%s.talent.careers" company-name) :content "v=spf1 include:amazonses.com ~all"}
{:type "TXT" :name (format "%s.talent.careers" company-name) :content "v=spf1 redirect=_spf.yandex.net"}
{:type "TXT" :name (format "_dmarc.%s" company-name) :content "v=DMARC1; p=none; rua=sompani-d@dmarc.report-uri.com"}])
@ -197,10 +197,10 @@
;; # Main initialization
(def cli-options
[["-d" "--domain VCDOMAIN" "The domain of the VC to onboard"
[["-d" "--domain VCDOMAIN" "The domain of the VC to onboard. Example: connectventures.co"
:default nil
:id :vc-domain]
["-n" "--name VCNAME" "The name of the VC to onboard"
["-n" "--name VCNAME" "The name of the VC to onboard. Example: connectventures"
:default nil
:id :vc-name]
[nil "--deploy-directories" "Create deploy directories"]
@ -219,7 +219,7 @@
nginx
certify
help]
:as options}
:as _options}
(:options (parse-opts args cli-options))
datamap {:company-name vc-name :company-domain vc-domain}]
(if help