BugTrack-wiki/344 pagelist.cacheの先頭行が削除される場合に改行だけの行ができてしまいページが表示できなくなってしまうという問題を修正。

diff --git a/lib/Wiki/DefaultStorage.pm b/lib/Wiki/DefaultStorage.pm
index 6149497..d2cf057 100644 (file)
--- a/lib/Wiki/DefaultStorage.pm
+++ b/lib/Wiki/DefaultStorage.pm
@@ -206,7 +206,7 @@ sub _create_page_list_file {
        }
        if($flag eq "remove"){
                my $names = Util::load_config_text(undef, $file);
-               $names =~ s/(^|\n)\Q$page\E\n/\n/;
+               $names =~ s/(^|\n)\Q$page\E\n/$1/;
                Util::save_config_text(undef, $file, $names);
        } elsif($flag eq 'update'){
                # ¥Ú¡¼¥¸¤Î¹¹¿·»þ¤Ï²¿¤â¤·¤Ê¤¤