|
|
@@ -72,27 +72,27 @@ sub dump_issues {
|
|
|
$month++;
|
|
|
$year += 1900;
|
|
|
|
|
|
- print <<"HTML";
|
|
|
-<html>
|
|
|
-<head>
|
|
|
- <meta charset="UTF-8">
|
|
|
-</head>
|
|
|
-<body>
|
|
|
-HTML
|
|
|
+ print <<"ASCIIDOC";
|
|
|
+:issue: https://github.com/${User_Repo}issues/
|
|
|
+:pull: https://github.com/${User_Repo}pull/
|
|
|
+
|
|
|
+[[release-notes-$version]]
|
|
|
+== $version Release Notes
|
|
|
+
|
|
|
+ASCIIDOC
|
|
|
|
|
|
for my $group ( @Groups, 'other' ) {
|
|
|
my $group_issues = $issues->{$group} or next;
|
|
|
- print "<h2>$Group_Labels{$group}</h2>\n\n<ul>\n";
|
|
|
+ print "[[$group-$version]]\n"
|
|
|
+ . "[float]\n"
|
|
|
+ . "=== $Group_Labels{$group}\n\n";
|
|
|
|
|
|
for my $header ( sort keys %$group_issues ) {
|
|
|
my $header_issues = $group_issues->{$header};
|
|
|
- my $prefix = "<li>";
|
|
|
- if ($header) {
|
|
|
- print "<li>$header:<ul>";
|
|
|
- }
|
|
|
+ print( $header || 'HEADER MISSING', "::\n" );
|
|
|
+
|
|
|
for my $issue (@$header_issues) {
|
|
|
my $title = $issue->{title};
|
|
|
- $title =~ s{`([^`]+)`}{<code>$1</code>}g;
|
|
|
|
|
|
if ( $issue->{state} eq 'open' ) {
|
|
|
$title .= " [OPEN]";
|
|
|
@@ -102,30 +102,23 @@ HTML
|
|
|
}
|
|
|
my $number = $issue->{number};
|
|
|
|
|
|
- print encode_utf8( $prefix
|
|
|
- . $title
|
|
|
- . qq[ <a href="${Issue_URL}${number}">#${number}</a>] );
|
|
|
+ print encode_utf8("* $title {pull}${number}[#${number}]");
|
|
|
|
|
|
if ( my $related = $issue->{related_issues} ) {
|
|
|
my %uniq = map { $_ => 1 } @$related;
|
|
|
print keys %uniq > 1
|
|
|
? " (issues: "
|
|
|
: " (issue: ";
|
|
|
- print join ", ",
|
|
|
- map {qq[<a href="${Issue_URL}${_}">#${_}</a>]}
|
|
|
+ print join ", ", map {"{issue}${_}[#${_}]"}
|
|
|
sort keys %uniq;
|
|
|
print ")";
|
|
|
}
|
|
|
- print "</li>\n";
|
|
|
- }
|
|
|
- if ($header) {
|
|
|
- print "</ul></li>\n";
|
|
|
+ print "\n";
|
|
|
}
|
|
|
+ print "\n";
|
|
|
}
|
|
|
- print "</ul>";
|
|
|
print "\n\n";
|
|
|
}
|
|
|
- print "</body></html>\n";
|
|
|
}
|
|
|
|
|
|
#===================================
|
Clinton Gormley