CPAN::Groonga

e warnings;
use strict;
use Kwiki::Plugin '-Base';
use mixin 'Kwiki::Installer';
use IO::All;
use JSON;
our $VERSION = '0.01';

const class_title => 'Table of Contents';
const class_id => 'toc';
const

 'prototype');
	$registry->add(prerequisite => 'scriptaculous');
	$registry->add(prerequisite => 'json');
	$registry->add(preload => 'toc');
	$registry->add(action => 'save_toc');
}

sub save_toc {
	C

l>'
			: '';
		qq{<li><a href="$link"$class>$text</a>$subtree</li>};
	} defined $_[0] ?@{$_[0]}:@{jsonToObj($self->structure_file->slurp)}));
}

1; # End of Kwiki::TableOfContents
__DATA__
=head1 NAME