Re: "set-check" warning

Brock Rozen <[email protected]>
Newsgroups gmane.mail.majordomo.majordomo2.devel
Message-ID <[email protected]>
On Fri, 13 Jan 2006 at 11:20, Michael Yount wrote about "Re: "set-check"...":

> So, the e-mail address has been added to the list of possible delivery
> classes somehow.  Does the following patch solve the problem without
> causing any side effects?

Actually, it doesn't seem to solve the problem at all.

The debugging (using the warn patch you gave me)  shows this:
--== The flag value is all at blib/lib/Mj/List.pm (autosplit into 
blib/lib/auto/Mj/List/get_setting_data.al) line 1048.
--== The flag value is digest at blib/lib/Mj/List.pm (autosplit into 
blib/lib/auto/Mj/List/get_setting_data.al) line 1048.
--== The flag value is each at blib/lib/Mj/List.pm (autosplit into 
blib/lib/auto/Mj/List/get_setting_data.al) line 1048.
--== The flag value is mail at blib/lib/Mj/List.pm (autosplit into 
blib/lib/auto/Mj/List/get_setting_data.al) line 1048.
--== The flag value is [email protected] at blib/lib/Mj/List.pm 
(autosplit into blib/lib/auto/Mj/List/get_setting_data.al) line 1048.
--== Use of uninitialized value in string eq at blib/lib/Mj/List.pm 
(autosplit into blib/lib/auto/Mj/List/get_setting_data.al) line 1049.
--== The flag value is nomail at blib/lib/Mj/List.pm (autosplit into 
blib/lib/auto/Mj/List/get_setting_data.al) line 1048.
--== The flag value is single at blib/lib/Mj/List.pm (autosplit into 
blib/lib/auto/Mj/List/get_setting_data.al) line 1048.
--== The flag value is unique at blib/lib/Mj/List.pm (autosplit into 
blib/lib/auto/Mj/List/get_setting_data.al) line 1048.
--== The flag value is vacation at blib/lib/Mj/List.pm (autosplit into 
blib/lib/auto/Mj/List/get_setting_data.al) line 1048.


Best,

BR


> --- lib/Mj/List.pm      11 Nov 2005 20:50:12 -0000      1.158
> +++ lib/Mj/List.pm      13 Jan 2006 19:18:16 -0000
> @@ -462,7 +462,7 @@
>       $rset = $flags{$inv}->[0];
>       $isflag = $inv;
>     }
> -    elsif ($rset = $classes{$class[0]}->[0]) {
> +    elsif (exists $classes{$class[0]} and $rset = $classes{$class[0]}->[0]) {
>       $isflag = 0;
>     }
>     else {

-- 
Brock Rozen                                        [email protected]
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.