X-Git-Url: https://git.stderr.nl/gitweb?p=matthijs%2Fmaster-project%2Freport.git;a=blobdiff_plain;f=Utils%2FMetapost.tex;h=e0177804afb2b8a55881c29be0151545fc80cf58;hp=6d00ae47ca901d393b16de523de9d376f8d95833;hb=d8e8089acc900edd45b9f3345d1ec35cb9d47e01;hpb=dadae33d89b183cb9aab04b4a82dab53c4cf2ce4

diff --git a/Utils/Metapost.tex b/Utils/Metapost.tex
index 6d00ae4..e017780 100644
--- a/Utils/Metapost.tex
+++ b/Utils/Metapost.tex
@@ -94,4 +94,12 @@ define_global_boolean_option("labels");
 setObjectDefaultOption("Reg")("reflect")(false);
 setObjectDefaultOption("Reg")("labels")(false);
 
+def midpoint(expr a, b) = ((a + b) / 2) enddef;
+
 \stopMPinclusions
+
+% Make \overrightarrow "unexpanded", to make it work within metapost.
+% http://www.ntg.nl/pipermail/ntg-context/2009/043620.html. Will be fixed in
+% context.
+\let\normaloverrightarrow\overrightarrow                                                                                                                     
+\unexpanded\def\overrightarrow{\normaloverrightarrow}