[s2] clean up log messages that appear when global warnings are on

[fu]

[commit: http://hg.dwscoalition.org/s2/rev/e78c7b3accaf]

http://bugs.dwscoalition.org/show_bug.cgi?id=3040

Disable another subset of warnings.

Patch by kareila.

Files modified:

• S2.pm

--------------------------------------------------------------------------------
diff -r 277f7e67f6a6 -r e78c7b3accaf S2.pm
--- a/S2.pm	Mon Oct 04 01:24:17 2010 +0000
+++ b/S2.pm	Fri Oct 08 18:21:15 2010 +0800
@@ -230,6 +230,7 @@ sub load_layers_from_db
     $sth->execute;
     while (my ($id, $comp, $comptime) = $sth->fetchrow_array) {
         local $^W = 0;  # don't warn about problems with $comp
+        no warnings 'uninitialized';  # no really, be quiet.
         eval $comp;
         if ($@) {
             my $err = $@;
--------------------------------------------------------------------------------