############################################################ # #
ページのアウトラインを表示します。
#
# {{outline}}
#
#
############################################################
package plugin::info::Outline;
use strict;
use plugin::info::OutlineParser;
#===========================================================
# コンストラクタ
#===========================================================
sub new {
my $class = shift;
my $self = {};
return bless $self,$class;
}
#===========================================================
# パラグラフメソッド
#===========================================================
sub paragraph {
my $self = shift;
my $wiki = shift;
my $cgi = $wiki->get_CGI;
my $p_cnt = 0;
my $pagename = $cgi->param("page");
# ページの参照権限があるかどうか調べる
unless($wiki->can_show($pagename)){
return undef;
}
my $parser = plugin::info::OutlineParser->new($wiki);
return $parser->outline($wiki->get_page($pagename));
}
1;