Committer: ailyin
LJSUP-8865 (ensure that modules in cgi-bin use strict)U trunk/cgi-bin/LJ/CProd/CreateStyles.pm U trunk/cgi-bin/LJ/CProd/EditPicsMax.pm U trunk/cgi-bin/LJ/CProd/LJFeedback.pm U trunk/cgi-bin/LJ/CProd/LJTips.pm U trunk/cgi-bin/LJ/CProd/SPlus.pm U trunk/cgi-bin/LJ/CProd/VoicePost.pm U trunk/cgi-bin/LJ/Hooks/EditPics.pm U trunk/cgi-bin/LJ/Pay/Util.pm U trunk/cgi-bin/LJ/S2Theme/3column.pm U trunk/cgi-bin/LJ/S2Theme/anovelconundrum.pm U trunk/cgi-bin/LJ/S2Theme/boxer.pm U trunk/cgi-bin/LJ/S2Theme/component.pm U trunk/cgi-bin/LJ/S2Theme/cuteness.pm U trunk/cgi-bin/LJ/S2Theme/flexiblesquares.pm U trunk/cgi-bin/LJ/S2Theme/gradient.pm U trunk/cgi-bin/LJ/S2Theme/ljhtml.pm U trunk/cgi-bin/LJ/S2Theme/nebula.pm U trunk/cgi-bin/LJ/S2Theme/opal.pm U trunk/cgi-bin/LJ/S2Theme/smoothsailing.pm U trunk/cgi-bin/LJ/S2Theme/sup.pm U trunk/cgi-bin/LJ/S2Theme/tranquilityii.pm U trunk/cgi-bin/LJ/S2Theme/unearthed.pm U trunk/cgi-bin/LJ/S2Theme/voxhtml.pm U trunk/cgi-bin/LJ/S2Theme/voxseasonal.pm U trunk/cgi-bin/lj-bml-init-local.pl
Modified: trunk/cgi-bin/LJ/CProd/CreateStyles.pm =================================================================== --- trunk/cgi-bin/LJ/CProd/CreateStyles.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/CProd/CreateStyles.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::CProd::CreateStyles; +use strict; + use base 'LJ::CProd'; sub applicable { Modified: trunk/cgi-bin/LJ/CProd/EditPicsMax.pm =================================================================== --- trunk/cgi-bin/LJ/CProd/EditPicsMax.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/CProd/EditPicsMax.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,7 +1,8 @@ package LJ::CProd::EditPicsMax; -use base 'LJ::CProd'; use strict; +use base 'LJ::CProd'; + sub applicable { my ($class, $u) = @_; return 0 if ($u->in_class('extrauserpics') || $u->in_class('perm') || !$u->is_person); Modified: trunk/cgi-bin/LJ/CProd/LJFeedback.pm =================================================================== --- trunk/cgi-bin/LJ/CProd/LJFeedback.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/CProd/LJFeedback.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::CProd::LJFeedback; +use strict; + use base 'LJ::CProd'; sub applicable { Modified: trunk/cgi-bin/LJ/CProd/LJTips.pm =================================================================== --- trunk/cgi-bin/LJ/CProd/LJTips.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/CProd/LJTips.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::CProd::LJTips; +use strict; + use base 'LJ::CProd'; sub applicable { Modified: trunk/cgi-bin/LJ/CProd/SPlus.pm =================================================================== --- trunk/cgi-bin/LJ/CProd/SPlus.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/CProd/SPlus.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::CProd::SPlus; +use strict; + use base 'LJ::CProd'; sub applicable { Modified: trunk/cgi-bin/LJ/CProd/VoicePost.pm =================================================================== --- trunk/cgi-bin/LJ/CProd/VoicePost.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/CProd/VoicePost.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,7 +1,8 @@ package LJ::CProd::VoicePost; -use base 'LJ::CProd'; use strict; +use base 'LJ::CProd'; + sub applicable { my ($class, $u) = @_; return 0 unless LJ::get_cap($u, "phonepost_monthquota"); Modified: trunk/cgi-bin/LJ/Hooks/EditPics.pm =================================================================== --- trunk/cgi-bin/LJ/Hooks/EditPics.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/Hooks/EditPics.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1 +1,4 @@ +package LJ::Hooks::EditPics; +use strict; + 1; Modified: trunk/cgi-bin/LJ/Pay/Util.pm =================================================================== --- trunk/cgi-bin/LJ/Pay/Util.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/Pay/Util.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::Pay::Util; +use strict; + use Carp qw/cluck confess/; use base 'Exporter'; our @EXPORT_OK = qw/ _debug _err _get_dbh _min _max/; Modified: trunk/cgi-bin/LJ/S2Theme/3column.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/3column.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/3column.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::3column; +use strict; + use base qw(LJ::S2Theme); sub layouts { ( "3m" => 1 ) } Modified: trunk/cgi-bin/LJ/S2Theme/anovelconundrum.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/anovelconundrum.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/anovelconundrum.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::anovelconundrum; +use strict; + use base qw(LJ::S2Theme); sub cats { qw( clean warm ) } Modified: trunk/cgi-bin/LJ/S2Theme/boxer.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/boxer.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/boxer.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::boxer; +use strict; + use base qw(LJ::S2Theme); sub cats { qw( cool modern ) } Modified: trunk/cgi-bin/LJ/S2Theme/component.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/component.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/component.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::component; +use strict; + use base qw(LJ::S2Theme); sub layouts { ( "1" => "none", "2l" => "left", "2r" => "right" ) } Modified: trunk/cgi-bin/LJ/S2Theme/cuteness.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/cuteness.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/cuteness.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::cuteness; +use strict; + use base qw(LJ::S2Theme); sub layouts { ( "2l" => 1 ) } Modified: trunk/cgi-bin/LJ/S2Theme/flexiblesquares.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/flexiblesquares.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/flexiblesquares.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::flexiblesquares; +use strict; + use base qw(LJ::S2Theme); sub layouts { ( "1" => "0", "2l" => "left", "2r" => "right" ) } Modified: trunk/cgi-bin/LJ/S2Theme/gradient.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/gradient.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/gradient.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::gradient; +use strict; + use base qw(LJ::S2Theme); sub cats { qw( cool modern ) } Modified: trunk/cgi-bin/LJ/S2Theme/ljhtml.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/ljhtml.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/ljhtml.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::ljhtml; +use strict; + use base qw(LJ::S2Theme::voxhtml); sub designer { "chasethestars" } Modified: trunk/cgi-bin/LJ/S2Theme/nebula.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/nebula.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/nebula.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::nebula; +use strict; + use base qw(LJ::S2Theme); sub layouts { ( "2l" => "left", "2r" => "right" ) } Modified: trunk/cgi-bin/LJ/S2Theme/opal.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/opal.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/opal.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::opal; +use strict; + use base qw(LJ::S2Theme); sub layouts { ( "2l" => 1 ) } Modified: trunk/cgi-bin/LJ/S2Theme/smoothsailing.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/smoothsailing.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/smoothsailing.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::smoothsailing; +use strict; + use base qw(LJ::S2Theme); sub layouts { ( "1" => "none", "2l" => "left", "2r" => "right" ) } Modified: trunk/cgi-bin/LJ/S2Theme/sup.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/sup.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/sup.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::sup; +use strict; + use base qw(LJ::S2Theme); sub layouts { ( "2l" => "2CL", "2r" => "2CR" ) } Modified: trunk/cgi-bin/LJ/S2Theme/tranquilityii.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/tranquilityii.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/tranquilityii.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::tranquilityii; +use strict; + use base qw(LJ::S2Theme); sub layouts { ( "2l" => 1 ) } Modified: trunk/cgi-bin/LJ/S2Theme/unearthed.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/unearthed.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/unearthed.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::unearthed; +use strict; + use base qw(LJ::S2Theme); sub cats { qw( clean warm pattern ) } Modified: trunk/cgi-bin/LJ/S2Theme/voxhtml.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/voxhtml.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/voxhtml.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::voxhtml; +use strict; + use base qw(LJ::S2Theme); sub layouts { ( "2l" => "2CL", "2r" => "2CR", "3l" => "3CL", "3m" => "3CM" ) } Modified: trunk/cgi-bin/LJ/S2Theme/voxseasonal.pm =================================================================== --- trunk/cgi-bin/LJ/S2Theme/voxseasonal.pm 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/LJ/S2Theme/voxseasonal.pm 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,4 +1,6 @@ package LJ::S2Theme::voxseasonal; +use strict; + use base qw(LJ::S2Theme::voxhtml); sub cats { qw( illustrated occasions ) } Modified: trunk/cgi-bin/lj-bml-init-local.pl =================================================================== --- trunk/cgi-bin/lj-bml-init-local.pl 2011-05-24 03:48:51 UTC (rev 10551) +++ trunk/cgi-bin/lj-bml-init-local.pl 2011-05-24 04:02:45 UTC (rev 10552) @@ -1,5 +1,5 @@ -#!/usr/bin/perl -# +package LJ; +use strict; # Translate certain scheme decisions into others BML::register_hook('scheme_translation', sub {