package H2H::RC;

sub init {
  my $o = shift;
  $o->{title} = 'ブルーオーシャンズ';
  $o->{subtitle} = '';
  $o->{theme} = 'Default';
  $o->{theme09} = 'general';
  $o->{favicon} = '../../favicon';
  
  $o->{YYYY} = 2001;
  if ($o->{file} =~ /^([0-9]{2})/) {
    $o->{MM} = $1;
    $o->{M} = $o->{MM}+0;
    $o->{subtitle} = ', '.$o->{M}.'月';
    $o->{headerfile} = $o->{pathtofile}.'.header-month';
    $o->{footerfile} = $o->{pathtofile}.'.footer-month';
    if ($o->{M} == 1) {
      $o->{prev_month_M} = 12;
      $o->{prev_month_MM} = '12';
      $o->{prev_month_YYYY} = $o->{YYYY}-1;
      $o->{next_month_M} = 2;
      $o->{next_month_MM} = '02';
      $o->{next_month_YYYY} = $o->{YYYY};
    } elsif ($o->{M} == 12) {
      $o->{prev_month_M} = 11;
      $o->{prev_month_MM} = '11';
      $o->{prev_month_YYYY} = $o->{YYYY};
      $o->{next_month_M} = 1;
      $o->{next_month_MM} = '01';
      $o->{next_month_YYYY} = $o->{YYYY}+1;
    } else {
      $o->{prev_month_M} = $o->{M}-1;
      $o->{prev_month_MM} = sprintf('%02d', $o->{prev_month_M});
      $o->{prev_month_YYYY} = $o->{YYYY};
      $o->{next_month_M} = $o->{M}+1;
      $o->{next_month_MM} = sprintf('%02d', $o->{next_month_M});
      $o->{next_month_YYYY} = $o->{YYYY};
    }
  }
}

1;