X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/57bcf70e23685843cfb67ca127994496f1f3b054..3e21ae3fa660b188bc20caec8c96c1f678405c25:/doc/sod.sty?ds=inline

diff --git a/doc/sod.sty b/doc/sod.sty
index 916d95e..9fffa17 100644
--- a/doc/sod.sty
+++ b/doc/sod.sty
@@ -116,7 +116,7 @@
 \atdef !{\m@maybe|\@scripts}
 \def\returns{\m@maybe\longrightarrow\m@maybe@end\hspace{0.5em}\ignorespaces}
 \atdef >{\leavevmode\unskip\hspace{0.5em}\returns}
-\atdef -#1{\if>#1{\ensuremath\rightarrow}\fi}
+\atdef -#1{\if>#1\hbox{--\raisebox{.4pt}{>}}\penalty200\relax\fi}
 
 %% Comment setting.
 \atdef ;#1\\{\normalfont\itshape;#1\\}
