This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
podcheck.t: Line up comments.
authorAbigail <abigail@abigail.be>
Thu, 19 Nov 2015 12:28:57 +0000 (13:28 +0100)
committerAbigail <abigail@abigail.be>
Thu, 19 Nov 2015 12:34:25 +0000 (13:34 +0100)
A block with all comments lined up, save for one? That hurts the eyes.

t/porting/podcheck.t

index d599966..a4e84c2 100644 (file)
@@ -1132,12 +1132,12 @@ package Tie_Array_to_FH {  # So printing actually goes to an array
 
 
 my %filename_to_checker; # Map a filename to its pod checker object
-my %id_to_checker;      # Map a checksum to its pod checker object
-my %nodes;              # key is filename, values are nodes in that file.
-my %nodes_first_word;   # same, but value is first word of each node
-my %valid_modules;      # List of modules known to exist outside us.
-my %digests;            # checksums of files, whose names are the keys
-my %filename_to_pod;    # Map a filename to its pod NAME
+my %id_to_checker;       # Map a checksum to its pod checker object
+my %nodes;               # key is filename, values are nodes in that file.
+my %nodes_first_word;    # same, but value is first word of each node
+my %valid_modules;       # List of modules known to exist outside us.
+my %digests;             # checksums of files, whose names are the keys
+my %filename_to_pod;     # Map a filename to its pod NAME
 my %files_with_unknown_issues;
 my %files_with_fixes;