sub load_tmpl {
        my $self = shift;
    my $app = MT->instance;
=item

/* Experimental comment styles
    Not currently in use anywhere in default templates
    For testing only... */
#comments-experimental .comment, #comments-experimental .comment .comment-inner {
    width:36em;

Installation:
1) Run MakeFile.PL to install all dependencies.
2) Import the SQL schema.
3) Edit typeface.yml to suit your needs.
4) Run create_login.pl

#!/usr/bin/perl

use strict;
use lib $ENV{MT_HOME} ? "$ENV{MT_HOME}/lib" : 'lib';
use MT::Bootstrap;

# Then, in your script, you can build the params this way...
$param{tagsdelimiter_option_loop} = [
    { label => 'Comma', value => ',' },
    { label =>  'Space', value => ' ', selected => option_selected() },
];

<!-- This goes in your template and is driven by the app -->
<select name="TagsDelimiter" id="tag_app_delim">
<TMPL_LOOP NAME=TAGSDELIMITER_OPTION_LOOP>
    <option value="<TMPL_VAR NAME=VALUE>" <TMPL_VAR NAME=SELECTED>><TMPL_VAR NAME=LABEL></option>
</TMPL_LOOP>

sub load_tmpl {
    my $app = shift;
    my($file, @p) = @_;
    my $cfg = $app->config;
    require HTML::Template;

$VAR1 = [
          bless( {
                   'column_values' => {
                                        'build_time' => '1164731333',
                                        'priority' => '1',

    if ( grep { $_ eq $args->{mode} } qw( loop context ) ) {
        my $sub = $args->{mode};
        return &$sub($plugin, @_) or $ctx->error($ctx->errstr);
    }

sub filter_blogs {
    my ( $ctx, $args ) = @_;
    my $local_blog_id = $ctx->stash('local_blog_id');
    my (%terms, %args, %blog_can_access, $disallowed);

<?php
function smarty_block_MTCategories($args, $content, &$ctx, &$repeat) {
    // status: incomplete
    // parameters: show_empty
    $localvars = array('_categories', '_categories_counter', 'category', 'inside_mt_categories', 'entries', '_categories_glue', 'blog_id', 'blog');

sub _hdlr_categories {
    my($ctx, $args, $cond) = @_;
    my (%terms, %args);
    $ctx->set_blog_context($args, \%terms, \%args);
    require MT::Placement;

----------------------------------------------
BEGIN MTEntries
END MTEntries

BEGIN MTEntries blog_ids="1"

----------------------------------------------
BEGIN MTMultiBlog include_blogs="all"

    BEGIN MTEntries
        Second weblog third post

Second weblog third post
Second weblog second post
Second weblog first post
First weblog second post
First weblog's first post