module Mail::Ezmlm::GpgEzmlm:
* fix issue with ezmlm-idx v0.4x lists
This commit is contained in:
parent
170f4973aa
commit
bbde9f30a6
2 changed files with 4 additions and 1 deletions
|
@ -56,3 +56,6 @@ Revision history for Perl extension Mail::Ezmlm.
|
||||||
- allow "@" in the path of a mailing list
|
- allow "@" in the path of a mailing list
|
||||||
- add modules Mail::Ezmlm::GpgKeyRing and Mail::Ezmlm::GpgEzmlm
|
- add modules Mail::Ezmlm::GpgKeyRing and Mail::Ezmlm::GpgEzmlm
|
||||||
|
|
||||||
|
0.08.1 Thu Oct 12 04:37:06 CEST 2008
|
||||||
|
- fix issue of Mail::Ezmlm::GpgEzmlm with ezmlm-idx v0.4x lists
|
||||||
|
|
||||||
|
|
|
@ -552,7 +552,7 @@ sub _get_dotqmail_location {
|
||||||
chomp($dot_loc);
|
chomp($dot_loc);
|
||||||
} elsif (-r "$list_dir/config") {
|
} elsif (-r "$list_dir/config") {
|
||||||
# the "config" file was used before ezmlm-idx v5
|
# the "config" file was used before ezmlm-idx v5
|
||||||
$dot_loc = $1 if ($plain_list->getpart("config") =~ m/^T:(.*)$/);
|
$dot_loc = $1 if ($plain_list->getpart("config") =~ /^T:(.*)$/m);
|
||||||
} else {
|
} else {
|
||||||
warn '[GpgEzmlm] list configuration file not found: ' . $list_dir;
|
warn '[GpgEzmlm] list configuration file not found: ' . $list_dir;
|
||||||
$dot_loc = undef;
|
$dot_loc = undef;
|
||||||
|
|
Loading…
Reference in a new issue