OSDN Git Service

書籍執筆用のプラグインをsandboxにコミットしておきます。
[fswiki/sandbox.git] / takezoe / plugin / book / Column.pm
1 ###############################################################################
2 #
3 # <p>¥³¥é¥à¤òµ­½Ò¤¹¤ë¤¿¤á¤Î¥Ö¥í¥Ã¥¯¥×¥é¥°¥¤¥ó¤Ç¤¹¡£</p>
4 # <pre>
5 # {{column ¥³¥é¥à¤Î¥¿¥¤¥È¥ë
6 # ¥³¥é¥àËÜʸ
7 # }}
8 # </pre>
9 # <p>¥³¥é¥àËÜʸ¤ÏWiki·Á¼°¤Çµ­½Ò¤¹¤ë¤³¤È¤¬¤Ç¤­¤Þ¤¹¡£</p>
10 #
11 ###############################################################################
12 package plugin::book::Column;
13 #==============================================================================
14 # ¥³¥ó¥¹¥È¥é¥¯¥¿
15 #==============================================================================
16 sub new {
17         my $class = shift;
18         my $self = {};
19         return bless $self,$class;
20 }
21
22 #==============================================================================
23 # ¥Ö¥í¥Ã¥¯¥á¥½¥Ã¥É
24 #==============================================================================
25 sub block {
26         my $self    = shift;
27         my $wiki    = shift;
28         my $content = shift;
29         my $title   = shift;
30         
31         return '<div class="column-title">¥³¥é¥à: '.Util::escapeHTML($title).'</div>'.
32                 '<div class="column-body">'.$wiki->process_wiki($content).'</div>';
33 }
34
35 1;