summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/metapost/metauml/metauml_instance.mp
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/metapost/metauml/metauml_instance.mp')
-rw-r--r--Master/texmf-dist/metapost/metauml/metauml_instance.mp22
1 files changed, 17 insertions, 5 deletions
diff --git a/Master/texmf-dist/metapost/metauml/metauml_instance.mp b/Master/texmf-dist/metapost/metauml/metauml_instance.mp
index 3732d600d4f..cbe3b64f611 100644
--- a/Master/texmf-dist/metapost/metauml/metauml_instance.mp
+++ b/Master/texmf-dist/metapost/metauml/metauml_instance.mp
@@ -20,12 +20,24 @@ if known _metauml_instance_mp:
fi;
_metauml_instance_mp:=1;
-input metauml_defaults;
-input util_log;
+% Sadly, this copy of the macro is needed to prevent multiple file loads being shown by MetaPost.
+% The guard values (such as _metauml_mp) do ensure that the file isn't loaded multiple times,
+% but this macro makes sure that MetaPost won't try to load the file and display a message for that.
+def inputonce text libraryFile=
+ if not known scantokens ("_" & str libraryFile & "_mp"):
+ %includeonce% show "Loading " & str libraryFile;
+ scantokens ("input " & str libraryFile);
+ else:
+ %includeonce% show str libraryFile & " already loaded.";
+ fi;
+enddef;
+
+inputonce metauml_defaults;
+inputonce util_log;
-input util_picture;
-input util_picture_stack;
-input util_shade;
+inputonce util_picture;
+inputonce util_picture_stack;
+inputonce util_shade;
vardef InstanceInfo@#=
attributes(@#);