From 5f1bbd61fd7cdab58935ae74565e276d1c87505d Mon Sep 17 00:00:00 2001
Message-Id: <5f1bbd61fd7cdab58935ae74565e276d1c87505d.1718992767.git.mdw@distorted.org.uk>
From: Mark Wooding <mdw@chiark.greenend.org.uk>
Date: Thu, 26 May 2016 09:26:09 +0100
Subject: [PATCH] doc/sod.sty: Typeset code upright, even if surrounding text
 is italic.
Organization: Straylight/Edgeware

From: Mark Wooding <mdw@distorted.org.uk>

---
 doc/sod.sty | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/doc/sod.sty b/doc/sod.sty
index d6a8a65..1f653c9 100644
--- a/doc/sod.sty
+++ b/doc/sod.sty
@@ -62,7 +62,7 @@
 \let\syntright\empty
 
 %% Literal code is in sans face.
-\let\codeface\sffamily
+\def\codeface{\upshape\sffamily}
 \DeclareRobustCommand\code[1]{%
   \ifmmode\hbox\else\leavevmode\fi%
   {\normalfont\codeface\/#1\/}%
@@ -79,7 +79,7 @@
 \atdef <#1>{\synt{#1}\@scripts}
 \atdef "#1"{\lit*{#1}\@scripts}
 \atdef `#1'{\lit{#1}\@scripts}
-\atdef |#1|{\textsf{#1}\@scripts}
+\atdef |#1|{\lit*{#1}\@scripts}
 
 %% A handy abbreviation; `\\' itself is too good to steal.
 \atdef \\{\textbackslash}
-- 
[mdw]

