Release notes: Add HTML header with UTF-8 encoding
This commit is contained in:
parent
a9ee78dd08
commit
bd381b86ca
|
@ -33,6 +33,7 @@ my @Groups = qw(
|
|||
);
|
||||
my %Group_Labels = (
|
||||
breaking => 'Breaking changes',
|
||||
build => 'Build',
|
||||
deprecation => 'Deprecations',
|
||||
doc => 'Docs',
|
||||
feature => 'New features',
|
||||
|
@ -70,6 +71,14 @@ sub dump_issues {
|
|||
$month++;
|
||||
$year += 1900;
|
||||
|
||||
print <<"HTML";
|
||||
<html>
|
||||
<head>
|
||||
<meta charset="UTF-8">
|
||||
</head>
|
||||
<body>
|
||||
HTML
|
||||
|
||||
for my $group ( @Groups, 'other' ) {
|
||||
my $group_issues = $issues->{$group} or next;
|
||||
print "<h2>$Group_Labels{$group}</h2>\n\n<ul>\n";
|
||||
|
@ -115,6 +124,7 @@ sub dump_issues {
|
|||
print "</ul>";
|
||||
print "\n\n";
|
||||
}
|
||||
print "</body></html>\n";
|
||||
}
|
||||
|
||||
#===================================
|
||||
|
|
Loading…
Reference in New Issue