package syntaxhighlighter::xml;
$VERSION = '0.02';
sub load{
use Wx qw(wxSTC_LEX_XML wxSTC_H_TAG);
$_[0]->SetLexer( wxSTC_LEX_XML ); # Set Lexers to use
$_[0]->SetKeyWords(1,""); # Add new keyword.
$_[0]->StyleSetSpec( wxSTC_H_TAG, "fore:#000055" ); # Apply tag style for selected lexer (blue)
$_[0]->StyleSetSpec(0,"fore:#995544,bold"); # Text
$_[0]->StyleSetSpec(1,"fore:#222288"); # Tags
$_[0]->StyleSetSpec(2,"fore:#222288,back:#FFFFFF"); # Unknown TagsFFE0E0
$_[0]->StyleSetSpec(3,"fore:#008800"); # Attributes
$_[0]->StyleSetSpec(4,"fore:#004040,back:#FFFFFF"); # Unknown Attributes#FFE0E0
$_[0]->StyleSetSpec(5,"fore:#007f7f,bold"); # Numbers
$_[0]->StyleSetSpec(6,"fore:#dd5544"); # Double quoted strings
$_[0]->StyleSetSpec(7,"fore:#dd5544"); # Single quoted string
$_[0]->StyleSetSpec(8,"fore:#bbbb44"); # Other inside tag
$_[0]->StyleSetSpec(9,"fore:#bbbbbb"); # Comment
$_[0]->StyleSetSpec(10,"fore:#004000,bold"); # Entities
$_[0]->StyleSetSpec(11,"fore:#000000,bold"); # XML style tag ends '/>'
$_[0]->StyleSetSpec(12,"fore:#228822"); # XML identifier start '<?'
$_[0]->StyleSetSpec(13,"fore:#339933"); # XML identifier end '?>'
$_[0]->StyleSetSpec(14,"fore:#44aa44"); # SCRIPT
$_[0]->StyleSetSpec(15,"fore:#55bb55");
$_[0]->StyleSetSpec(17,"fore:#000000,back:#A0FFA0"); # CDATA
$_[0]->StyleSetSpec(18,"fore:#000000,back:#F0E080"); # Question
$_[0]->StyleSetSpec(19,"fore:#FFFF00,back:#8080A0"); # Unquoted Value
$_[0]->StyleSetSpec(20,"fore:#FFFF00,back:#A08080");
$_[0]->StyleSetSpec(21,"fore:#600000,back:#FFF0D8");
$_[0]->StyleSetSpec(22,"fore:#000000,back:#DDD0DD");
$_[0]->StyleSetSpec(23,"fore:#7F007F,back:#DDD0DD,notbold");
$_[0]->StyleSetSpec(24,"fore:#7F007F,back:#DDD0DD,bold");
$_[0]->StyleSetSpec(25,"fore:#7F007F,back:#DDD0DD,italics");
$_[0]->StyleSetSpec(26,"fore:#7F007F,notbold");
$_[0]->StyleSetSpec(27,"fore:#000000");
$_[0]->StyleSetSpec(28,"fore:#000000");
$_[0]->StyleSetSpec(29,"fore:#000000");
$_[0]->StyleSetSpec(30,"fore:#000000");
$_[0]->StyleSetSpec(31,"fore:#000000"); # No brace matching in XML
}
1;