Rockingcool/md-to-html
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Removed unecessary parentheses

Browse Source
This commit is contained in:
Aadhavan Srinivasan
2025-05-06 17:04:24 -05:00
parent 873795e267
commit 71aacdd26a
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/MdToHTML.hs
View File

@@ -112,8 +112,8 @@ parseItalic :: ReadP MdToken
parseItalic = do parseItalic = do
text <- text <-
choice choice
[ (between (string "_") (string "_") (munch1 (/= '_'))), [ between (string "_") (string "_") (munch1 (/= '_')),
(between (string "*") (string "*") (munch1 (/= '*'))) between (string "*") (string "*") (munch1 (/= '*'))
] ]
let parsedText = fst $ leftmostLongestParse parseLine text let parsedText = fst $ leftmostLongestParse parseLine text
return (Italic parsedText) return (Italic parsedText)