@@ -6,11 +6,12 @@ import Effect (Effect)
6
6
import Effect.Aff (launchAff_ )
7
7
import Effect.Class (liftEffect )
8
8
import Effect.Class.Console as Console
9
- import FluentCI.Class (asService , id , mise , nix , pkgx , stdout , withExec , withSecretVariable , withService , withWorkdir )
9
+ import FluentCI.Class (asService , id , mise , nix , pkgx , stdout , withExec , withSecretVariable , withService , withWorkdir , hermit )
10
10
import FluentCI.Client (cache , dag , git , pipeline , setSecret )
11
11
import FluentCI.Directory (Directory , entries )
12
12
import FluentCI.Git (branch , tree )
13
- import FluentCI.Mise (Mise )
13
+ import FluentCI.Hermit (Hermit )
14
+ import FluentCI.Mise (Mise , trust )
14
15
import FluentCI.Pipeline (Pipeline )
15
16
import FluentCI.Pkgx (withPackages )
16
17
import FluentCI.Secret (Secret , plaintext )
@@ -41,6 +42,9 @@ main = launchAff_ do
41
42
gitEntries <- liftEffect $ gitEntriesDemo
42
43
entries gitEntries >>= Console .debugShow
43
44
45
+ h <- liftEffect $ hermitDemo
46
+ stdout h >>= Console .log
47
+
44
48
ping :: Effect Service
45
49
ping = do
46
50
p <- pipeline dag " demo"
@@ -69,8 +73,15 @@ miseDemo = do
69
73
p <- pipeline dag " mise-demo"
70
74
m <- mise p
71
75
m1 <- withWorkdir m " ./mise-demo"
72
- m2 <- withExec m1 [" mise" , " --version" ]
73
- withExec m2 [" which" , " bun" ]
76
+ m2 <- trust m1
77
+ m3 <- withExec m2 [" mise" , " --version" ]
78
+ withExec m3 [" which" , " bun" ]
79
+
80
+ hermitDemo :: Effect Hermit
81
+ hermitDemo = do
82
+ h <- hermit dag
83
+ h1 <- withWorkdir h " ./hermit-demo"
84
+ withExec h1 [" which" , " jq" ]
74
85
75
86
pingDemo :: Service -> Service -> Effect Pipeline
76
87
pingDemo svc1 svc2 = do
0 commit comments