Changeset 226

Timestamp:

06/17/06 23:58:49 (2 years ago)

Author:

ogawa

Message:

Add MTTagXSearchLink tag.

Files:

• TagSupplementals/trunk/TagSupplementals.pl (modified) (2 diffs)

TagSupplementals/trunk/TagSupplementals.pl

@@ -44 +44 @@
             on_stash => \&xsearch_on_stash,
         });
+        MT::Template::Context->add_tag(TagXSearchLink => \&tag_xsearch_link);
         MT::Template::Context->add_container_tag(XSearchTags => \&xsearch_tags);
     }
@@ -179 +180 @@
 }
 
+sub tag_xsearch_link {
+    my ($ctx, $args, $cond) = @_;
+    my $tag = $ctx->stash('Tag') or return '';
+    my $delimiter = $args->{delimiter} || '';
+    my $path = MT::Template::Context->_hdlr_cgi_path($ctx);
+
+    $path . 'mt-xsearch.cgi' . '?blog_id=' . $ctx->stash('blog_id') .
+        '&search_key=TagSupplementals' .
+        ($delimiter ? '&delimiter=' . MT::Util::encode_url($delimiter) : '') .
+        '&search=' . MT::Util::encode_url($tag->name);
+}
+
 sub xsearch_tags {
     my ($ctx, $args, $cond) = @_;