From 6645caa6796c1f253aded5c483e9f4d504f5fba5 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Sat, 5 Apr 2025 21:41:46 +0200
Subject: Put job ID to evaluated job

---
 src/Command/JobId.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Command/JobId.hs')

diff --git a/src/Command/JobId.hs b/src/Command/JobId.hs
index eb51a66..d0a85db 100644
--- a/src/Command/JobId.hs
+++ b/src/Command/JobId.hs
@@ -35,4 +35,4 @@ cmdJobId (JobIdCommand ref) = do
     JobId ids <- either (tfail . textEvalError) return =<<
         liftIO (runEval (evalJobReference ref) einput)
 
-    liftIO $ T.putStrLn $ T.intercalate "." $ map textJobIdPart ids
+    liftIO $ T.putStrLn $ textJobId $ JobId ids
-- 
cgit v1.2.3