新規作成 | 管理 | 差分 | 検索 | FrontPage | ページ一覧 | 更新履歴 | RSS

PlugIn/include - 受け取ったページ名の内容を取り込む

管理

受け取ったページ名の内容を取り込む

$plugin->def("include",
  "受け取ったページ名の内容を取り込む",
  sub {
    my @targets = @_;
    return "" unless @targets;
    my @ret;
    foreach my $target (@targets) {
      next if $target eq $form{mypage};
      my $content = $database{$target};
      $content =~ s/^(\*+)/'!' x length($1)/mge;
      $content =~ s/$embedded_name//go;
      push @ret, qq(<div class="included">);
      push @ret, "'''from ["."[$target]"."]'''\n";
      push @ret, CGI::escapeHTML($content);
      push @ret, qq(</div>);
    }
    return join "\n", @ret;
  }
);

[FIX] Eliminate embedded name ( [[#hogehoge(3)]] )[済]

管理

2003-07-02 (Wed) 14:43:32 これも。--SHIMADA

      my $content = $database{$target};
      $content =~ s/^(\*+)/'!' x length($1)/mge;
-     $content =~ s/\[\[#[a-z]+\]\]//go;
+     $content =~ s/$embedded_name//go;
      push @ret, qq(<div class="included">);