【しばらく編集不可モードで運営します】 編集(管理者用) | 差分 | 新規作成 | 一覧 | RSS | FrontPage | 検索 | 更新履歴

linkプラグイン -

目次

リンクを作るプラグイン

それでは&link(Google,http://www.google.com/)で探してみては?

それではGoogleで探してみては?

WikiName のエイリアスへの対応

WikiName のエイリアスにも使えるように link.pl の plugin_inline を 変更してみました。&link(うぃきねーむ,WikiName) みたいに使います。 既にページが作成されているときのみリンクになります。 InterWiki とかには対応してないです。

sub plugin_inline {
    my ($escaped_argument, $context) = @_;
    my ($caption, $url) = split(/,/, $escaped_argument);
    if ($url =~ /^(mailto|http|https|ftp):/) {
        return qq(<a href="$url">$caption</a>);
    } else {
	$url = &main::unarmor_name($url);
	$url = &main::unescape($url); # To treat '&' or '>' or '<' correctly.
	my $cookedurl = &main::encode($url);
	if (&main::is_exist_page($url) || $url eq "FrontPage") {
	    return qq(<a href="$context->{url_cgi}?$cookedurl">$caption</a>);
	} else {
	    return qq(&link($escaped_argument));
	}
    }
}

コメント Google コメント

(Too many spams ... embedded comments are not allowed now, sorry.)
511行目近辺。
push(@toc, '-' x length($1) . qq( <a href="#i$tocnum">@{[&escape($2)]}</a>\n));
↓
push(@toc, '-' x length($1) . qq( <a href="#i$tocnum">@{[&inline($2)]}</a>\n));

プラグイン機能