From: Mark Wooding <mdw@distorted.org.uk>
Date: Mon, 5 Aug 2019 17:09:41 +0000 (+0100)
Subject: doc/sod.sty: Get `\@scripts' to cope if `_' isn't active.
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/commitdiff_plain/d80aee35ca7ce091fd193da9bc52d622ebae2a0a?ds=sidebyside

doc/sod.sty: Get `\@scripts' to cope if `_' isn't active.
---

diff --git a/doc/sod.sty b/doc/sod.sty
index 45d623e..de9bf3b 100644
--- a/doc/sod.sty
+++ b/doc/sod.sty
@@ -106,7 +106,7 @@
 %% conditionally.
 \def\@scripts{\futurelet\@ch\@scripts@i}
 \begingroup\lccode`\~=`\_\lowercase{\endgroup
-\def\@scripts@i{\if1\ifx\@ch~1\else\ifx\@ch^1\else0\fi\fi%
+\def\@scripts@i{\if1\ifx\@ch~1\else\ifx\@ch_1\else\ifx\@ch^1\else0\fi\fi\fi%
   \expandafter\@scripts@ii\else\expandafter\m@maybe@end\fi}}
 \def\@scripts@ii#1#2{\m@maybe#1{#2}\@scripts}