差分表示
- 最後の更新で追加された行はこのように表示します。
- 最後の更新で削除された行はこのように表示します。
部分編集後、またはコメント書き込み後に編集箇所にジャンプします。
* [jump to part]
$skip_succeed_page = 1 の場合は編集箇所のセクションに自動的にジャンプ、
$skip_succeed_page = 0 の場合には$CompletedSuccessfullyページからのリンクが該当セクションへのリンクになります。
** 関連するカスタマイズ
-[[WalWiki/カスタマイズ/セクションへのリンク]]
** do_write()内の変更
&set_info($form{mypage}, $info_IsFrozen, 0 + $form{myfrozen});
# yakty add [jump to part] start
my $part = sprintf("#i%d", $form{mypart} - 2) if ($form{mypart} >= 2);
$part = sprintf("#c%d", $form{mycmtno}) if($form{mycmd} eq 'comment'); # yakty add [jump to part]
my $linkurl = &armor_name($form{mypage} . $part);
return if ($skip_succeed_page and &redirect_to($linkurl)); # Walrus add [skip succeed page] start
# yakty add [jump to part] end
#return if ($skip_succeed_page and &redirect_to(&armor_name($form{mypage}))); # Walrus add [skip succeed page] start # yakty del [jump to part]
&print_header($CompletedSuccessfully);
&print_message($resource{saved});
&print_content("$resource{continuereading} $linkurl"); # yakty add [jump to part]
#&print_content("$resource{continuereading} @{[&armor_name($form{mypage})]}"); # yakty del [jump to part]
&print_footer($CompletedSuccessfully);
} else {
** embedded_to_html()内の変更
- 2003-12-15 (Mon) 09:20:28 <a name="#c%d">を<a name="c%d">に修正。
if ($embedded eq $embed_comment or $embedded eq $embed_rcomment) {
my $lastmodified = &get_info($form{mypage}, $info_LastModified);
$comment_no++; # yakty add [multi comment]
return <<"EOD";
@{[sprintf(qq(<a name="#c%d"> </a>), $comment_no)]}<!-- yakty add [jump to part] -->
@{[sprintf(qq(<a name="c%d"> </a>), $comment_no)]}<!-- yakty add [jump to part] -->
<form action="$url_xcg" method="post"><!-- yakty mod [for XREA] -->
<input type="hidden" name="mycmd" value="comment">
<input type="hidden" name="mypage" value="$escapedmypage">
<input type="hidden" name="myLastModified" value="$lastmodified">
02793