bike/gbootroot
1
0
Fork 0
mirror of https://github.com/fspc/gbootroot.git synced 2025-02-25 01:43:24 -05:00
Code Issues Projects Releases Wiki Activity

Slight copylet change.

Browse Source
This commit is contained in:
freesource 2001-11-04 08:52:57 +00:00
parent 4101cf371b
commit 5f3ce658dc
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
BootRoot/Error.pm
View File

@ -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;
} }
} }
} }
################### ###################