[["-U" "--gitlab-uri URI" "Gitlab host URI" :parse-fn #(URI. %)]
["-t" "--gitlab-token TOKEN" "Gitlab token"
:default ::absent
:validate [(fn [x] (println "XXXXX:" x) (not= ::absent)) "Missing required option: --gitlab-token"]
]
["-h" "--help"]])
不见得有效,因为::validate fn 从未被触发。我实际上更喜欢某种类型的::mandatory(:required 早就被占用了)属性来强制用户设置此选项。