X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/23e44cba8fe33e8cdde22d1ae14d78d992b9f8bb..780dfb99b08e565eeeb5d94d4d8fd0604b8c54d0:/doc/sod.sty

diff --git a/doc/sod.sty b/doc/sod.sty
index 7a52605..2894feb 100644
--- a/doc/sod.sty
+++ b/doc/sod.sty
@@ -103,6 +103,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}
 
 %% Comment setting.
 \atdef ;#1\\{\normalfont\itshape;#1\\}