#?SuikaWikiConfig/2.0

Plugin:
  @Name: Downgrade
  @Description:
    @@@: WikiView output partial downgrade for old clients
    @@lang:en
  @License: %%GPL%%
  @Author:
    @@Name:
      @@@@: Wakaba
      @@@lang:ja
      @@@script:Latn
    @@Mail[list]: w@suika.fam.cx
  @Date.RCS: $Date: 2003/12/26 07:01:21 $
  @RequiredModule[list]:
  @RequiredPlugin[list]:
    WikiView
    WikiStruct
    WikiLinking
    HTML

PluginConst:
  @NS_XHTML1:
    http://www.w3.org/1999/xhtml

Function:
  @Name: set_downgrade_flags
  @Description:
    @@@: Setting value to downgrade flags ($wiki->{var}->{client}->{downgrade})
    @@lang:en
  @Main:
    my (undef, $wiki) = @_;
    my $flag = $wiki->{var}->{client}->{downgrade} ||= {};
    my $ua_name = $wiki->{var}->{client}->{user_agent_name};
    
    ## Classic Mozilla
    if ($ua_name =~ m#^Mozilla/[0-4]\.#) {
      $flag->{html_no_id} = 1;
    }