Browse Source

Slight copylet change.

master
freesource 23 years ago
parent
commit
5f3ce658dc
  1. 6
      BootRoot/Error.pm

6
BootRoot/Error.pm

@ -1,7 +1,6 @@
############################################################################ ############################################################################
## ##
## Error.pm ## Error.pm
## Copyright (C) 2000 Modifications by the gBootRoot Project
## Copyright (C) 2000, 2001 by Jonathan Rosenbaum ## Copyright (C) 2000, 2001 by Jonathan Rosenbaum
## <freesource@users.sourceforge.net> ## <freesource@users.sourceforge.net>
## ##
@ -154,8 +153,8 @@ sub err_custom {
sub err_custom_perl { sub err_custom_perl {
if ((split(/ /, $_[0]))[0] eq "mkdir") { if ((split(/ /, $_[0]))[0] eq "mkdir") {
my $two = (split(/ /, $_[0]))[1]; my $two = (split(/ /, $_[0]))[1];
mkdir($two,0755); # Anyone allowed in mkdir($two,0755);
} }
error_window($_[1]) if ($? != 0); error_window($_[1]) if ($? != 0);
if (defined $error_window) { if (defined $error_window) {
@ -163,6 +162,7 @@ sub err_custom_perl {
return 2; return 2;
} }
} }
} }
################### ###################

Loading…
Cancel
Save