From f5d2554eefcdde9770252d5dd45fcde3ee0002e3 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ondr=CC=8Cej=20S=CC=8Cebek?= Date: Sun, 9 Jun 2024 16:57:07 +0200 Subject: [PATCH] Remove double escape, praised be YAML --- src/swarm-doc/Swarm/Doc/Keyword.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/swarm-doc/Swarm/Doc/Keyword.hs b/src/swarm-doc/Swarm/Doc/Keyword.hs index a9fc3d084..fea1355ad 100644 --- a/src/swarm-doc/Swarm/Doc/Keyword.hs +++ b/src/swarm-doc/Swarm/Doc/Keyword.hs @@ -53,4 +53,4 @@ operatorNames = T.intercalate "|" $ map (escape . constSyntax) operators slashNotComment = \case '/' -> "/(?![/|*])" c -> T.singleton c - escape = T.concatMap (\c -> if c `elem` special then T.snoc "\\\\" c else slashNotComment c) + escape = T.concatMap (\c -> if c `elem` special then T.snoc "\\" c else slashNotComment c)