summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/metapost/metauml/util_shade.mp
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2010-09-12 23:03:48 +0000
committerKarl Berry <karl@freefriends.org>2010-09-12 23:03:48 +0000
commit14889c6d7bd31fd163f9cb123c8ba772769d176b (patch)
tree87daf844b7fc365e2a328b7f6b39632e5aa68f94 /Master/texmf-dist/metapost/metauml/util_shade.mp
parent2468fdd0a97481e170ef878e0839faf948be681a (diff)
metauml 0.2.5 (31jul10)
git-svn-id: svn://tug.org/texlive/trunk@19692 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/metapost/metauml/util_shade.mp')
-rw-r--r--Master/texmf-dist/metapost/metauml/util_shade.mp18
1 files changed, 15 insertions, 3 deletions
diff --git a/Master/texmf-dist/metapost/metauml/util_shade.mp b/Master/texmf-dist/metapost/metauml/util_shade.mp
index 2cc6f99af91..f8c7b1bdcdb 100644
--- a/Master/texmf-dist/metapost/metauml/util_shade.mp
+++ b/Master/texmf-dist/metapost/metauml/util_shade.mp
@@ -15,12 +15,24 @@
% along with this program; if not, write to the Free Software
% Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
-if known _metauml_shade_mp:
+if known _util_shade_mp:
expandafter endinput
fi;
-_metauml_shade_mp:=1;
+_util_shade_mp:=1;
-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 util_log;
vardef ShadeInfo@#=
_n_ := str @#;