@@ -302,13 +302,8 @@ inlineToConTeXt (Link txt (('#' : ref), _)) = do
302 opts <- gets stOptions
302 opts <- gets stOptions
303 contents <- inlineListToConTeXt txt
303 contents <- inlineListToConTeXt txt
304 let ref' = toLabel $ stringToConTeXt opts ref
304 let ref' = toLabel $ stringToConTeXt opts ref
305− return $ text "\\in"
305+ return $ text "\\goto"
306− <> braces (if writerNumberSections opts
307− then contents <+> text "(\\S"
308− else contents) -- prefix
306+ <> braces contents
309− <> braces (if writerNumberSections opts
311− else empty) -- suffix
312 <> brackets (text ref')
307 <> brackets (text ref')
314inlineToConTeXt (Link txt (src, _)) = do
309inlineToConTeXt (Link txt (src, _)) = do