diff options
Diffstat (limited to 'trunk/src/echangelog/echangelog')
-rw-r--r-- | trunk/src/echangelog/echangelog | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/trunk/src/echangelog/echangelog b/trunk/src/echangelog/echangelog index f98fed5..3b64d21 100644 --- a/trunk/src/echangelog/echangelog +++ b/trunk/src/echangelog/echangelog @@ -75,7 +75,7 @@ if (-f 'ChangeLog') { { local $/ = undef; $text = <I>; } close I; my ($cwd) = getcwd(); - $cwd =~ m|.*/(\w+-\w+)/([^/]+)| + $cwd =~ m|.*/(\w+-\w+\|virtual)/([^/]+)| or die "Can't figure out category/package.. sorry!\n"; my ($category, $package_name) = ($1, $2); $text =~ s/^\*.*//ms; # don't need the fake entry |