差分表示
- 最後の更新で追加された行はこのように表示します。
- 最後の更新で削除された行はこのように表示します。
do_adminedit()のリファクタリング
* [refactoring adminedit]
do_edit()に機能を追加するとdo_adminedit()にも同じコードを追加しなければいけないので、
この2つの関数を統合します。
** do_edit()内の変更
sub do_edit {
my ($admin) = @_; # yakty add [refactoring adminedit]
# Walrus add [edit admin only] start
if ($edit_admin_only) {
# yakty del [refactoring adminedit] start
#&do_adminedit;
#return;
# yakty del [refactoring adminedit] end
$admin = 1; # yakty add [refactoring adminedit]
}
# Walrus add [edit admin only] end
#} elsif (&is_frozen($page)) { # yakty del [certified]
#} elsif (&is_frozen($page) == $frozen_frozen) { # yakty add [certified] # yakty del [refactoring adminedit]
} elsif (not $admin and &is_frozen($page) == $frozen_frozen) { # yakty add [certified] # yakty add [refactoring adminedit]
↓数カ所ある下記部分を変更。
#&print_editform($mymsg, &get_info($page, $info_LastModified), admin=>0); # yakty del [refactoring adminedit]
&print_editform($mymsg, &get_info($page, $info_LastModified), admin=>$admin); # yakty add [refactoring adminedit]
** do_adminedit()内の変更
do_adminedit()内の処理を全て削除して、do_edit()に1を渡してコールする。
sub do_adminedit {
&do_edit(1); # yakty add [refactoring adminedit]
}
** print_editform()内の変更
do_adminedit()内で表示していたpasswordneededのメッセージをここで表示するように変更。
sub print_editform {
my ($mymsg, $lastmodified, %mode) = @_;
my $frozen = &is_frozen($form{mypage});
&print_message($resource{passwordneeded}) if($mode{admin}); # yakty add [refactoring adminedit]
if ($form{mypreview}) {
01899