<link rel="stylesheet" type="text/css" media="all" href="base.css">
<!--[if lte IE 6]><style> .help dl.legend dt {margin:0 0 1px} </style><![endif]-->
<!--[if lte IE 7]><style> .help dl.legend dd {float:none} </style><![endif]--><:
- my %styles = map {$_ => $_} qw(dark circus mono terse);
+ my %styles = map {$_ => $_} qw(dark circus mono red terse);
our $style = exists $get{style} && $styles{$get{style}} || 'light';
printf(qq{\n<link rel="%s" type="text/css" media="all" href="%s" title="%s">},
$_ eq $style ? 'stylesheet' : 'alternate stylesheet', "$_.css", $_