chomp lines from key index files
authorMatthias Förste <foerste@schlittermann.de>
Mon, 30 May 2011 16:54:21 +0200
changeset 127 dcb0e36376ab
parent 126 d0156ec3aafb
child 128 ce219be2c383
chomp lines from key index files
bin/update-serial
--- a/bin/update-serial	Mon May 30 16:52:47 2011 +0200
+++ b/bin/update-serial	Mon May 30 16:54:21 2011 +0200
@@ -523,7 +523,7 @@
         # we cut the basenames (w/o the .private|.key suffix)
         open(my $zsk, "<$dir/.index.zsk") or die "$dir/.index.zsk: $!\n";
         open(my $ksk, "<$dir/.index.ksk") or die "$dir/.index.ksk: $!\n";
-        @keys = (<$zsk>, <$ksk>);
+        chomp(@keys = (<$zsk>, <$ksk>));
     }
 
     # prueft alle schluesseldateien (ksk, zsk) ob sie in der jeweiligen