Org reader: allow emphasized text to be followed by [

Closes: #3577
2026-09-27 01:45:56 +00:00 · 2017-04-16 21:19:35 +02:00
parent 1c8683f205
commit 464db59394
2 changed files with 11 additions and 1 deletions
@@ -1028,6 +1028,16 @@ tests =
                , note $ para ("Second" <> space <> "note.")
                ])

+      , "Emphasized text before footnote" =:
+          unlines [ "/text/[fn:1]"
+                  , ""
+                  , "[fn:1] unicorn"
+                  ] =?>
+          para (mconcat
+               [ emph "text"
+               , note . para $ "unicorn"
+               ])
+
      , "Footnote that starts with emphasized text" =:
          unlines [ "text[fn:1]"
                  , ""