Changeset 2684 for branches/release-41/lib/MT/Template/ContextHandlers.pm

Timestamp:

07/03/08 00:38:35 (17 months ago)

Author:

bchoate

Message:

Fixed column-based sort_by for authors tag. Added 'glue' attribute support for comments tag.

Files:

• branches/release-41/lib/MT/Template/ContextHandlers.pm (modified) (4 diffs)

branches/release-41/lib/MT/Template/ContextHandlers.pm

@@ -6267 +6267 @@
             $score_offset = delete($args->{offset}) || 0;
             $re_sort = 1;
+        } elsif (MT::Author->has_column($args->{sort_by})) {
+            $args{'sort'} = $args->{sort_by};
         }
     }
@@ -10133 +10135 @@
     local $ctx->{__stash}{commenter} = $ctx->{__stash}{commenter};
     my $vars = $ctx->{__stash}{vars} ||= {};
+    my $glue = $args->{glue};
     for my $c (@comments) {
         local $vars->{__first__} = $i == 1;
@@ -10153 +10156 @@
               CommentsFooter => ($i == scalar @comments), %$cond } );
         return $ctx->error( $builder->errstr ) unless defined $out;
+        $html .= $glue if defined $glue && length($html) && length($out);
         $html .= $out;
         $i++;
@@ -10454 +10458 @@
         my $root_url = $static_path . "images";
         $logo = "$root_url/nav-commenters.gif";
+    }
+    if ($logo =~ m!^/!) {
+        # relative path, prepend blog domain
+        my $blog = $ctx->stash('blog');
+        if ($blog) {
+            my ($blog_domain) = $blog->archive_url =~ m|(.+://[^/]+)|;
+            $logo = $blog_domain . $logo;
+        }
     }
     my $result = qq{<img alt=\"Author Profile Page\" src=\"$logo\" width=\"16\" height=\"16\" />};