$wiki->add_hook("title3", "plugin::book::Title3");
$wiki->add_inline_plugin("br", "plugin::book::Br");
- $wiki->add_inline_plugin("raw" ,"plugin::book::Raw" ,"HTML");
$wiki->add_paragraph_plugin("keyword" ,"plugin::book::Keyword" ,"HTML");
my @paths = split(/\//, $wiki->get_CGI()->path_info());
+++ /dev/null
-################################################################################
-#
-# <p>°ú¿ô¤Ç»ØÄꤷ¤¿Ê¸»úÎó¤ò¤½¤Î¤Þ¤Þɽ¼¨¤¹¤ë¥¤¥ó¥é¥¤¥ó¥×¥é¥°¥¤¥ó¤Ç¤¹¡£</p>
-# <pre>
-# {{raw '''°ú¿ô¤Ç»ØÄꤷ¤¿Ê¸»úÎó¤ò¤½¤Î¤Þ¤Þɽ¼¨¤·¤Þ¤¹'''}}
-# </pre>
-#
-################################################################################
-package plugin::book::Raw;
-use Encode qw(decode);
-#==============================================================================
-# ¥³¥ó¥¹¥È¥é¥¯¥¿
-#==============================================================================
-sub new {
- my $class = shift;
- my $self = {};
- return bless $self,$class;
-}
-
-#==============================================================================
-# ¥¤¥ó¥é¥¤¥ó¥á¥½¥Ã¥É
-#==============================================================================
-sub inline {
- my $self = shift;
- my $wiki = shift;
- my $text = shift;
- return Util::escapeHTML($text);
-}
-
-1;