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 = (
|
my %Group_Labels = (
|
||||||
breaking => 'Breaking changes',
|
breaking => 'Breaking changes',
|
||||||
|
build => 'Build',
|
||||||
deprecation => 'Deprecations',
|
deprecation => 'Deprecations',
|
||||||
doc => 'Docs',
|
doc => 'Docs',
|
||||||
feature => 'New features',
|
feature => 'New features',
|
||||||
|
@ -70,6 +71,14 @@ sub dump_issues {
|
||||||
$month++;
|
$month++;
|
||||||
$year += 1900;
|
$year += 1900;
|
||||||
|
|
||||||
|
print <<"HTML";
|
||||||
|
<html>
|
||||||
|
<head>
|
||||||
|
<meta charset="UTF-8">
|
||||||
|
</head>
|
||||||
|
<body>
|
||||||
|
HTML
|
||||||
|
|
||||||
for my $group ( @Groups, 'other' ) {
|
for my $group ( @Groups, 'other' ) {
|
||||||
my $group_issues = $issues->{$group} or next;
|
my $group_issues = $issues->{$group} or next;
|
||||||
print "<h2>$Group_Labels{$group}</h2>\n\n<ul>\n";
|
print "<h2>$Group_Labels{$group}</h2>\n\n<ul>\n";
|
||||||
|
@ -115,6 +124,7 @@ sub dump_issues {
|
||||||
print "</ul>";
|
print "</ul>";
|
||||||
print "\n\n";
|
print "\n\n";
|
||||||
}
|
}
|
||||||
|
print "</body></html>\n";
|
||||||
}
|
}
|
||||||
|
|
||||||
#===================================
|
#===================================
|
||||||
|
|
Loading…
Reference in New Issue