diff options
Diffstat (limited to 'scripts/context/perl/texexec.pl')
-rw-r--r-- | scripts/context/perl/texexec.pl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/scripts/context/perl/texexec.pl b/scripts/context/perl/texexec.pl index b9a80bec6..973e2daee 100644 --- a/scripts/context/perl/texexec.pl +++ b/scripts/context/perl/texexec.pl @@ -341,11 +341,12 @@ if ($Paranoid) { $ENV{openin_any} = 'a' ; } -if ($ENV{openin_any} eq 'p') { +if (defined $ENV{openin_any} && $ENV{openin_any} eq 'p') { $Paranoid = 1 ; # extra test in order to set readlevel } -if (($ENV{shell_escape} eq 'f') || ($ENV{SHELL_ESCAPE} eq 'f')) { +if ((defined $ENV{shell_escape} && $ENV{shell_escape} eq 'f') || + (defined $ENV{SHELL_ESCAPE} && $ENV{SHELL_ESCAPE} eq 'f')) { $AutoMPRun = 1 ; } |