oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

bug fixes

Browse source
This commit is contained in:
JT Smith 2004-09-24 16:09:32 +00:00
parent cc6cfe22b0
commit e6818b58fc
3 changed files with 16 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

15
lib/WebGUI/Operation/Page.pm
View file

@ -726,7 +726,8 @@ sub www_exportPageGenerate {
$path = $session{config}{exportPath} . $session{os}{slash} . $path;
eval { mkpath($path) };
if($@) {
print "Couldn't create $path: $@";
print "Couldn't create $path because $@ <br />\n";
print "This most likely means that you have a page with the same name as folder that you're trying to create.<br />\n";
return;
}
}
@ -741,9 +742,15 @@ sub www_exportPageGenerate {
);
# Open file
$file = $session{config}{exportPath} . $session{os}{slash} . $page->{urlizedTitle};
open(FILE, "> $file") || die "Can't open $file: $!";
print FILE $e->generate;
close(FILE);
eval { open(FILE, "> $file") or die "$!" };
if ($@) {
print "Couldn't open $file because $@ <br />\n";
print "This most likely means that you have created a page with the same name as an existing folder. <br />\n";
return;
} else {
print FILE $e->generate;
close(FILE);
}
print "DONE<br/>";
}