- fix: "Link to a page in the webgui asset tree" has default "open in a new

window"
 - fix: cs - attachments
fixed a tabbing problem in admin console introduced intraversion

lib/WebGUI/Asset/Post.pm

@@ -681,7 +681,7 @@ sub processPropertiesFromFormPost {
 	delete $self->{_storageLocation};
 	my $storage = $self->getStorageLocation;
 	my $attachmentLimit = $self->getThread->getParent->get("attachmentsPerPost");
-	$storage->addFileFromFormPost("image", $attachmentLimit) if $attachmentLimit;
+#	$storage->addFileFromFormPost("image", $attachmentLimit) if $attachmentLimit;
 	$self->postProcess;
 	$self->requestCommit;
 }
@@ -957,7 +957,7 @@ sub www_edit {
 			unless ($self->session->form->process("content") || $self->session->form->process("title")) {
                 		$content = "[quote]".$self->getParent->get("content")."[/quote]" if ($self->session->form->process("withQuote"));
                 		$title = $self->getParent->get("title");
-                		$title = "Re: ".$title unless ($title =~ /^Re:/);
+                		$title = "Re: ".$title unless ($title =~ /^Re:/i);
 			}
 			$var{'subscribe.form'} = WebGUI::Form::yesNo($self->session, {
 				name=>"subscribe",
@@ -1080,6 +1080,7 @@ sub www_edit {
 		value=>$i18n->get("preview","Asset_Collaboration")
 		});
 	$var{'attachment.form'} = WebGUI::Form::image($self->session, {
+		name=>"storageId",
 		value=>$self->get("storageId"),
 		maxAttachments=>$self->getThread->getParent->getValue("attachmentsPerPost"),
 		deleteFileUrl=>$self->getUrl("func=deleteFile;filename=")

lib/WebGUI/Asset/Wobject/Collaboration.pm

@@ -205,7 +205,7 @@ sub canModerate {
 #-------------------------------------------------------------------
 sub canPost {
 	my $self = shift;
-	return ($self->get("status") eq "approved" && ($self->session->user->isInGroup($self->get("postGroupId")) || $self->canEdit));
+	return (($self->get("status") eq "approved" || $self->getRevisionCount > 1) && ($self->session->user->isInGroup($self->get("postGroupId")) || $self->canEdit));
 }
 
 

lib/WebGUI/Operation/FormHelpers.pm

@@ -11,6 +11,7 @@ package WebGUI::Operation::FormHelpers;
 #-------------------------------------------------------------------
 
 use strict;
+use Tie::IxHash;
 use WebGUI::Asset;
 use WebGUI::Asset::Wobject::Folder;
 use WebGUI::Form::Group;
@@ -149,12 +150,15 @@ sub www_richEditPageTree {
 		-label=>$i18n->get(104),
 		-hoverHelp=>$i18n->get('104 description'),
 		);
+	my %options = ();
+	tie %options, 'Tie::IxHash';
+	%options = ("_self"=>$i18n->get('link in same window'),
+		           "_blank"=>$i18n->get('link in new window'));
 	$f->selectBox(
 		-name=>"target",
 		-label=>$i18n->get('target'),
 		-hoverHelp=>$i18n->get('target description'),
-		-options=>{"_self"=>$i18n->get('link in same window'),
-		           "_blank"=>$i18n->get('link in new window')},
+		-options=>\%options
 		);
 	$f->button(
 		-name=>"button",

lib/WebGUI/Session.pm

@@ -440,7 +440,7 @@ An array of method names of the objects you want returned.
 
 sub quick {
 	my $self = shift;
-	my @methods = shift;
+	my @methods = @_;
 	my @list = ();
 	foreach my $method (@methods) {
 		push(@list, $self->$method);