man/ms writers: use \[at] for escaped @.

2018-10-17 17:39:42 -07:00 · 2018-10-17 17:39:42 -07:00 · 24f388e1a7
commit 24f388e1a7
parent ebdb2deb0d
2 changed files with 2 additions and 2 deletions
--- a/src/Text/Pandoc/Writers/Groff.hs
+++ b/src/Text/Pandoc/Writers/Groff.hs
@ -97,7 +97,7 @@ groffEscapes = Map.fromList
              , ('\x2026', "\\&...")
              , ('~', "\\[ti]")
              , ('^', "\\[ha]")
-              , ('@', "\\@")
+              , ('@', "\\[at]")
              , ('\\', "\\\\")
              ]

--- a/test/writer.ms
+++ b/test/writer.ms
@ -925,7 +925,7 @@ It should.
 .LP
 An e-mail address: \c
 .pdfhref W -D "mailto:nobody%40nowhere.net" -A "\c" \
- -- "nobody\@nowhere.net"
+ -- "nobody\[at]nowhere.net"
 \&
 .RS
 .LP