doc/sod.sty: Make the `->' operator look like its component characters.

Using an actual arrow is pretty, but it's not C.

diff --git a/doc/sod.sty b/doc/sod.sty
index 916d95ebedab531f85a3fa6c7d39748f0f0541fe..9fffa17d73b4fed33fe38f384c0eb599bf22acdd 100644 (file)
--- 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 !{\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\\}
 
 %% Comment setting.
 \atdef ;#1\\{\normalfont\itshape;#1\\}