diff options
| author | Roman Smrž <roman.smrz@seznam.cz> | 2025-04-01 23:33:06 +0200 |
|---|---|---|
| committer | Roman Smrž <roman.smrz@seznam.cz> | 2025-04-04 21:25:00 +0200 |
| commit | 1f01dbd2b1d3fb89efdaab56bc52d82a8ed0483e (patch) | |
| tree | ed2a279157f6af16dbdd3b620e10e6028a320f23 /src/Command/JobId.hs | |
| parent | 7e8ec380763292d8afa4f3d0f03a679ffe384d49 (diff) | |
Job root either as repo or jobfile
Diffstat (limited to 'src/Command/JobId.hs')
| -rw-r--r-- | src/Command/JobId.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Command/JobId.hs b/src/Command/JobId.hs index 9f531d6..eb51a66 100644 --- a/src/Command/JobId.hs +++ b/src/Command/JobId.hs @@ -31,9 +31,8 @@ instance Command JobIdCommand where cmdJobId :: JobIdCommand -> CommandExec () cmdJobId (JobIdCommand ref) = do - config <- getConfig einput <- getEvalInput JobId ids <- either (tfail . textEvalError) return =<< - liftIO (runEval (evalJobReference config ref) einput) + liftIO (runEval (evalJobReference ref) einput) liftIO $ T.putStrLn $ T.intercalate "." $ map textJobIdPart ids |