clean up Tie::IxHash imports

This commit is contained in:
Graham Knop 2010-03-04 14:01:23 -06:00
parent fe5085f346
commit 913fa9ad03
58 changed files with 36 additions and 24 deletions

View file

@ -7,6 +7,7 @@ use WebGUI::International;
use WebGUI::Pluggable; use WebGUI::Pluggable;
use WebGUI::Utility; use WebGUI::Utility;
use WebGUI::Operation::Auth; use WebGUI::Operation::Auth;
use Tie::IxHash;
use base qw/WebGUI::Account/; use base qw/WebGUI::Account/;

View file

@ -7,6 +7,7 @@ use WebGUI::Friends;
use WebGUI::International; use WebGUI::International;
use WebGUI::Pluggable; use WebGUI::Pluggable;
use WebGUI::Utility; use WebGUI::Utility;
use Tie::IxHash;
use base qw/WebGUI::Account/; use base qw/WebGUI::Account/;
use List::MoreUtils qw/uniq/; use List::MoreUtils qw/uniq/;

View file

@ -6,6 +6,7 @@ use WebGUI::Exception;
use WebGUI::International; use WebGUI::International;
use WebGUI::Pluggable; use WebGUI::Pluggable;
use WebGUI::Utility; use WebGUI::Utility;
use Tie::IxHash;
use base qw/WebGUI::Account/; use base qw/WebGUI::Account/;
=head1 NAME =head1 NAME

View file

@ -7,6 +7,7 @@ use WebGUI::Exception;
use WebGUI::International; use WebGUI::International;
use WebGUI::Pluggable; use WebGUI::Pluggable;
use WebGUI::Utility; use WebGUI::Utility;
use Tie::IxHash;
use base qw/WebGUI::Account/; use base qw/WebGUI::Account/;
=head1 NAME =head1 NAME

View file

@ -18,7 +18,6 @@ our $VERSION = "0.0.0";
=cut =cut
use Tie::IxHash;
use Carp qw(croak); use Carp qw(croak);
use WebGUI::International; use WebGUI::International;

View file

@ -15,6 +15,7 @@ package WebGUI::Asset::File::GalleryFile;
=cut =cut
use strict; use strict;
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;
extends 'WebGUI::Asset::File'; extends 'WebGUI::Asset::File';

View file

@ -15,7 +15,6 @@ package WebGUI::Asset::MapPoint;
=cut =cut
use strict; use strict;
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;
extends 'WebGUI::Asset'; extends 'WebGUI::Asset';

View file

@ -19,6 +19,7 @@ use WebGUI::Form;
use WebGUI::Utility; use WebGUI::Utility;
use WebGUI::International; use WebGUI::International;
use JSON; use JSON;
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;

View file

@ -15,7 +15,6 @@ package WebGUI::Asset::Sku;
=cut =cut
use strict; use strict;
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;
extends 'WebGUI::Asset'; extends 'WebGUI::Asset';

View file

@ -15,7 +15,6 @@ package WebGUI::Asset::Sku::Ad;
=cut =cut
use strict; use strict;
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;
extends 'WebGUI::Asset::Sku'; extends 'WebGUI::Asset::Sku';

View file

@ -15,7 +15,6 @@ package WebGUI::Asset::Sku::Donation;
=cut =cut
use strict; use strict;
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;

View file

@ -15,7 +15,6 @@ package WebGUI::Asset::Sku::FlatDiscount;
=cut =cut
use strict; use strict;
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;
extends 'WebGUI::Asset::Sku'; extends 'WebGUI::Asset::Sku';

View file

@ -15,7 +15,6 @@ package WebGUI::Asset::Sku::Subscription;
=cut =cut
use strict; use strict;
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;
extends 'WebGUI::Asset::Sku'; extends 'WebGUI::Asset::Sku';

View file

@ -11,7 +11,6 @@ package WebGUI::Asset::Wobject::Article;
#------------------------------------------------------------------- #-------------------------------------------------------------------
use strict; use strict;
use Tie::IxHash;
use WebGUI::International; use WebGUI::International;
use WebGUI::Paginator; use WebGUI::Paginator;

View file

@ -14,6 +14,7 @@ use strict;
#use base qw/WebGUI::Asset::Wobject WebGUI::JSONCollateral/; #use base qw/WebGUI::Asset::Wobject WebGUI::JSONCollateral/;
use Moose; use Moose;
use Tie::IxHash;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;
extends 'WebGUI::Asset::Wobject'; extends 'WebGUI::Asset::Wobject';
@ -285,7 +286,6 @@ use WebGUI::DateTime;
use DateTime; use DateTime;
use JSON; use JSON;
use Text::Wrap; use Text::Wrap;
use Tie::IxHash;
=head1 NAME =head1 NAME

View file

@ -11,6 +11,7 @@ package WebGUI::Asset::Wobject::Collaboration;
#------------------------------------------------------------------- #-------------------------------------------------------------------
use strict; use strict;
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;
extends 'WebGUI::Asset::Wobject'; extends 'WebGUI::Asset::Wobject';

View file

@ -11,6 +11,7 @@ package WebGUI::Asset::Wobject::Gallery;
#------------------------------------------------------------------- #-------------------------------------------------------------------
use strict; use strict;
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;
extends 'WebGUI::Asset::Wobject'; extends 'WebGUI::Asset::Wobject';

View file

@ -21,6 +21,7 @@ use WebGUI::Storage;
use WebGUI::Asset::Wobject::HttpProxy::Parse; use WebGUI::Asset::Wobject::HttpProxy::Parse;
use WebGUI::Macro; use WebGUI::Macro;
use Apache2::Upload; use Apache2::Upload;
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;

View file

@ -6,6 +6,7 @@ use WebGUI::HTMLForm;
use WebGUI::International; use WebGUI::International;
use WebGUI::Paginator; use WebGUI::Paginator;
use WebGUI::SQL; use WebGUI::SQL;
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;

View file

@ -16,6 +16,7 @@ package WebGUI::Asset::Wobject::Layout;
use strict; use strict;
use WebGUI::AdSpace; use WebGUI::AdSpace;
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;
extends 'WebGUI::Asset::Wobject'; extends 'WebGUI::Asset::Wobject';

View file

@ -13,7 +13,6 @@ $VERSION = "1.0.0";
#------------------------------------------------------------------- #-------------------------------------------------------------------
use strict; use strict;
use Tie::IxHash;
use WebGUI::International; use WebGUI::International;
use WebGUI::Utility; use WebGUI::Utility;
use HTML::Entities qw(encode_entities); use HTML::Entities qw(encode_entities);

View file

@ -11,7 +11,6 @@ package WebGUI::Asset::Wobject::MessageBoard;
#------------------------------------------------------------------- #-------------------------------------------------------------------
use strict; use strict;
use Tie::IxHash;
use WebGUI::Asset::Wobject; use WebGUI::Asset::Wobject;
use WebGUI::International; use WebGUI::International;
use WebGUI::SQL; use WebGUI::SQL;

View file

@ -20,7 +20,6 @@ package WebGUI::Asset::Wobject::MultiSearch;
use strict; use strict;
use Tie::CPHash; use Tie::CPHash;
use Tie::IxHash;
use JSON; use JSON;
use WebGUI::International; use WebGUI::International;
use WebGUI::SQL; use WebGUI::SQL;

View file

@ -19,6 +19,7 @@ use WebGUI::SQL;
use WebGUI::Utility; use WebGUI::Utility;
use WebGUI::Asset::Wobject; use WebGUI::Asset::Wobject;
use WebGUI::Text qw(:csv); use WebGUI::Text qw(:csv);
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;

View file

@ -67,7 +67,6 @@ property paginateAfter => (
use Tie::IxHash;
use WebGUI::International; use WebGUI::International;
use WebGUI::Paginator; use WebGUI::Paginator;
use WebGUI::Search; use WebGUI::Search;

View file

@ -12,7 +12,6 @@ package WebGUI::Asset::Wobject::Shelf;
use strict; use strict;
use List::MoreUtils; use List::MoreUtils;
use Tie::IxHash;
use WebGUI::International; use WebGUI::International;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;

View file

@ -15,6 +15,7 @@ use WebGUI::International;
use WebGUI::Utility; use WebGUI::Utility;
use WebGUI::Asset::Wobject; use WebGUI::Asset::Wobject;
use Finance::Quote; use Finance::Quote;
use Tie::IxHash;
use Moose; use Moose;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;

View file

@ -11,7 +11,6 @@ package WebGUI::Asset::Wobject::Survey;
#------------------------------------------------------------------- #-------------------------------------------------------------------
use strict; use strict;
use Tie::IxHash;
use JSON; use JSON;
use WebGUI::International; use WebGUI::International;
use WebGUI::Form::File; use WebGUI::Form::File;

View file

@ -12,7 +12,6 @@ package WebGUI::Asset::Wobject::SyndicatedContent;
use strict; use strict;
use HTML::Entities; use HTML::Entities;
use Tie::IxHash;
use WebGUI::Exception; use WebGUI::Exception;
use WebGUI::HTML; use WebGUI::HTML;
use WebGUI::International; use WebGUI::International;

View file

@ -15,6 +15,7 @@ package WebGUI::Asset;
=cut =cut
use strict; use strict;
use Tie::IxHash;
=head1 NAME =head1 NAME

View file

@ -17,7 +17,6 @@ package WebGUI::Auth;
use CGI::Util qw(rearrange); use CGI::Util qw(rearrange);
use DBI; use DBI;
use strict qw(subs vars); use strict qw(subs vars);
use Tie::IxHash;
use WebGUI::HTML; use WebGUI::HTML;
use WebGUI::HTMLForm; use WebGUI::HTMLForm;
use WebGUI::International; use WebGUI::International;

View file

@ -23,6 +23,7 @@ use WebGUI::User;
use WebGUI::Utility; use WebGUI::Utility;
use WebGUI::Form::Captcha; use WebGUI::Form::Captcha;
use Encode (); use Encode ();
use Tie::IxHash;
our @ISA = qw(WebGUI::Auth); our @ISA = qw(WebGUI::Auth);

View file

@ -8,6 +8,7 @@ use WebGUI::Form;
use WebGUI::Paginator; use WebGUI::Paginator;
use WebGUI::Utility; use WebGUI::Utility;
use WebGUI::Macro::AdminBar; use WebGUI::Macro::AdminBar;
use Tie::IxHash;
#---------------------------------------------------------------------------- #----------------------------------------------------------------------------

View file

@ -1,7 +1,6 @@
package WebGUI::FilePump::Admin; package WebGUI::FilePump::Admin;
use strict; use strict;
use Tie::IxHash;
use WebGUI::AdminConsole; use WebGUI::AdminConsole;
use WebGUI::HTMLForm; use WebGUI::HTMLForm;
use WebGUI::International; use WebGUI::International;

View file

@ -17,7 +17,6 @@ package WebGUI::Form;
use strict; use strict;
use Carp qw( croak ); use Carp qw( croak );
use Scalar::Util qw( blessed ); use Scalar::Util qw( blessed );
use Tie::IxHash;
use WebGUI::International; use WebGUI::International;
use WebGUI::Pluggable; use WebGUI::Pluggable;
use WebGUI::Utility; use WebGUI::Utility;

View file

@ -16,6 +16,7 @@ package WebGUI::Form::CommentRating;
use strict; use strict;
use base 'WebGUI::Form::RadioList'; use base 'WebGUI::Form::RadioList';
use Tie::IxHash;
=head1 NAME =head1 NAME

View file

@ -18,6 +18,7 @@ use strict;
use base 'WebGUI::Form::Control'; use base 'WebGUI::Form::Control';
use WebGUI::Form::Hidden; use WebGUI::Form::Hidden;
use WebGUI::International; use WebGUI::International;
use Tie::IxHash;
=head1 NAME =head1 NAME

View file

@ -18,6 +18,7 @@ use strict;
use base 'WebGUI::Form::Slider'; use base 'WebGUI::Form::Slider';
use WebGUI::Form::SelectBox; use WebGUI::Form::SelectBox;
use WebGUI::International; use WebGUI::International;
use Tie::IxHash;
=head1 NAME =head1 NAME

View file

@ -17,6 +17,7 @@ package WebGUI::LDAPLink;
use strict; use strict;
use Tie::CPHash; use Tie::CPHash;
use Tie::IxHash;
use WebGUI::International; use WebGUI::International;
use Net::LDAP; use Net::LDAP;

View file

@ -11,7 +11,6 @@ package WebGUI::Operation::FormHelpers;
#------------------------------------------------------------------- #-------------------------------------------------------------------
use strict; use strict;
use Tie::IxHash;
use WebGUI::Asset; use WebGUI::Asset;
use WebGUI::Asset::Wobject::Folder; use WebGUI::Asset::Wobject::Folder;
use WebGUI::Form::Group; use WebGUI::Form::Group;

View file

@ -22,6 +22,7 @@ use WebGUI::Operation::User;
use WebGUI::Paginator; use WebGUI::Paginator;
use WebGUI::SQL; use WebGUI::SQL;
use WebGUI::Utility; use WebGUI::Utility;
use Tie::IxHash;
#---------------------------------------------------------------------------- #----------------------------------------------------------------------------
sub _submenu { sub _submenu {

View file

@ -11,7 +11,6 @@ package WebGUI::Operation::Help;
#------------------------------------------------------------------- #-------------------------------------------------------------------
use strict qw(vars subs); use strict qw(vars subs);
use Tie::IxHash;
use WebGUI::AdminConsole; use WebGUI::AdminConsole;
use WebGUI::International; use WebGUI::International;
use WebGUI::Asset::Template; use WebGUI::Asset::Template;

View file

@ -21,6 +21,7 @@ use WebGUI::International;
use WebGUI::VersionTag; use WebGUI::VersionTag;
use WebGUI::HTMLForm; use WebGUI::HTMLForm;
use WebGUI::Paginator; use WebGUI::Paginator;
use Tie::IxHash;
=head1 NAME =head1 NAME

View file

@ -11,7 +11,6 @@ package WebGUI::Operation::Workflow;
#------------------------------------------------------------------- #-------------------------------------------------------------------
use strict; use strict;
use Tie::IxHash;
use WebGUI::AdminConsole; use WebGUI::AdminConsole;
use WebGUI::HTMLForm; use WebGUI::HTMLForm;
use WebGUI::International; use WebGUI::International;

View file

@ -1,7 +1,6 @@
package WebGUI::PassiveAnalytics::Flow; package WebGUI::PassiveAnalytics::Flow;
use strict; use strict;
use Tie::IxHash;
use WebGUI::AdminConsole; use WebGUI::AdminConsole;
use WebGUI::HTMLForm; use WebGUI::HTMLForm;
use WebGUI::International; use WebGUI::International;

View file

@ -16,7 +16,6 @@ package WebGUI::PassiveProfiling;
use strict; use strict;
use Tie::IxHash;
=head1 NAME =head1 NAME

View file

@ -23,6 +23,7 @@ use WebGUI::HTML;
use WebGUI::User; use WebGUI::User;
use WebGUI::Utility; use WebGUI::Utility;
use WebGUI::Pluggable; use WebGUI::Pluggable;
use Tie::IxHash;
=head1 NAME =head1 NAME

View file

@ -16,6 +16,8 @@ package WebGUI::Role::Asset::RssFeed;
use Moose::Role; use Moose::Role;
use WebGUI::Definition::Asset; use WebGUI::Definition::Asset;
use Tie::IxHash;
define tableName => 'assetAspectRssFeed'; define tableName => 'assetAspectRssFeed';
property itemsPerFeed => ( property itemsPerFeed => (
noFormPost => 0, noFormPost => 0,

View file

@ -17,6 +17,7 @@ package WebGUI::Session::Form;
use strict qw(vars subs); use strict qw(vars subs);
use WebGUI::HTML; use WebGUI::HTML;
use Encode (); use Encode ();
use Tie::IxHash;
use base 'WebGUI::FormValidator'; use base 'WebGUI::FormValidator';
=head1 NAME =head1 NAME

View file

@ -16,6 +16,7 @@ package WebGUI::Session::Icon;
use strict; use strict;
use WebGUI::International; use WebGUI::International;
use Tie::IxHash;
=head1 NAME =head1 NAME

View file

@ -23,6 +23,7 @@ use WebGUI::Pluggable;
use WebGUI::Shop::Admin; use WebGUI::Shop::Admin;
#use WebGUI::Shop::PayDriver; #use WebGUI::Shop::PayDriver;
use WebGUI::Utility; use WebGUI::Utility;
use Tie::IxHash;
=head1 NAME =head1 NAME

View file

@ -18,6 +18,7 @@ use strict;
use WebGUI::Shop::PayDriver; use WebGUI::Shop::PayDriver;
use WebGUI::Exception; use WebGUI::Exception;
use Tie::IxHash;
use base qw/WebGUI::Shop::PayDriver/; use base qw/WebGUI::Shop::PayDriver/;

View file

@ -17,6 +17,7 @@ package WebGUI::Shop::PayDriver::ITransact;
use strict; use strict;
use XML::Simple; use XML::Simple;
use Data::Dumper; use Data::Dumper;
use Tie::IxHash;
use base qw/WebGUI::Shop::PayDriver/; use base qw/WebGUI::Shop::PayDriver/;

View file

@ -21,6 +21,7 @@ use WebGUI::Exception;
use Digest::SHA qw{ sha1_hex }; use Digest::SHA qw{ sha1_hex };
use WebGUI::International; use WebGUI::International;
use Data::Dumper; use Data::Dumper;
use Tie::IxHash;
use base qw{ WebGUI::Shop::PayDriver }; use base qw{ WebGUI::Shop::PayDriver };

View file

@ -23,6 +23,7 @@ use URI;
use URI::Escape; use URI::Escape;
use LWP::UserAgent; use LWP::UserAgent;
use Readonly; use Readonly;
use Tie::IxHash;
Readonly my $I18N => 'PayDriver_PayPalStd'; Readonly my $I18N => 'PayDriver_PayPalStd';

View file

@ -3,6 +3,7 @@ package WebGUI::Shop::ShipDriver::FlatRate;
use strict; use strict;
use base qw/WebGUI::Shop::ShipDriver/; use base qw/WebGUI::Shop::ShipDriver/;
use WebGUI::Exception; use WebGUI::Exception;
use Tie::IxHash;
=head1 NAME =head1 NAME

View file

@ -6,6 +6,7 @@ use WebGUI::Text;
use WebGUI::Storage; use WebGUI::Storage;
use WebGUI::Exception::Shop; use WebGUI::Exception::Shop;
use List::Util qw{ sum }; use List::Util qw{ sum };
use Tie::IxHash;
use base qw{ WebGUI::Shop::TaxDriver }; use base qw{ WebGUI::Shop::TaxDriver };

View file

@ -18,6 +18,7 @@ package WebGUI::Workflow::Activity::CreateCronJob;
use strict; use strict;
use base 'WebGUI::Workflow::Activity'; use base 'WebGUI::Workflow::Activity';
use WebGUI::Workflow::Cron; use WebGUI::Workflow::Cron;
use Tie::IxHash;
=head1 NAME =head1 NAME