summaryrefslogtreecommitdiff
path: root/Build/source/texk/tetex/updmap.pl
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/tetex/updmap.pl')
-rwxr-xr-xBuild/source/texk/tetex/updmap.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/Build/source/texk/tetex/updmap.pl b/Build/source/texk/tetex/updmap.pl
index e042b517596..7dbc7ec4880 100755
--- a/Build/source/texk/tetex/updmap.pl
+++ b/Build/source/texk/tetex/updmap.pl
@@ -1879,8 +1879,8 @@ sub reset_root_home {
# if $HOME isn't an existing directory, that's ok; TLU does this.
if (defined($envhome) && (-d $envhome)) {
# we want to avoid calling getpwuid as far as possible, so if
- # $envhome is either / or /root we accept it straight ahead
- if ($envhome eq "/" || $envhome eq "/root") {
+ # $envhome is one of some usual values we accept it without worrying.
+ if ($envhome =~ m,^(/|/root|/var/root)/*$, {
return;
}
# $HOME is defined, check what is the home of root in reality