Changeset 1497 for trunk/ForumUtils

Timestamp:

03/11/09 19:53:38 (9 months ago)

Author:

breese

Message:

added support for featured entries

Location:

trunk/ForumUtils

Files:

• . (modified) (1 prop)
• MANIFEST.SKIP (modified) (1 diff)
• Makefile.PL (modified) (1 diff)
• mt-static/plugins/ForumUtils/css/app.css (modified) (1 diff)
• plugins/ForumUtils/config.yaml (modified) (5 diffs)
• plugins/ForumUtils/lib/ForumUtils/Plugin.pm (modified) (2 diffs)

trunk/ForumUtils/MANIFEST.SKIP

@@ -9 +9 @@
 ^blib/
 ~$
+^ForumUtils
 
 # packages

trunk/ForumUtils/Makefile.PL

@@ -3 +3 @@
 WriteMakefile(
     NAME            => 'Forum Utilities',
-    VERSION         => '0.91',
+    VERSION         => '0.92',
     DISTNAME        => 'ForumUtils',
 );

trunk/ForumUtils/mt-static/plugins/ForumUtils/css/app.css

@@ +1 @@
+#entry-listing-table tr.selected td.featured.yes img,
 #comment-listing-table tr.selected td.featured.yes img { 
    background-image: url(../images/star-listing-on.gif); 
 }
+#entry-listing-table td.featured.yes img,
 #comment-listing-table td.featured.yes img { 
    background-image: url(../images/star-listing.gif); 
 }
+.featured-link span { 
+   padding-left:20px;
+   background-position:4px 2px;
+   background-repeat:no-repeat;
+   background-image:url('../images/star-listing.gif');
+}

trunk/ForumUtils/plugins/ForumUtils/config.yaml

@@ -5 +5 @@
 author_name: Byrne Reese
 description: This plugin provides a number of utilities for forum administrators, including: a) promoting a comment to an entry, b) closing comments from the entry listing screen, and c) the ability to feature comments.
-version: 0.91
+version: 0.92
 plugin_link: http://www.majordojo.com/projects/forum-utils.php
-schema_version: 3
+schema_version: 4
 
 object_types:
     entry:
-        promoted_from_comment_id: integer
+        is_featured: smallint
+        promoted_from_comment_id: integer meta
     comment:
         is_featured: smallint
-        promoted_to_entry_id: integer
+        promoted_to_entry_id: integer meta
 
 tags:
@@ -23 +24 @@
         CommentIsPromoted?: $ForumUtils::ForumUtils::Plugin::tag_is_comment_promoted
         CommentIsFeatured?: $ForumUtils::ForumUtils::Plugin::tag_is_comment_featured
+        EntryIsFeatured?: $ForumUtils::ForumUtils::Plugin::tag_is_entry_featured
         EntryWasPromoted?: $ForumUtils::ForumUtils::Plugin::tag_was_entry_promoted
 
 callbacks:
     MT::App::CMS::template_source.comment_table: $ForumUtils::ForumUtils::Plugin::xfrm_featured_comments
+    MT::App::CMS::template_source.entry_table: $ForumUtils::ForumUtils::Plugin::xfrm_featured_entries
     MT::App::CMS::template_source.header: $ForumUtils::ForumUtils::Plugin::xfrm_header
-
+    MT::App::CMS::template_source.edit_entry: $ForumUtils::ForumUtils::Plugin::xfrm_edit_entry
 
 list_actions:
@@ -42 +45 @@
             label: Toggle Featured
             order: 100
-            code:  $ForumUtils::ForumUtils::Plugin::itemset_feature_comment
+            code:  $ForumUtils::ForumUtils::Plugin::itemset_feature
             permission: edit_all_posts
     entry:
@@ -49 +52 @@
             order: 200
             code:  $ForumUtils::ForumUtils::Plugin::itemset_close_comments
+            permission: edit_all_posts
+        feature:
+            label: Toggle Featured
+            order: 100
+            code:  $ForumUtils::ForumUtils::Plugin::itemset_feature
             permission: edit_all_posts
 
@@ -61 +69 @@
             label: Toggle Featured
             order: 100
-            code:  $ForumUtils::ForumUtils::Plugin::itemset_feature_comment
+            code:  $ForumUtils::ForumUtils::Plugin::itemset_feature
+    entry:
+        toggle_featured:
+            label: Toggle Featured
+            order: 100
+            code:  $ForumUtils::ForumUtils::Plugin::itemset_feature

trunk/ForumUtils/plugins/ForumUtils/lib/ForumUtils/Plugin.pm

@@ -114 +114 @@
 }
 
+sub itemset_feature {
+    my ($app) = @_;
+    $app->validate_magic or return;
+
+    my $type = $app->{query}->param('_type');
+    my $class = MT->model($type) if $type;
+    # TODO error if class is null
+
+    my @objs = $app->param('id');
+    for my $obj_id (@objs) {
+        my $obj = $class->load($obj_id) or next;
+        if ($obj->is_featured) {
+            $obj->is_featured(0);
+        } else {
+            $obj->is_featured(1);
+        }
+        $obj->save;
+        if ($type eq 'entry') {
+# TODO rebuild indexes?
+#           MT->instance->rebuild( Entry => $obj->entry_id );
+        } elsif ($type eq 'comment') {
+            MT->instance->rebuild( Entry => $obj->entry_id );
+        }
+    }
+
+    $app->add_return_arg( featured => 1 );
+    $app->call_return;
+}
+
+sub itemset_close_comments {
+    my ($app) = @_;
+    $app->validate_magic or return;
+
+    require MT::Entry;
+    my @entries = $app->param('id');
+    for my $entry_id (@entries) {
+        my $entry = MT::Entry->load($entry_id) or next;
+        $entry->allow_comments(0);
+        $entry->save or die $entry->errstr;
+        MT->instance->rebuild( Entry => $entry_id );
+    }
+    $app->add_return_arg( comments_closed => 1 );
+    $app->call_return;
+}
+
+sub tag_is_comment_promoted {
+    my ($ctx, $args, $cond) = @_;
+    my $c = $ctx->stash('comment')
+        or return $ctx->_no_comment_error($ctx->stash('tag'));
+    return ($c->promoted_to_entry_id > 0);
+
+}
+
+sub tag_promoted_to_entry_id {
+    my ($ctx, $args, $cond) = @_;
+    my $c = $ctx->stash('comment')
+        or return $ctx->_no_comment_error($ctx->stash('tag'));
+    return $c->promoted_to_entry_id;
+}
+
+sub tag_was_entry_promoted {
+    my ($ctx, $args, $cond) = @_;
+    my $e = $ctx->stash('entry')
+        or return $ctx->_no_entry_error($ctx->stash('tag'));
+    return ($e->promoted_from_comment_id > 0);
+
+}
+
+sub tag_is_comment_featured {
+    my ($ctx, $args, $cond) = @_;
+    my $obj = $ctx->stash('comment')
+        or return $ctx->_no_comment_error($ctx->stash('tag'));
+    return $obj->is_featured;
+
+}
+
+sub tag_is_entry_featured {
+    my ($ctx, $args, $cond) = @_;
+    my $obj = $ctx->stash('entry')
+        or return $ctx->_no_entry_error($ctx->stash('tag'));
+    return $obj->is_featured;
+
+}
+
+sub tag_promoted_from_comment_id {
+    my ($ctx, $args, $cond) = @_;
+    my $obj = $ctx->stash('entry')
+        or return $ctx->_no_entry_error($ctx->stash('tag'));
+    return $obj->promoted_from_comment_id;
+}
+
+sub xfrm_featured_comments {
+    my ($cb, $app, $html_ref) = @_;
+    
+    $$html_ref =~ s{(<th class="comment")}{<th class="featured"><img src="<mt:var name="static_uri">plugins/ForumUtils/images/star-listing.gif" alt="<__trans phrase="Featured">" width="9" height="9" /></th>$1}msg;
+
+    my $html = <<"EOF";
+                    <td class="featured <mt:if name="is_featured">yes</mt:if>">
+                <mt:if name="is_featured"> 
+                        <img src="<mt:var name="static_uri">images/spacer.gif" alt="<__trans phrase="Not Featured">" width="9" height="9" />
+               <mt:else>
+                        <img src="<mt:var name="static_uri">images/spacer.gif" alt="<__trans phrase="Not Featured">" width="9" height="9" />
+                </mt:if>
+                    </td>
+EOF
+
+    $$html_ref =~ s{(<td class="comment")}{$html$1}msg;
+    $$html_ref =~ s{<td>(.*<mt:if name="has_edit_access">)}{<td colspan="2">$1}msg;
+}
+
+# TODO use template param callback
+sub xfrm_featured_entries {
+    my ($cb, $app, $html_ref) = @_;
+    
+    $$html_ref =~ s{(<th class="title")}{<th class="featured"><img src="<mt:var name="static_uri">plugins/ForumUtils/images/star-listing.gif" alt="<__trans phrase="Featured">" width="9" height="9" /></th>$1}msg;
+
+    my $html = <<"EOF";
+                    <td class="featured <mt:if name="is_featured">yes</mt:if>">
+                <mt:if name="is_featured"> 
+                        <img src="<mt:var name="static_uri">images/spacer.gif" alt="<__trans phrase="Not Featured">" width="9" height="9" />
+               <mt:else>
+                        <img src="<mt:var name="static_uri">images/spacer.gif" alt="<__trans phrase="Not Featured">" width="9" height="9" />
+                </mt:if>
+                    </td>
+EOF
+
+    $$html_ref =~ s{(<td class="title")}{$html$1}msg;
+    $$html_ref =~ s{<td>(.*<mt:if name="has_edit_access">)}{<td colspan="2">$1}msg;
+}
+
+sub xfrm_header {
+    my ($cb, $app, $html_ref) = @_;
+    $$html_ref =~ s{</head>}{<link rel="stylesheet" href="<mt:var name="static_uri">plugins/ForumUtils/css/app.css" type="text/css" /></head>}m;
+#       if $app->mode eq 'list_comments';
+}
+
+sub xfrm_edit_entry {
+    my ($cb, $app, $html_ref) = @_;
+    $$html_ref =~ s{(<li class="pings-link">.*</li>)}{$1<mt:if name="is_featured"><li class="featured-link"><span>This is a featured entry</span></li></mt:if>}m;
+}
+
+1;
+
+__END__
+
+# Deprecated
+
 sub itemset_feature_comment {
     my ($app) = @_;
@@ -132 +279 @@
     }
 
-    $app->add_return_arg( promoted => 1 );
-    $app->call_return;
-}
-
-sub itemset_close_comments {
-    my ($app) = @_;
-    $app->validate_magic or return;
-
-    require MT::Entry;
-    my @entries = $app->param('id');
-    for my $entry_id (@entries) {
-        my $entry = MT::Entry->load($entry_id) or next;
-        $entry->allow_comments(0);
-        $entry->save or die $entry->errstr;
-        MT->instance->rebuild( Entry => $entry_id );
-    }
-    $app->add_return_arg( comments_closed => 1 );
-    $app->call_return;
-}
-
-sub tag_is_comment_promoted {
-    my ($ctx, $args, $cond) = @_;
-    my $c = $ctx->stash('comment')
-        or return $ctx->_no_comment_error($ctx->stash('tag'));
-    return ($c->promoted_to_entry_id > 0);
-
-}
-
-sub tag_promoted_to_entry_id {
-    my ($ctx, $args, $cond) = @_;
-    my $c = $ctx->stash('comment')
-        or return $ctx->_no_comment_error($ctx->stash('tag'));
-    return $c->promoted_to_entry_id;
-}
-
-sub tag_was_entry_promoted {
-    my ($ctx, $args, $cond) = @_;
-    my $e = $ctx->stash('entry')
-        or return $ctx->_no_entry_error($ctx->stash('tag'));
-    return ($e->promoted_from_comment_id > 0);
-
-}
-
-sub tag_is_comment_featured {
-    my ($ctx, $args, $cond) = @_;
-    my $c = $ctx->stash('comment')
-        or return $ctx->_no_comment_error($ctx->stash('tag'));
-    return $c->is_featured;
-
-}
-
-sub tag_promoted_from_comment_id {
-    my ($ctx, $args, $cond) = @_;
-    my $e = $ctx->stash('entry')
-        or return $ctx->_no_entry_error($ctx->stash('tag'));
-    return $e->promoted_from_comment_id;
-}
-
-sub xfrm_featured_comments {
-    my ($cb, $app, $html_ref) = @_;
-    
-    $$html_ref =~ s{(<th class="comment")}{<th class="featured"><img src="<mt:var name="static_uri">plugins/ForumUtils/images/star-listing.gif" alt="<__trans phrase="Featured">" width="9" height="9" /></th>$1}msg;
-
-    my $html = <<"EOF";
-                    <td class="featured <mt:if name="is_featured">yes</mt:if>">
-                <mt:if name="is_featured"> 
-                        <img src="<mt:var name="static_uri">images/spacer.gif" alt="<__trans phrase="Not Featured">" width="9" height="9" />
-               <mt:else>
-                        <img src="<mt:var name="static_uri">images/spacer.gif" alt="<__trans phrase="Not Featured">" width="9" height="9" />
-                </mt:if>
-                    </td>
-EOF
-
-    $$html_ref =~ s{(<td class="comment")}{$html$1}msg;
-    $$html_ref =~ s{<td>(.*<mt:if name="has_edit_access">)}{<td colspan="2">$1}msg;
-}
-
-sub xfrm_header {
-    my ($cb, $app, $html_ref) = @_;
-    $$html_ref =~ s{</head>}{<link rel="stylesheet" href="<mt:var name="static_uri">plugins/ForumUtils/css/app.css" type="text/css" /></head>}m;
-#       if $app->mode eq 'list_comments';
-}
-1;
-
+    $app->add_return_arg( featured => 1 );
+    $app->call_return;
+}