diff options
Diffstat (limited to 'src/Command/Run.hs')
| -rw-r--r-- | src/Command/Run.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Command/Run.hs b/src/Command/Run.hs index 0ea73b5..ce1ea4a 100644 --- a/src/Command/Run.hs +++ b/src/Command/Run.hs @@ -141,7 +141,7 @@ argumentJobSource names = do jobsetJobsEither <- fmap Right $ forM names $ \name -> case find ((name ==) . jobName) (configJobs config) of Just job -> return job - Nothing -> tfail $ "job `" <> textJobName name <> "' not found" + Nothing -> tfail $ "job ‘" <> textJobName name <> "’ not found" oneshotJobSource . (: []) =<< cmdEvalWith (\ei -> ei { eiCurrentIdRev = cidPart ++ eiCurrentIdRev ei }) (evalJobSet [] JobSet {..}) @@ -199,7 +199,7 @@ watchBranchSource branch = do Just commit -> void $ forkIO $ go commit tmvar Nothing -> do - T.hPutStrLn stderr $ "Branch `" <> branch <> "' not found" + T.hPutStrLn stderr $ "Branch ‘" <> branch <> "’ not found" atomically $ putTMVar tmvar Nothing return $ JobSource tmvar |