X-Git-Url: https://git.stderr.nl/gitweb?p=matthijs%2Fmaster-project%2Freport.git;a=blobdiff_plain;f=Utils%2FFormats.tex;h=aae99ed81a528fa3a3a335da9148c168d2a860aa;hp=5dc0158c23bba389bce649bb20fec58094313049;hb=4521ef7f14ae52781329c17250f67d25d9a67dca;hpb=43d50fb84915e330993e9ef04c1c380709b903e0

diff --git a/Utils/Formats.tex b/Utils/Formats.tex
index 5dc0158..aae99ed 100644
--- a/Utils/Formats.tex
+++ b/Utils/Formats.tex
@@ -15,3 +15,17 @@
         % a bunch of empty space at the start of the frame.
         \framed[offset=0mm,location=middle,strut=no,align=right,frame=off]{#1}
 }
+
+% Define a \strikethrough command. For some reason, this does blue
+% strikethrough, sometime that still needs fixing.
+\definetextbackground
+  [strikethrough]
+  [location=text,
+   alternative=4,
+   background=,
+   frame=off]
+
+\def\setwidthof#1\to#2%
+{\bgroup
+\setbox\scratchbox\hbox{#1}%
+\expanded{\egroup\def\noexpand#2{\the\wd\scratchbox}}}