diff options
| -rw-r--r-- | globals.pl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/globals.pl b/globals.pl index 8d539f035..0f91aeb9e 100644 --- a/globals.pl +++ b/globals.pl @@ -580,7 +580,9 @@ sub ModTime { # This proc must be called before using legal_product or the versions array. +$::VersionTableLoaded = 0; sub GetVersionTable { + return if $::VersionTableLoaded; my $mtime = ModTime("data/versioncache"); if (!defined $mtime || $mtime eq "") { $mtime = 0; @@ -597,6 +599,7 @@ sub GetVersionTable { die "Can't generate file data/versioncache"; } } + $::VersionTableLoaded = 1; } |