blob: e495538a7e66d18a61f70e63869e25fa174249a5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
$NetBSD: patch-lib_mhamain.pl,v 1.3 2015/09/26 14:30:24 bouyer Exp $
perl 5.22 compatipility
--- lib/mhamain.pl.orig 2015-09-26 12:30:58.000000000 +0200
+++ lib/mhamain.pl 2015-09-26 12:31:37.000000000 +0200
@@ -1562,7 +1562,7 @@
##
sub defineIndex2MsgId {
no warnings qw(deprecated);
- if (!defined(%Index2MsgId)) {
+ if (!%Index2MsgId) {
foreach (keys %MsgId) {
$Index2MsgId{$MsgId{$_}} = $_;
}
|