- Made some changes to make WebGUI compatible with the WRE for Windows.

- fix: cacheTimeout not respected as Visitor (Eric Kennedy).
 - fix: Email address with just one character in the user part not accepted
 - fix: Image (file) added to page shows before committing changes
 - fix: Typo in fileImport.pl at line 265 (zxp)

lib/WebGUI/Asset/FilePile.pm

@@ -167,7 +167,6 @@ sub editSave {
 		delete $newAsset->{_storageLocation};
 		$newAsset->setSize($storage->getFileSize($filename));
 		$newAsset->generateThumbnail if ($selfName eq "WebGUI::Asset::File::Image");
-		$newAsset->commit;
 	}
 	$tempStorage->delete;
 	return $self->getParent->www_manageAssets if ($self->session->form->process("proceed") eq "manageAssets");

lib/WebGUI/Asset/Redirect.pm

@@ -113,7 +113,7 @@ sub www_view {
         }
         unless ($url eq $self->get("url")) {
         	$self->session->http->setRedirect($url);
-		return "";
+		return 1;
 	}
         return $i18n->get('self_referential');
 }

lib/WebGUI/Asset/Wobject/Layout.pm

@@ -269,7 +269,7 @@ sub www_setContentPositions {
 sub www_view {
 	my $self = shift;
 	# slashdot / burst protection hack
-	if ($self->session->var->get("userId") eq "1" && $self->session->form->param("func") eq "" && $self->session->form->param("op") eq "") { 
+	if ($self->session->var->get("userId") eq "1" && $self->session->form->param() == 0) { 
 		my $check = $self->checkView;
 		return $check if (defined $check);
 		my $cache = WebGUI::Cache->new($self->session, "view_".$self->getId);

lib/WebGUI/Form/Email.pm

@@ -79,8 +79,7 @@ Returns a validated email address. If the result does not pass validation, it re
 sub getValueFromPost {
 	my $self = shift;
 	my $value = $self->session->form->param($self->get("name"));
-
-	if ($value =~ /^([A-Z0-9]+[._+-]?){1,}([A-Z0-9]+[_+-]?)+\@(([A-Z0-9]+[._-]?){1,}[A-Z0-9]+\.){1,}[A-Z]{2,4}$/i) {
+	if ($value =~ /^([0-9a-zA-Z]([-.\w]*[0-9a-zA-Z])*@([0-9a-zA-Z][-\w]*[0-9a-zA-Z]\.)+[a-zA-Z]{2,9})$/i) {
 		return $value;
 	}
 	return undef;