#!/usr/bin/perl # Color coding # Note statuses will get lowercased before lookup %statusStyle = ( 'accepted' => 'a', 'retracted' => 'a', 'rejected' => 'r', 'objection' => 'fo', 'deferred' => 'd', 'invalid' => 'oi', 'outofscope' => 'oi', ); # Header template is at the end of the file ################################################################################ my $inFile = $ARGV[0]; if (!$inFile) { print "\nPass in issues list filename for processing!\n\n"; print "~~~~~~~~~~~~~~~~~~~~~ Template for issues-list.txt ~~~~~~~~~~~~~~~~~~~~~\n"; print <<", $inFile || die "Cannot open $inFile: $!"; open OUT, ">", $outFile || die "Cannot open $outFile: $!"; $/ = "----\n"; # Header &header; # Issues while () { chomp; # Issue number s/Issue (\d+)\./Issue \1. #<\/a>/; $index = $1; # Color coding $code = ''; if (/\nVerified:\s+http/) { $code = 'a'; } elsif (/\n(?:Closed|Open):\s+(\S+)/) { $code = $statusStyle{lc $1}; } if (/\nOpen/) { $code .= ' ' if $code; $code .= 'open'; } # And print it print OUT "

\n";
  s/(http\S+)/\1<\/a>/g;
  print OUT;
  print OUT "

\n"; } sub header { # Read header local $_ = ; chomp; # Extract title and URL my $title, $url; for (split /\n+/) { $title = $1 if (/^Title:\s+(.+)$/); $url = $1 if (/^Draft:\s+(\S+)/); } die "Error: missing document URL or title.\n" unless ($url && $title); # Process URL to get status, date, shorname die "Error: Draft URL wrong format.\n" unless ($url =~ /([A-Z]{2})-([a-z0-9-]+)-(\d{8})/); ($status, $shortname, $date) = ($1, $2, $3); $status = 'LCWD' if ('WD' eq $status && $inFile =~ /[lL][cC]/); $date = "$1-$2-$3" if ($date =~ /(\d{4})(\d{2})(\d{2})/); # Print it all out print OUT < $title Disposition of Comments for $date $status

$title Disposition of Comments for $date $status

Last call document: $url

Editor's draft: http://dev.w3.org/csswg/$shortname/

The following color coding convention is used for comments:

Accepted or Rejected and positive response
Rejected and no response
Rejected and negative response
Deferred
Out-of-Scope or Invalid and not verified

Open issues are marked like this

An issue can be closed as Accepted, OutOfScope, Invalid, Rejected, or Retracted. Verified indicates commentor's acceptance of the response.

XXX }