Changeset 2642

Timestamp:

06/26/08 01:43:15 (20 months ago)

Author:

auno

Message:

Fixed to change Spam to Unapproved status properly and also fixed status change error. BugzID:80324

Location:

branches/release-40/lib/MT

Files:

• CMS/Comment.pm (modified) (2 diffs)
• Comment.pm (modified) (1 diff)

branches/release-40/lib/MT/CMS/Comment.pm

@@ -14 +14 @@
     my $blog = $app->blog;
     my $type = $q->param('_type');
-
+    use Data::Dumper;
+    print STDERR "########".Dumper(\$param);
     if ($id) {
         $param->{nav_comments} = 1;
@@ -1489 +1490 @@
                     return $eh->error( MT->translate( "Publish failed: [_1]", $app->errstr ) );
                 }
+                1;
             }
         );

branches/release-40/lib/MT/Comment.pm

@@ -193 +193 @@
     my ($comment) = @_;
     $comment->visible(0);
+    $comment->junk_status(NOT_JUNK);
 }