From ab65a304bee598f6d5fcfb1ffa434e1e60b34a18 Mon Sep 17 00:00:00 2001 From: Ian Young Date: Sun, 19 Jan 2014 14:19:59 +0000 Subject: [PATCH] Remove some long-standing odd characters in comments. --- build/check_embedded.pl | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/build/check_embedded.pl b/build/check_embedded.pl index 6a6d8852..10e3fb56 100755 --- a/build/check_embedded.pl +++ b/build/check_embedded.pl @@ -9,7 +9,7 @@ # UK federation metadata. # # The certificates are provided on standard input in PEM format with header lines -# indicating the entity with which they are associated. +# indicating the entity with which they are associated. # # Command line options: # @@ -145,7 +145,7 @@ sub comment { $keyname = $args[3]; # - # Output header line. + # Output header line. # $oline = "Entity $entity "; $hasKeyName = !($keyname eq '(none)'); @@ -217,7 +217,7 @@ sub comment { my %names; # - # Use openssl to convert the certificate to text + # Use openssl to convert the certificate to text # my(@lines, $subject, $issuer, $subjectCN, $issuerCN, $fingerprint); $cmd = "openssl x509 -in $filename -noout -text -nameopt RFC2253 -modulus -fingerprint|"; @@ -317,8 +317,8 @@ sub comment { # $next =~ s/\s*//g; my @altNames = split /\s*,\s*/, $next; - # my $altSet = "{" . join(", ", @altNames) . "}"; - # print "Alt set: $altSet\n"; + # my $altSet = "{" . join(", ", @altNames) . "}"; + # print "Alt set: $altSet\n"; # # Each "DNS" component is an additional name for this certificate. @@ -397,7 +397,7 @@ sub comment { close SSL; # - # Irrespective of what went wrong, client and server results should match. + # Irrespective of what went wrong, client and server results should match. # if ($clientOK != $serverOK) { error("client/server purpose result mismatch: $clientOK != $serverOK");