[Iptperl-general] Can't commit on empty IP table

[Amos S. <amo...@gm...>]

Hi,

Trying to cleanup the code (based on 0.98, but also after patching with Jan
Kratochvil's proposed patches) I manage to make it run on Debian Etch (using
debian's iptables-dev package instead of the old internal trimmed down
version of libiptc) but one major problem is that commands like:

%IPTables::IPv4 = ();

(taken from t/00save_current_ruleset.t)

or even:

%IPTables::IPv4 = %{$rules};

(from t/99restore_ruleset.t)
causes errors a-la:

(in cleanup) Can't call method "commit" on an undefined value at
/home/amos/src/iptperl/IPTables-IPv4-0.99/blib/lib/IPTables/IPv4/TableTie.pm
line 64 during global destruction.

My perl tie is a bit rusty but I suspect that what happens is that the
object referenced from %IPTables::IPv4 looses its "tie" definition reference
during these assignments and causes a complete mess-up of the table.

Other tests, which call methods instead of assign to the hash directly, seem
to pass fine.

Does anyone have any idea?

Cheers,

--Amos
-- 
"Military justice is to justice what military music is to music"