no longer needed
This commit is contained in:
parent
cdfe74c337
commit
af055dccbe
2 changed files with 0 additions and 34 deletions
|
@ -1,21 +0,0 @@
|
|||
(ns dda.build.gopass.domain
|
||||
(:require [clojure.spec.alpha :as s]
|
||||
[orchestra.core :refer [defn-spec]]))
|
||||
|
||||
(s/def ::path string?)
|
||||
(s/def ::field string?)
|
||||
(s/def ::gopass-entry (s/keys :req-un [::path]
|
||||
:opt-un [::field]))
|
||||
(s/def ::config (s/map-of keyword? ::gopass-entry))
|
||||
|
||||
(s/def ::resolved-config (s/map-of string? string?))
|
||||
|
||||
(s/def ::gopass-command (s/coll-of string?))
|
||||
(s/def ::gopass-commands (s/coll-of ::gopass-command))
|
||||
|
||||
(defn-spec gopass-show-command ::gopass-command
|
||||
[entry ::gopass-entry]
|
||||
(let [{:keys [path field] :or {field nil}} entry]
|
||||
(if (nil? field)
|
||||
["gopass" "show" "-y" "-o" path]
|
||||
["gopass" "show" "-y" "-o" path field])))
|
|
@ -1,13 +0,0 @@
|
|||
(ns dda.build.gopass.domain-test
|
||||
(:require
|
||||
[clojure.test :refer [deftest is]]
|
||||
[clojure.spec.test.alpha :as st]
|
||||
[dda.build.gopass.domain :as cut]))
|
||||
|
||||
(st/instrument `cut/gopass-show-command)
|
||||
|
||||
(deftest should-show-gopass-command
|
||||
(is (= ["gopass" "show" "-y" "-o" "test/pass"]
|
||||
(cut/gopass-show-command {:path "test/pass"})))
|
||||
(is (= ["gopass" "show" "-y" "-o" "test/pass" "field"]
|
||||
(cut/gopass-show-command {:path "test/pass" :field "field"}))))
|
Loading…
Add table
Reference in a new issue