From ef499c0239021ac537222cfad5bdc17c3ea03d86 Mon Sep 17 00:00:00 2001 From: tv Date: Wed, 30 Sep 2026 05:19:43 +0200 Subject: detect duplicated ids --- src/MdBlocks/CLI.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/MdBlocks/CLI.hs') diff --git a/src/MdBlocks/CLI.hs b/src/MdBlocks/CLI.hs index 5c2bc29..3849220 100644 --- a/src/MdBlocks/CLI.hs +++ b/src/MdBlocks/CLI.hs @@ -81,10 +81,10 @@ run (Extract rawAddress) = blocks <- loadBlocks (addressFile address) case resolveBlock address blocks of - Nothing -> - die ("mdblocks: block not found: " ++ rawAddress) + Left err -> + die ("mdblocks: " ++ formatResolveError address err) - Just block -> + Right block -> T.putStr (blockContent block) run (ShowMeta addr) = -- cgit v1.3.1