Check-in Number:
|
108 | |
Date: |
2000-Jul-17 17:24:27 (local)
2000-Jul-17 15:24:27 (UTC) |
User: | rse |
Branch: | |
Comment: |
beautify imports |
Tickets: |
|
Inspections: |
|
Files: |
|
ossp-pkg/shiela/shiela.pl 1.1 -> 1.2
--- shiela.pl 2000/06/18 14:30:52 1.1
+++ shiela.pl 2000/07/18 15:24:27 1.2
@@ -1376,7 +1376,7 @@
@cvsinfo = ();
$cvsmsg =~ s|Status:\n+Vendor Tag:\s+(\S+).*?\nRelease Tags:\s+(.+?)\s*\n(.+)$||s;
my ($It, $IT, $list) = ($1, $2, $3);
- $cvsmsg .= "[Release Tags: $IT]\n";
+ $cvsmsg .= sprintf("[Release Tag%s: %s]\n", ($IT =~ m|\s| ? 's' : ''), $IT);
while ($list =~ s|\n([ILNUCT])\s+(\S+)||s) {
my ($Io, $Is) = ($1, $2);
|
|