From bfbf67ca5daad4d0f04315e5233c748e65082fae Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Sun, 27 Jul 2025 11:17:06 -0700
Subject: Org writer: don't wrap link descriptions.

Org doesn't reliable display these as links if they have hard breaks.

Closes #9000.
---
 src/Text/Pandoc/Writers/Org.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/Text/Pandoc/Writers/Org.hs b/src/Text/Pandoc/Writers/Org.hs
index 50fd10cc9..0a1137744 100644
--- a/src/Text/Pandoc/Writers/Org.hs
+++ b/src/Text/Pandoc/Writers/Org.hs
@@ -547,7 +547,7 @@ inlineToOrg (Link _ txt (src, _)) =
   case txt of
         [Str x] | escapeURI x == src ->  -- autolink
              return $ "[[" <> literal (orgPath x) <> "]]"
-        _ -> do contents <- inlineListToOrg txt
+        _ -> do contents <- nowrap <$> inlineListToOrg txt
                 return $ "[[" <> literal (orgPath src) <> "][" <> contents <> "]]"
 inlineToOrg (Image _ _ (source, _)) =
   return $ "[[" <> literal (orgPath source) <> "]]"
-- 
cgit v1.2.3