diff --git a/lib/WebGUI/Account/Inbox.pm b/lib/WebGUI/Account/Inbox.pm index d61f57b80..c7900067f 100644 --- a/lib/WebGUI/Account/Inbox.pm +++ b/lib/WebGUI/Account/Inbox.pm @@ -6,7 +6,6 @@ use WebGUI::Form; use WebGUI::Exception; use WebGUI::International; use WebGUI::Pluggable; -use WebGUI::Utility; use Tie::IxHash; use Email::Valid; use base qw/WebGUI::Account/; diff --git a/lib/WebGUI/Account/Profile.pm b/lib/WebGUI/Account/Profile.pm index 685777f99..203ba95be 100644 --- a/lib/WebGUI/Account/Profile.pm +++ b/lib/WebGUI/Account/Profile.pm @@ -7,7 +7,6 @@ use WebGUI::International; use WebGUI::Pluggable; use WebGUI::ProfileCategory; use WebGUI::ProfileField; -use WebGUI::Utility; use base qw/WebGUI::Account/; =head1 NAME diff --git a/lib/WebGUI/Account/Shop.pm b/lib/WebGUI/Account/Shop.pm index 72b34fc58..033138ab5 100644 --- a/lib/WebGUI/Account/Shop.pm +++ b/lib/WebGUI/Account/Shop.pm @@ -5,7 +5,6 @@ use strict; use WebGUI::Exception; use WebGUI::International; use WebGUI::Pluggable; -use WebGUI::Utility; use WebGUI::Shop::Vendor; use JSON qw{ from_json }; diff --git a/lib/WebGUI/Asset.pm b/lib/WebGUI/Asset.pm index 9227435f0..620a65687 100644 --- a/lib/WebGUI/Asset.pm +++ b/lib/WebGUI/Asset.pm @@ -394,7 +394,6 @@ use WebGUI::Keyword; require WebGUI::ProgressBar; use WebGUI::Search::Index; use WebGUI::TabForm; -use WebGUI::Utility; use WebGUI::PassiveAnalytics::Logging; =head1 NAME @@ -1046,7 +1045,7 @@ sub getEditForm { }; # Kludge... - if ( $fieldHash->{fieldType} ~~ ['selectBox', 'workflow'] ) and ref $fieldHash->{value} ne 'ARRAY' ) { + if ( $fieldHash->{fieldType} ~~ ['selectBox', 'workflow'] and ref $fieldHash->{value} ne 'ARRAY' ) { $fieldHash->{value} = [ $fieldHash->{value} ]; } diff --git a/lib/WebGUI/Asset/EMSSubmission.pm b/lib/WebGUI/Asset/EMSSubmission.pm index 2145529ee..44d64b5f1 100644 --- a/lib/WebGUI/Asset/EMSSubmission.pm +++ b/lib/WebGUI/Asset/EMSSubmission.pm @@ -143,7 +143,6 @@ with 'WebGUI::Role::Asset::Comments'; use Tie::IxHash; use base qw(WebGUI::Asset); -use WebGUI::Utility; use WebGUI::Inbox; =head1 NAME diff --git a/lib/WebGUI/Asset/EMSSubmissionForm.pm b/lib/WebGUI/Asset/EMSSubmissionForm.pm index 89c396508..78ef4130d 100644 --- a/lib/WebGUI/Asset/EMSSubmissionForm.pm +++ b/lib/WebGUI/Asset/EMSSubmissionForm.pm @@ -78,7 +78,6 @@ property formDescription => ( use Tie::IxHash; use JSON; -use WebGUI::Utility; with 'WebGUI::Role::Asset::AlwaysHidden'; =head1 NAME diff --git a/lib/WebGUI/Asset/File.pm b/lib/WebGUI/Asset/File.pm index 326efe444..5ab99526d 100644 --- a/lib/WebGUI/Asset/File.pm +++ b/lib/WebGUI/Asset/File.pm @@ -62,7 +62,6 @@ with 'WebGUI::Role::Asset::SetStoragePermissions'; use WebGUI::Storage; use WebGUI::SQL; -use WebGUI::Utility; =head1 NAME diff --git a/lib/WebGUI/Asset/MatrixListing.pm b/lib/WebGUI/Asset/MatrixListing.pm index 70af296c0..3dc33cc7d 100644 --- a/lib/WebGUI/Asset/MatrixListing.pm +++ b/lib/WebGUI/Asset/MatrixListing.pm @@ -117,7 +117,6 @@ property lastUpdated => ( ); with 'WebGUI::Role::Asset::Comments'; -use WebGUI::Utility; =head1 NAME diff --git a/lib/WebGUI/Asset/RichEdit.pm b/lib/WebGUI/Asset/RichEdit.pm index 28e4e1121..86f08cac0 100644 --- a/lib/WebGUI/Asset/RichEdit.pm +++ b/lib/WebGUI/Asset/RichEdit.pm @@ -16,7 +16,6 @@ package WebGUI::Asset::RichEdit; use strict; use WebGUI::Form; -use WebGUI::Utility; use WebGUI::International; use JSON; use Tie::IxHash; diff --git a/lib/WebGUI/Asset/Sku/EMSBadge.pm b/lib/WebGUI/Asset/Sku/EMSBadge.pm index 086afd93e..512036f63 100644 --- a/lib/WebGUI/Asset/Sku/EMSBadge.pm +++ b/lib/WebGUI/Asset/Sku/EMSBadge.pm @@ -85,7 +85,6 @@ use JSON; use WebGUI::HTMLForm; use WebGUI::International; use WebGUI::Shop::AddressBook; -use WebGUI::Utility; =head1 NAME diff --git a/lib/WebGUI/Asset/Sku/EMSRibbon.pm b/lib/WebGUI/Asset/Sku/EMSRibbon.pm index b8abdc9f3..21f7837a2 100644 --- a/lib/WebGUI/Asset/Sku/EMSRibbon.pm +++ b/lib/WebGUI/Asset/Sku/EMSRibbon.pm @@ -37,7 +37,6 @@ property percentageDiscount => ( ); use WebGUI::HTMLForm; -use WebGUI::Utility; =head1 NAME diff --git a/lib/WebGUI/Asset/Sku/EMSTicket.pm b/lib/WebGUI/Asset/Sku/EMSTicket.pm index defd0787b..81cd134fb 100644 --- a/lib/WebGUI/Asset/Sku/EMSTicket.pm +++ b/lib/WebGUI/Asset/Sku/EMSTicket.pm @@ -92,7 +92,6 @@ property eventMetaData => ( ); use JSON (); -use WebGUI::Utility; =head1 NAME diff --git a/lib/WebGUI/Asset/Sku/EMSToken.pm b/lib/WebGUI/Asset/Sku/EMSToken.pm index 5e65c382c..b10cb4b00 100644 --- a/lib/WebGUI/Asset/Sku/EMSToken.pm +++ b/lib/WebGUI/Asset/Sku/EMSToken.pm @@ -29,7 +29,6 @@ property price => ( hoverHelp => ["price help", 'Asset_EMSToken'], ); -use WebGUI::Utility; =head1 NAME diff --git a/lib/WebGUI/Asset/Sku/Product.pm b/lib/WebGUI/Asset/Sku/Product.pm index 6b3140349..df8c8f6eb 100644 --- a/lib/WebGUI/Asset/Sku/Product.pm +++ b/lib/WebGUI/Asset/Sku/Product.pm @@ -15,7 +15,6 @@ use Tie::IxHash; use WebGUI::HTMLForm; use WebGUI::Storage; use WebGUI::SQL; -use WebGUI::Utility; use JSON; use Moose; diff --git a/lib/WebGUI/Asset/Story.pm b/lib/WebGUI/Asset/Story.pm index 03850e037..dc6ad37ed 100644 --- a/lib/WebGUI/Asset/Story.pm +++ b/lib/WebGUI/Asset/Story.pm @@ -71,7 +71,6 @@ property photo => ( with 'WebGUI::Role::Asset::AlwaysHidden'; -use WebGUI::Utility; use WebGUI::International; use JSON qw/from_json to_json/; use Storable qw/dclone/; diff --git a/lib/WebGUI/Asset/Template.pm b/lib/WebGUI/Asset/Template.pm index 6e35a95b1..7a40d85ee 100644 --- a/lib/WebGUI/Asset/Template.pm +++ b/lib/WebGUI/Asset/Template.pm @@ -110,7 +110,6 @@ property attachmentsJson => ( use WebGUI::International; use WebGUI::Asset::Template::HTMLTemplate; -use WebGUI::Utility; use WebGUI::Form; use WebGUI::Exception; use List::MoreUtils qw{ any }; diff --git a/lib/WebGUI/Asset/Wobject/AssetReport.pm b/lib/WebGUI/Asset/Wobject/AssetReport.pm index 658f9d684..50deb74cf 100644 --- a/lib/WebGUI/Asset/Wobject/AssetReport.pm +++ b/lib/WebGUI/Asset/Wobject/AssetReport.pm @@ -16,7 +16,6 @@ use strict; use Tie::IxHash; use WebGUI::International; use WebGUI::Paginator; -use WebGUI::Utility; use WebGUI::Form::AssetReportQuery; use Moose; diff --git a/lib/WebGUI/Asset/Wobject/Calendar.pm b/lib/WebGUI/Asset/Wobject/Calendar.pm index c8dfe7897..1d589bc79 100644 --- a/lib/WebGUI/Asset/Wobject/Calendar.pm +++ b/lib/WebGUI/Asset/Wobject/Calendar.pm @@ -298,7 +298,6 @@ sub _workflowIdCommit_builder { return shift->session->setting->get('defaultVersionTagWorkflow'), } -use WebGUI::Utility; use WebGUI::International; use WebGUI::Search; use WebGUI::Form; diff --git a/lib/WebGUI/Asset/Wobject/Carousel.pm b/lib/WebGUI/Asset/Wobject/Carousel.pm index 02d2bcf39..420476c0e 100644 --- a/lib/WebGUI/Asset/Wobject/Carousel.pm +++ b/lib/WebGUI/Asset/Wobject/Carousel.pm @@ -15,7 +15,6 @@ $VERSION = "1.0.0"; use strict; use JSON; use WebGUI::International; -use WebGUI::Utility; use Moose; use WebGUI::Definition::Asset; extends 'WebGUI::Asset::Wobject'; diff --git a/lib/WebGUI/Asset/Wobject/Collaboration.pm b/lib/WebGUI/Asset/Wobject/Collaboration.pm index 7b76ceeb6..cd1d1ecde 100644 --- a/lib/WebGUI/Asset/Wobject/Collaboration.pm +++ b/lib/WebGUI/Asset/Wobject/Collaboration.pm @@ -467,7 +467,6 @@ use WebGUI::Group; use WebGUI::HTML; use WebGUI::International; use WebGUI::Paginator; -use WebGUI::Utility; use WebGUI::Asset::Wobject; use WebGUI::Workflow::Cron; diff --git a/lib/WebGUI/Asset/Wobject/Collaboration/Newsletter.pm b/lib/WebGUI/Asset/Wobject/Collaboration/Newsletter.pm index 5b799dd33..4e1271e0e 100644 --- a/lib/WebGUI/Asset/Wobject/Collaboration/Newsletter.pm +++ b/lib/WebGUI/Asset/Wobject/Collaboration/Newsletter.pm @@ -71,7 +71,6 @@ sub _newsletterCategories_options { use WebGUI::Form; use WebGUI::International; -use WebGUI::Utility; #------------------------------------------------------------------- @@ -192,7 +191,7 @@ sub www_mySubscriptions { my @userPrefs = $self->getUserSubscriptions; foreach my $id (keys %{$meta}) { my @options = (); - if ($id ~~ [split("\n", $self->newsletterCategories))]) { + if ($id ~~ [split("\n", $self->newsletterCategories)]) { foreach my $option (split("\n", $meta->{$id}{possibleValues})) { $option =~ s/\s+$//; # remove trailing spaces next if $option eq ""; # skip blank values diff --git a/lib/WebGUI/Asset/Wobject/Dashboard.pm b/lib/WebGUI/Asset/Wobject/Dashboard.pm index 1b21d4254..4d67eaa48 100644 --- a/lib/WebGUI/Asset/Wobject/Dashboard.pm +++ b/lib/WebGUI/Asset/Wobject/Dashboard.pm @@ -12,7 +12,6 @@ package WebGUI::Asset::Wobject::Dashboard; use strict; use WebGUI::International; -use WebGUI::Utility; use WebGUI::ProfileField; use Time::HiRes; use WebGUI::Asset::Wobject; diff --git a/lib/WebGUI/Asset/Wobject/DataForm.pm b/lib/WebGUI/Asset/Wobject/DataForm.pm index 854e5df59..0716c6f5a 100644 --- a/lib/WebGUI/Asset/Wobject/DataForm.pm +++ b/lib/WebGUI/Asset/Wobject/DataForm.pm @@ -223,7 +223,6 @@ has '+uiLevel' => ( use WebGUI::Pluggable; use WebGUI::DateTime; use WebGUI::User; -use WebGUI::Utility; use WebGUI::Group; use WebGUI::AssetCollateral::DataForm::Entry; use WebGUI::Form::SelectRichEditor; @@ -437,7 +436,7 @@ Returns true if the DataForm uses a captcha as one of the fields. sub hasCaptcha { my $self = shift; - return 'Captcha' ~~ [map { $_->{type} } map { $self->getFieldConfig($_) } @{ $self->getFieldOrder })]; + return 'Captcha' ~~ [map { $_->{type} } map { $self->getFieldConfig($_) } @{ $self->getFieldOrder } ]; } #------------------------------------------------------------------- diff --git a/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm b/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm index 74ee0b983..fe41ba1c4 100644 --- a/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm +++ b/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm @@ -202,7 +202,6 @@ use WebGUI::Exception; use WebGUI::FormValidator; use WebGUI::HTMLForm; use WebGUI::International; -use WebGUI::Utility; use WebGUI::Workflow::Instance; use Data::Dumper; diff --git a/lib/WebGUI/Asset/Wobject/Folder.pm b/lib/WebGUI/Asset/Wobject/Folder.pm index c38312f8d..57850b242 100644 --- a/lib/WebGUI/Asset/Wobject/Folder.pm +++ b/lib/WebGUI/Asset/Wobject/Folder.pm @@ -70,7 +70,6 @@ has '+uiLevel' => ( default => 5, ); -use WebGUI::Utility; use Number::Format (); =head1 NAME diff --git a/lib/WebGUI/Asset/Wobject/Matrix.pm b/lib/WebGUI/Asset/Wobject/Matrix.pm index 24d20f28c..af6059e69 100644 --- a/lib/WebGUI/Asset/Wobject/Matrix.pm +++ b/lib/WebGUI/Asset/Wobject/Matrix.pm @@ -16,7 +16,6 @@ our $VERSION = "2.0.0"; use Tie::IxHash; use JSON; use WebGUI::International; -use WebGUI::Utility; use Moose; use WebGUI::Definition::Asset; use feature ":5.10"; diff --git a/lib/WebGUI/Asset/Wobject/Navigation.pm b/lib/WebGUI/Asset/Wobject/Navigation.pm index cd2aa7969..b987bd8a6 100644 --- a/lib/WebGUI/Asset/Wobject/Navigation.pm +++ b/lib/WebGUI/Asset/Wobject/Navigation.pm @@ -16,7 +16,6 @@ use WebGUI::Form; use WebGUI::International; use WebGUI::SQL; use WebGUI::TabForm; -use WebGUI::Utility; use Moose; use WebGUI::Definition::Asset; diff --git a/lib/WebGUI/Asset/Wobject/Poll.pm b/lib/WebGUI/Asset/Wobject/Poll.pm index 18c01fc75..ce5791278 100644 --- a/lib/WebGUI/Asset/Wobject/Poll.pm +++ b/lib/WebGUI/Asset/Wobject/Poll.pm @@ -17,7 +17,6 @@ use WebGUI::Form; use WebGUI::International; use WebGUI::SQL; use WebGUI::User; -use WebGUI::Utility; use WebGUI::Asset::Wobject; use WebGUI::Image::Graph; use WebGUI::Storage; diff --git a/lib/WebGUI/Asset/Wobject/ProjectManager.pm b/lib/WebGUI/Asset/Wobject/ProjectManager.pm index e19a8e8fe..0920eab41 100644 --- a/lib/WebGUI/Asset/Wobject/ProjectManager.pm +++ b/lib/WebGUI/Asset/Wobject/ProjectManager.pm @@ -16,7 +16,6 @@ our $VERSION = "1.0.0"; use DateTime; use Tie::IxHash; use WebGUI::International; -use WebGUI::Utility; use Number::Format (); use WebGUI::HTML; use POSIX qw(ceil floor); diff --git a/lib/WebGUI/Asset/Wobject/StockData.pm b/lib/WebGUI/Asset/Wobject/StockData.pm index 3e80499cf..190fbd416 100644 --- a/lib/WebGUI/Asset/Wobject/StockData.pm +++ b/lib/WebGUI/Asset/Wobject/StockData.pm @@ -12,7 +12,6 @@ package WebGUI::Asset::Wobject::StockData; use strict; use WebGUI::International; -use WebGUI::Utility; use WebGUI::Asset::Wobject; use Finance::Quote; use Tie::IxHash; diff --git a/lib/WebGUI/Asset/Wobject/Survey.pm b/lib/WebGUI/Asset/Wobject/Survey.pm index 5532ef436..212f46006 100644 --- a/lib/WebGUI/Asset/Wobject/Survey.pm +++ b/lib/WebGUI/Asset/Wobject/Survey.pm @@ -14,7 +14,6 @@ use strict; use JSON; use WebGUI::International; use WebGUI::Form::File; -use WebGUI::Utility; use Moose; use WebGUI::Definition::Asset; extends 'WebGUI::Asset::Wobject'; diff --git a/lib/WebGUI/Asset/Wobject/Thingy.pm b/lib/WebGUI/Asset/Wobject/Thingy.pm index dfed5602b..e7456c3be 100644 --- a/lib/WebGUI/Asset/Wobject/Thingy.pm +++ b/lib/WebGUI/Asset/Wobject/Thingy.pm @@ -14,7 +14,6 @@ use strict; use Tie::IxHash; use JSON; use WebGUI::International; -use WebGUI::Utility; use WebGUI::Text; use WebGUI::Form::File; use WebGUI::DateTime; @@ -709,7 +708,7 @@ sub getEditFieldForm { my %fieldTypes = %{WebGUI::Form::FieldType->new($session)->getTypes}; - $things = $self->session->db->read('select thingId, Thingy_things.label, count(*) from Thingy_things ' + my $things = $self->session->db->read('select thingId, Thingy_things.label, count(*) from Thingy_things ' .'left join Thingy_fields using(thingId) where Thingy_things.assetId = ? and fieldId != "" ' .'group by thingId',[$self->getId]); while (my $thing = $things->hashRef) { @@ -733,7 +732,7 @@ sub getEditFieldForm { $dialogPrefix = "edit_".$fieldId."_Dialog"; } - $f = WebGUI::HTMLForm->new($self->session,{ + my $f = WebGUI::HTMLForm->new($self->session,{ action=>$self->getUrl, tableExtras=>' cellpadding="0" cellspacing="0"' }); diff --git a/lib/WebGUI/Asset/Wobject/TimeTracking.pm b/lib/WebGUI/Asset/Wobject/TimeTracking.pm index 0f83ca07a..486bb6481 100644 --- a/lib/WebGUI/Asset/Wobject/TimeTracking.pm +++ b/lib/WebGUI/Asset/Wobject/TimeTracking.pm @@ -16,7 +16,6 @@ our $VERSION = "1.0.0"; use DateTime; use Tie::IxHash; use WebGUI::International; -use WebGUI::Utility; use POSIX qw(ceil floor); use Moose; use WebGUI::Definition::Asset; diff --git a/lib/WebGUI/Asset/Wobject/UserList.pm b/lib/WebGUI/Asset/Wobject/UserList.pm index 18f631397..b517aa377 100644 --- a/lib/WebGUI/Asset/Wobject/UserList.pm +++ b/lib/WebGUI/Asset/Wobject/UserList.pm @@ -13,7 +13,6 @@ package WebGUI::Asset::Wobject::UserList; use strict; use HTML::Entities; use Tie::IxHash; -use WebGUI::Utility; use WebGUI::Asset::Wobject; use WebGUI::Operation::Shared; use WebGUI::International; @@ -550,7 +549,7 @@ sub view { # Handle special case of alias, which does not have a default value but is set to the username by default $value = $user->{userName} if ($profileFieldName eq 'alias' && $value eq ''); my %profileFieldValues; - if ((ucfirst $profileField->{fieldType}) ~~ [qw(File Image)]) && $value ne ''){ + if ((ucfirst $profileField->{fieldType}) ~~ [qw(File Image)] && $value ne ''){ my $file = WebGUI::Form::DynamicField->new($self->session, fieldType=>$profileField->{fieldType}, value=>$value diff --git a/lib/WebGUI/Asset/Wobject/WikiMaster.pm b/lib/WebGUI/Asset/Wobject/WikiMaster.pm index 74d7d24c9..be529ed66 100644 --- a/lib/WebGUI/Asset/Wobject/WikiMaster.pm +++ b/lib/WebGUI/Asset/Wobject/WikiMaster.pm @@ -195,7 +195,6 @@ with 'WebGUI::Role::Asset::RssFeed'; use WebGUI::International; use HTML::Parser; use URI::Escape; -use WebGUI::Utility qw//; use WebGUI::Form; use Clone qw/clone/; diff --git a/lib/WebGUI/AssetExportHtml.pm b/lib/WebGUI/AssetExportHtml.pm index d98fdc970..16d7b1bbc 100644 --- a/lib/WebGUI/AssetExportHtml.pm +++ b/lib/WebGUI/AssetExportHtml.pm @@ -20,7 +20,6 @@ use Path::Class (); use Scalar::Util qw(looks_like_number); use WebGUI::International; use WebGUI::Exception; -use WebGUI::Utility (); use WebGUI::Session; use URI::URL (); use Scope::Guard; diff --git a/lib/WebGUI/AssetTrash.pm b/lib/WebGUI/AssetTrash.pm index 9bce0a824..6eb959762 100644 --- a/lib/WebGUI/AssetTrash.pm +++ b/lib/WebGUI/AssetTrash.pm @@ -15,7 +15,6 @@ package WebGUI::Asset; =cut use strict; -use WebGUI::Utility qw(); use Number::Format (); use JSON; diff --git a/lib/WebGUI/Auth.pm b/lib/WebGUI/Auth.pm index e8a090db1..24a3521bb 100644 --- a/lib/WebGUI/Auth.pm +++ b/lib/WebGUI/Auth.pm @@ -17,7 +17,6 @@ package WebGUI::Auth; use strict qw(subs vars); use WebGUI::International; use WebGUI::Asset::Template; -use WebGUI::Utility; use WebGUI::User; use WebGUI::Workflow::Instance; use WebGUI::Inbox; diff --git a/lib/WebGUI/Content/AssetDiscovery.pm b/lib/WebGUI/Content/AssetDiscovery.pm index f4f259acf..03e648442 100644 --- a/lib/WebGUI/Content/AssetDiscovery.pm +++ b/lib/WebGUI/Content/AssetDiscovery.pm @@ -17,7 +17,6 @@ package WebGUI::Content::AssetDiscovery; use strict; use JSON; use WebGUI::Asset; -use WebGUI::Utility; use XML::Simple; =head1 NAME diff --git a/lib/WebGUI/Content/AssetManager.pm b/lib/WebGUI/Content/AssetManager.pm index fcd9fa24a..38d12e417 100644 --- a/lib/WebGUI/Content/AssetManager.pm +++ b/lib/WebGUI/Content/AssetManager.pm @@ -6,7 +6,6 @@ use JSON qw( from_json to_json ); use URI; use WebGUI::Form; use WebGUI::Paginator; -use WebGUI::Utility; use WebGUI::Macro::AdminBar; use Tie::IxHash; use Number::Format (); diff --git a/lib/WebGUI/Crud.pm b/lib/WebGUI/Crud.pm index 6cfd6dd5d..4e8fb1c42 100644 --- a/lib/WebGUI/Crud.pm +++ b/lib/WebGUI/Crud.pm @@ -23,7 +23,6 @@ use Tie::IxHash; use Clone qw/clone/; use WebGUI::DateTime; use WebGUI::Exception; -use WebGUI::Utility; private objectData => my %objectData; readonly session => my %session; diff --git a/lib/WebGUI/DatabaseLink.pm b/lib/WebGUI/DatabaseLink.pm index e6c68b813..461fb9803 100644 --- a/lib/WebGUI/DatabaseLink.pm +++ b/lib/WebGUI/DatabaseLink.pm @@ -18,7 +18,6 @@ package WebGUI::DatabaseLink; use strict; use WebGUI::SQL; use WebGUI::International; -use WebGUI::Utility; use DBI; =head1 NAME diff --git a/lib/WebGUI/FilePump/Bundle.pm b/lib/WebGUI/FilePump/Bundle.pm index 8cce89cf9..54f27558d 100644 --- a/lib/WebGUI/FilePump/Bundle.pm +++ b/lib/WebGUI/FilePump/Bundle.pm @@ -5,7 +5,6 @@ use strict; use WebGUI::Asset; use WebGUI::International; use WebGUI::Exception; -use WebGUI::Utility; use WebGUI::Macro; use URI; use Path::Class; diff --git a/lib/WebGUI/Form/AssetReportQuery.pm b/lib/WebGUI/Form/AssetReportQuery.pm index 5480ff28e..466dde3de 100644 --- a/lib/WebGUI/Form/AssetReportQuery.pm +++ b/lib/WebGUI/Form/AssetReportQuery.pm @@ -4,7 +4,6 @@ use strict; use base 'WebGUI::Form::Control'; use JSON; use WebGUI::International; -use WebGUI::Utility; =head1 NAME diff --git a/lib/WebGUI/Form/Email.pm b/lib/WebGUI/Form/Email.pm index 97416c62d..ccacd5ca3 100644 --- a/lib/WebGUI/Form/Email.pm +++ b/lib/WebGUI/Form/Email.pm @@ -17,7 +17,6 @@ package WebGUI::Form::Email; use strict; use base 'WebGUI::Form::Text'; use WebGUI::International; -use WebGUI::Utility; use Email::Valid; =head1 NAME diff --git a/lib/WebGUI/Form/Image.pm b/lib/WebGUI/Form/Image.pm index f96e5b186..82571bd19 100644 --- a/lib/WebGUI/Form/Image.pm +++ b/lib/WebGUI/Form/Image.pm @@ -19,7 +19,6 @@ use base 'WebGUI::Form::File'; use WebGUI::International; use WebGUI::Storage; use WebGUI::Form::YesNo; -use WebGUI::Utility qw//; =head1 NAME diff --git a/lib/WebGUI/Friends.pm b/lib/WebGUI/Friends.pm index cea5a30f9..5e2560b07 100644 --- a/lib/WebGUI/Friends.pm +++ b/lib/WebGUI/Friends.pm @@ -34,7 +34,6 @@ use WebGUI::HTML; use WebGUI::Inbox; use WebGUI::International; use WebGUI::User; -use WebGUI::Utility; =head1 NAME diff --git a/lib/WebGUI/Group.pm b/lib/WebGUI/Group.pm index 6db9c3d9e..540be1583 100644 --- a/lib/WebGUI/Group.pm +++ b/lib/WebGUI/Group.pm @@ -17,7 +17,6 @@ package WebGUI::Group; use strict; use WebGUI::LDAPLink; use WebGUI::Macro; -use WebGUI::Utility; use WebGUI::Pluggable; require WebGUI::Asset; use WebGUI::International; diff --git a/lib/WebGUI/Image/Graph.pm b/lib/WebGUI/Image/Graph.pm index 69301d8e6..c0088d1e3 100644 --- a/lib/WebGUI/Image/Graph.pm +++ b/lib/WebGUI/Image/Graph.pm @@ -5,7 +5,6 @@ use WebGUI::Image; use WebGUI::Image::Palette; use WebGUI::Image::Font; use List::Util; -use WebGUI::Utility; our @ISA = qw(WebGUI::Image); diff --git a/lib/WebGUI/Image/Graph/XYGraph/Bar.pm b/lib/WebGUI/Image/Graph/XYGraph/Bar.pm index a7ad738c7..c87e2b3ba 100644 --- a/lib/WebGUI/Image/Graph/XYGraph/Bar.pm +++ b/lib/WebGUI/Image/Graph/XYGraph/Bar.pm @@ -4,7 +4,6 @@ use strict; use WebGUI::Image::Graph::XYGraph; use List::Util; use POSIX; -use WebGUI::Utility; our @ISA = qw(WebGUI::Image::Graph::XYGraph); diff --git a/lib/WebGUI/Macro/RandomThread.pm b/lib/WebGUI/Macro/RandomThread.pm index 468234da0..ad1596bff 100644 --- a/lib/WebGUI/Macro/RandomThread.pm +++ b/lib/WebGUI/Macro/RandomThread.pm @@ -18,7 +18,6 @@ use strict; use WebGUI::Asset; use WebGUI::Asset::Wobject::Collaboration; use WebGUI::Asset::Template; -use WebGUI::Utility; =head1 NAME diff --git a/lib/WebGUI/Operation/Auth.pm b/lib/WebGUI/Operation/Auth.pm index d47107055..7f86cda25 100644 --- a/lib/WebGUI/Operation/Auth.pm +++ b/lib/WebGUI/Operation/Auth.pm @@ -20,7 +20,6 @@ use WebGUI::Operation::Shared; use WebGUI::Pluggable; use WebGUI::SQL; use WebGUI::User; -use WebGUI::Utility; #------------------------------------------------------------------- diff --git a/lib/WebGUI/Operation/Cron.pm b/lib/WebGUI/Operation/Cron.pm index 216baa738..98c5d48aa 100644 --- a/lib/WebGUI/Operation/Cron.pm +++ b/lib/WebGUI/Operation/Cron.pm @@ -17,7 +17,6 @@ use WebGUI::HTMLForm; use WebGUI::International; use WebGUI::Workflow::Cron; use WebGUI::Workflow::Instance; -use WebGUI::Utility; use Net::CIDR::Lite; =head1 NAME diff --git a/lib/WebGUI/Operation/Help.pm b/lib/WebGUI/Operation/Help.pm index a82444409..980ba74bd 100644 --- a/lib/WebGUI/Operation/Help.pm +++ b/lib/WebGUI/Operation/Help.pm @@ -15,7 +15,6 @@ use WebGUI::AdminConsole; use WebGUI::International; use WebGUI::Asset::Template; use WebGUI::Macro; -use WebGUI::Utility; use WebGUI::TabForm; use WebGUI::Pluggable; diff --git a/lib/WebGUI/Operation/Spectre.pm b/lib/WebGUI/Operation/Spectre.pm index 5e4ceaa62..aa768d296 100644 --- a/lib/WebGUI/Operation/Spectre.pm +++ b/lib/WebGUI/Operation/Spectre.pm @@ -13,7 +13,6 @@ package WebGUI::Operation::Spectre; use strict; use JSON; use POE::Component::IKC::ClientLite; -use WebGUI::Utility; use WebGUI::Workflow::Cron; use WebGUI::Workflow::Instance; use Net::CIDR::Lite; diff --git a/lib/WebGUI/Operation/SpellCheck.pm b/lib/WebGUI/Operation/SpellCheck.pm index 566a2485d..570b1645f 100644 --- a/lib/WebGUI/Operation/SpellCheck.pm +++ b/lib/WebGUI/Operation/SpellCheck.pm @@ -11,7 +11,6 @@ package WebGUI::Operation::SpellCheck; #------------------------------------------------------------------- use strict; -use WebGUI::Utility; use File::Path qw(mkpath); # Optional, but if unavailable, spell checking will have no effect. my $spellerAvailable; diff --git a/lib/WebGUI/Operation/User.pm b/lib/WebGUI/Operation/User.pm index a50e8b779..211001220 100644 --- a/lib/WebGUI/Operation/User.pm +++ b/lib/WebGUI/Operation/User.pm @@ -23,7 +23,6 @@ use WebGUI::Paginator; use WebGUI::SQL; use WebGUI::TabForm; use WebGUI::User; -use WebGUI::Utility; use JSON; use XML::Simple; use Net::CIDR::Lite; diff --git a/lib/WebGUI/Operation/Workflow.pm b/lib/WebGUI/Operation/Workflow.pm index 882434db3..d46ec97f7 100644 --- a/lib/WebGUI/Operation/Workflow.pm +++ b/lib/WebGUI/Operation/Workflow.pm @@ -18,7 +18,6 @@ use WebGUI::Pluggable; use WebGUI::Workflow; use WebGUI::Workflow::Activity; use WebGUI::Workflow::Instance; -use WebGUI::Utility; use POE::Component::IKC::ClientLite; use JSON qw/ decode_json /; use Net::CIDR::Lite; diff --git a/lib/WebGUI/Paginator.pm b/lib/WebGUI/Paginator.pm index 513e40903..e461c0d24 100644 --- a/lib/WebGUI/Paginator.pm +++ b/lib/WebGUI/Paginator.pm @@ -16,7 +16,6 @@ package WebGUI::Paginator; use strict; use WebGUI::International; -use WebGUI::Utility; use List::Util qw/min/; =head1 NAME diff --git a/lib/WebGUI/ProfileField.pm b/lib/WebGUI/ProfileField.pm index f25e3f6d1..6b4bc563b 100644 --- a/lib/WebGUI/ProfileField.pm +++ b/lib/WebGUI/ProfileField.pm @@ -21,7 +21,6 @@ use WebGUI::Form::DynamicField; use WebGUI::Operation::Shared; use WebGUI::HTML; use WebGUI::User; -use WebGUI::Utility; use WebGUI::Pluggable; use Tie::IxHash; diff --git a/lib/WebGUI/Role/Asset/Comments.pm b/lib/WebGUI/Role/Asset/Comments.pm index 83c50528c..169b5e45f 100644 --- a/lib/WebGUI/Role/Asset/Comments.pm +++ b/lib/WebGUI/Role/Asset/Comments.pm @@ -35,7 +35,6 @@ property averageCommentRating => ( use WebGUI::Exception; use WebGUI::Form; use WebGUI::HTML; -use WebGUI::Utility; =head1 NAME diff --git a/lib/WebGUI/SQL.pm b/lib/WebGUI/SQL.pm index 32439ec56..abed9b334 100644 --- a/lib/WebGUI/SQL.pm +++ b/lib/WebGUI/SQL.pm @@ -18,7 +18,6 @@ use strict; use DBI (); use Tie::IxHash (); use Text::CSV_XS (); -use WebGUI::Utility (); use WebGUI::SQL::ResultSet (); use WebGUI::Exception; use Scalar::Util (); diff --git a/lib/WebGUI/Session/DateTime.pm b/lib/WebGUI/Session/DateTime.pm index 757362dde..fd344b515 100644 --- a/lib/WebGUI/Session/DateTime.pm +++ b/lib/WebGUI/Session/DateTime.pm @@ -22,7 +22,6 @@ use DateTime::TimeZone; use Scalar::Util qw( weaken ); use Tie::IxHash; use WebGUI::International; -use WebGUI::Utility qw(); use Scalar::Util qw(weaken); diff --git a/lib/WebGUI/Session/Http.pm b/lib/WebGUI/Session/Http.pm index 2c9b0916c..5fc1b81e1 100644 --- a/lib/WebGUI/Session/Http.pm +++ b/lib/WebGUI/Session/Http.pm @@ -17,7 +17,6 @@ package WebGUI::Session::Http; use strict; use Scalar::Util qw(weaken); -use WebGUI::Utility qw(); use HTTP::Date (); sub _deprecated { diff --git a/lib/WebGUI/Session/Url.pm b/lib/WebGUI/Session/Url.pm index d4874efd2..25c1be2c6 100644 --- a/lib/WebGUI/Session/Url.pm +++ b/lib/WebGUI/Session/Url.pm @@ -20,7 +20,6 @@ use URI; use URI::Escape; use Scalar::Util qw( weaken ); use WebGUI::International; -use WebGUI::Utility; use Scalar::Util qw(weaken); use Encode; diff --git a/lib/WebGUI/Shop/Pay.pm b/lib/WebGUI/Shop/Pay.pm index 99730b2c0..32d1f3af8 100644 --- a/lib/WebGUI/Shop/Pay.pm +++ b/lib/WebGUI/Shop/Pay.pm @@ -22,7 +22,6 @@ use WebGUI::International; use WebGUI::Pluggable; use WebGUI::Shop::Admin; #use WebGUI::Shop::PayDriver; -use WebGUI::Utility; use Tie::IxHash; use Scalar::Util; diff --git a/lib/WebGUI/Shop/Ship.pm b/lib/WebGUI/Shop/Ship.pm index dd6b1d84d..482672e06 100644 --- a/lib/WebGUI/Shop/Ship.pm +++ b/lib/WebGUI/Shop/Ship.pm @@ -8,7 +8,6 @@ use WebGUI::International; use WebGUI::Pluggable; use WebGUI::Shop::Admin; use WebGUI::Shop::ShipDriver; -use WebGUI::Utility; use Scalar::Util; =head1 NAME diff --git a/lib/WebGUI/Shop/TaxDriver/EU.pm b/lib/WebGUI/Shop/TaxDriver/EU.pm index 81e093298..5570dc70a 100644 --- a/lib/WebGUI/Shop/TaxDriver/EU.pm +++ b/lib/WebGUI/Shop/TaxDriver/EU.pm @@ -18,7 +18,6 @@ use strict; use WebGUI::Content::Account; use WebGUI::TabForm; -use WebGUI::Utility qw{}; use WebGUI::International; use Business::Tax::VAT::Validation; diff --git a/lib/WebGUI/Shop/Vendor.pm b/lib/WebGUI/Shop/Vendor.pm index d8be81d05..ffb5c60a4 100644 --- a/lib/WebGUI/Shop/Vendor.pm +++ b/lib/WebGUI/Shop/Vendor.pm @@ -91,7 +91,6 @@ around BUILDARGS => sub { use WebGUI::Shop::Admin; use WebGUI::Exception::Shop; use WebGUI::International; -use WebGUI::Utility qw{}; use List::Util qw{ sum }; use JSON qw{ encode_json }; diff --git a/lib/WebGUI/Storage.pm b/lib/WebGUI/Storage.pm index 171d8b0dd..63e6fa0cb 100644 --- a/lib/WebGUI/Storage.pm +++ b/lib/WebGUI/Storage.pm @@ -25,7 +25,6 @@ use File::Spec; use Image::Magick; use Path::Class::Dir; use Storable (); -use WebGUI::Utility qw(); use WebGUI::Paths; use JSON (); diff --git a/lib/WebGUI/User.pm b/lib/WebGUI/User.pm index 2bc735b16..8f166a930 100644 --- a/lib/WebGUI/User.pm +++ b/lib/WebGUI/User.pm @@ -16,7 +16,6 @@ package WebGUI::User; use strict; use WebGUI::Group; -use WebGUI::Utility; use WebGUI::Workflow::Instance; use JSON (); use WebGUI::ProfileField; diff --git a/lib/WebGUI/Utility.pm b/lib/WebGUI/Utility.pm deleted file mode 100644 index 7bba87659..000000000 --- a/lib/WebGUI/Utility.pm +++ /dev/null @@ -1,72 +0,0 @@ -package WebGUI::Utility; - - -=head1 LEGAL - - ------------------------------------------------------------------- - WebGUI is Copyright 2001-2009 Plain Black Corporation. - ------------------------------------------------------------------- - Please read the legal notices (docs/legal.txt) and the license - (docs/license.txt) that came with this distribution before using - this software. - ------------------------------------------------------------------- - http://www.plainblack.com info@plainblack.com - ------------------------------------------------------------------- - -=cut - - -use Exporter; -use strict; -use Tie::IxHash; -use Net::CIDR::Lite; - -our @ISA = qw(Exporter); -our @EXPORT = qw( - &sortHash - ); - - -=head1 NAME - -Package WebGUI::Utility - -=head1 DESCRIPTION - -This package provides miscellaneous but useful utilities to the WebGUI programmer. - -=head1 SYNOPSIS - - use WebGUI::Utility; - %hash = sortHash(%hash); - -=head1 METHODS - -These subroutines are available from this package: - -=cut - -#------------------------------------------------------------------- - -=head2 sortHash ( hash ) - -Sorts a hash by its values. Returns a Tie::IxHash. You must assign this to -a similarly tied hash to preserve the order. - -=head3 hash - -A hash to be sorted. - -=cut - -sub sortHash { - my %hash = @_; - tie my %newHash, 'Tie::IxHash'; - for my $key ( sort { $hash{$a} cmp $hash{$b} } keys %hash ) { - $newHash{ $key } = $hash{ $key }; - } - return %newHash; -} - - -1; diff --git a/lib/WebGUI/Workflow/Activity/SyncProfilesToLdap.pm b/lib/WebGUI/Workflow/Activity/SyncProfilesToLdap.pm index 52d46e233..2804e715b 100644 --- a/lib/WebGUI/Workflow/Activity/SyncProfilesToLdap.pm +++ b/lib/WebGUI/Workflow/Activity/SyncProfilesToLdap.pm @@ -21,7 +21,6 @@ use Net::LDAP; use Time::HiRes; use WebGUI::Auth; use WebGUI::User; -use WebGUI::Utility; =head1 NAME diff --git a/sbin/fileImport.pl b/sbin/fileImport.pl index c10838278..73cbc3e25 100755 --- a/sbin/fileImport.pl +++ b/sbin/fileImport.pl @@ -22,7 +22,6 @@ use WebGUI::Asset::File; use WebGUI::Asset::File::Image; use WebGUI::Session; use WebGUI::Storage; -use WebGUI::Utility; $| = 1; diff --git a/sbin/rebuildLineage.pl b/sbin/rebuildLineage.pl index c87c6cac0..6a6743025 100755 --- a/sbin/rebuildLineage.pl +++ b/sbin/rebuildLineage.pl @@ -15,7 +15,6 @@ use Getopt::Long; use Pod::Usage; use WebGUI::Paths -inc; use WebGUI::Session; -use WebGUI::Utility; $| = 1; my $configFile; diff --git a/sbin/thumbnailer.pl b/sbin/thumbnailer.pl index 83858562d..432c1c27d 100755 --- a/sbin/thumbnailer.pl +++ b/sbin/thumbnailer.pl @@ -24,7 +24,6 @@ use Image::Magick; use WebGUI::Paths -inc; -use WebGUI::Utility; my $thumbnailSize; my $onlyMissingThumbnails; diff --git a/sbin/userImport.pl b/sbin/userImport.pl index c0b32d6b2..10234cc9e 100755 --- a/sbin/userImport.pl +++ b/sbin/userImport.pl @@ -19,7 +19,6 @@ use WebGUI::DateTime; use WebGUI::Group; use WebGUI::Session; use WebGUI::User; -use WebGUI::Utility; $|=1; diff --git a/t/Asset/AssetClipboard.t b/t/Asset/AssetClipboard.t index 0b25a080e..38a13538d 100644 --- a/t/Asset/AssetClipboard.t +++ b/t/Asset/AssetClipboard.t @@ -15,7 +15,6 @@ use strict; use WebGUI::Test; use WebGUI::Session; -use WebGUI::Utility; use WebGUI::Asset; use WebGUI::VersionTag; diff --git a/t/Asset/AssetMetaData.t b/t/Asset/AssetMetaData.t index a22c00ff3..11b8c5985 100644 --- a/t/Asset/AssetMetaData.t +++ b/t/Asset/AssetMetaData.t @@ -15,7 +15,6 @@ use strict; use WebGUI::Test; use WebGUI::Session; -use WebGUI::Utility; use WebGUI::Asset; use WebGUI::VersionTag; diff --git a/t/Asset/AssetPackage.t b/t/Asset/AssetPackage.t index 70d3d1240..9243a52ee 100644 --- a/t/Asset/AssetPackage.t +++ b/t/Asset/AssetPackage.t @@ -15,7 +15,6 @@ use strict; use WebGUI::Test; use WebGUI::Session; -use WebGUI::Utility; use WebGUI::Asset; use WebGUI::VersionTag; diff --git a/t/Asset/AssetVersion.t b/t/Asset/AssetVersion.t index a25e14cab..ff08bc9a8 100644 --- a/t/Asset/AssetVersion.t +++ b/t/Asset/AssetVersion.t @@ -15,7 +15,6 @@ use strict; use WebGUI::Test; use WebGUI::Session; -use WebGUI::Utility; use WebGUI::Asset::Snippet; use Test::More; # increment this value for each test you create plan tests => 26; diff --git a/t/Asset/Asset_diagnose.t b/t/Asset/Asset_diagnose.t index f34fc4c2d..cc3515491 100644 --- a/t/Asset/Asset_diagnose.t +++ b/t/Asset/Asset_diagnose.t @@ -15,7 +15,6 @@ use strict; use WebGUI::Test; use WebGUI::Session; -use WebGUI::Utility; use Test::More; # increment this value for each test you create use Test::Deep; diff --git a/t/Asset/Wobject/StoryArchive.t b/t/Asset/Wobject/StoryArchive.t index 454bcf890..e26259dce 100644 --- a/t/Asset/Wobject/StoryArchive.t +++ b/t/Asset/Wobject/StoryArchive.t @@ -25,7 +25,6 @@ use WebGUI::Test; # Must use this before any other WebGUI modules use WebGUI::Test::Maker::Permission; use WebGUI::Session; use WebGUI::Text; -use WebGUI::Utility; use WebGUI::DateTime; use DateTime; diff --git a/t/Form/ProfileEnabled.t b/t/Form/ProfileEnabled.t index 4a8ffd61f..fe46752d7 100644 --- a/t/Form/ProfileEnabled.t +++ b/t/Form/ProfileEnabled.t @@ -14,7 +14,6 @@ use WebGUI::Test; use WebGUI::Form::FieldType; use WebGUI::Form::DynamicField; use WebGUI::Session; -use WebGUI::Utility; #The goal of this test is to verify that the isDynamicCompatible setting #works on all form elements and that only the correct forms are profile diff --git a/t/Group.t b/t/Group.t index 942844561..2a99f1f88 100644 --- a/t/Group.t +++ b/t/Group.t @@ -12,7 +12,6 @@ use strict; use WebGUI::Test; use WebGUI::Session; -use WebGUI::Utility; use WebGUI::User; use WebGUI::Group; diff --git a/t/Paginator.t b/t/Paginator.t index 867596174..ff50f23ae 100644 --- a/t/Paginator.t +++ b/t/Paginator.t @@ -12,7 +12,6 @@ use strict; use WebGUI::Test; use WebGUI::Session; -use WebGUI::Utility; use WebGUI::Paginator; use Test::More; # increment this value for each test you create diff --git a/t/Session/Id.t b/t/Session/Id.t index 3a9c28d5d..42bafeec0 100644 --- a/t/Session/Id.t +++ b/t/Session/Id.t @@ -12,7 +12,6 @@ use strict; use WebGUI::Test; use WebGUI::Session; -use WebGUI::Utility; use Test::More; diff --git a/t/User.t b/t/User.t index a3496f5fd..25afdc256 100644 --- a/t/User.t +++ b/t/User.t @@ -12,7 +12,6 @@ use strict; use WebGUI::Test; use WebGUI::Session; -use WebGUI::Utility; #use Exception::Class; use WebGUI::User; diff --git a/t/Utility.t b/t/Utility.t deleted file mode 100644 index 51e6b6918..000000000 --- a/t/Utility.t +++ /dev/null @@ -1,36 +0,0 @@ -#------------------------------------------------------------------- -# WebGUI is Copyright 2001-2009 Plain Black Corporation. -#------------------------------------------------------------------- -# Please read the legal notices (docs/legal.txt) and the license -# (docs/license.txt) that came with this distribution before using -# this software. -#------------------------------------------------------------------- -# http://www.plainblack.com info@plainblack.com -#------------------------------------------------------------------- - - -use strict; -use Tie::IxHash; - -use WebGUI::Test; -use WebGUI::Session; - -use Test::More tests => 2; # increment this value for each test you create -use Test::Deep; - -my $session = WebGUI::Test->session; - -{ - # Just some basic tests for now. - - my (%hash1, %hash2, %hash3); - my %hash1 = ('a' => 5, 'b' => 3, 'c' => 2, 'd' => 4, 'e' => 1); - tie my %hash2, 'Tie::IxHash'; - tie my %hash3, 'Tie::IxHash'; - %hash2 = WebGUI::Utility::sortHash(%hash1); - is_deeply([keys %hash2], [qw/e c b d a/], 'sortHash'); -} - -# Local variables: -# mode: cperl -# End: diff --git a/t/Workflow/Activity/CalendarUpdateFeeds.t b/t/Workflow/Activity/CalendarUpdateFeeds.t index 515e9b3eb..3d5092ca2 100644 --- a/t/Workflow/Activity/CalendarUpdateFeeds.t +++ b/t/Workflow/Activity/CalendarUpdateFeeds.t @@ -12,7 +12,6 @@ use strict; use WebGUI::Test; use WebGUI::Session; -use WebGUI::Utility; use WebGUI::Workflow::Activity::CalendarUpdateFeeds; use WebGUI::Asset::Wobject::Calendar; diff --git a/t/Workflow/Activity/DeleteExpiredSessions.t b/t/Workflow/Activity/DeleteExpiredSessions.t index 80250918f..8355e426d 100644 --- a/t/Workflow/Activity/DeleteExpiredSessions.t +++ b/t/Workflow/Activity/DeleteExpiredSessions.t @@ -12,7 +12,6 @@ use strict; use WebGUI::Test; use WebGUI::Session; -use WebGUI::Utility; use WebGUI::Workflow::Activity::DeleteExpiredSessions; use Test::More; diff --git a/t/Workflow/Activity/RemoveOldCarts.t b/t/Workflow/Activity/RemoveOldCarts.t index 6d0cc1162..5c33ce434 100644 --- a/t/Workflow/Activity/RemoveOldCarts.t +++ b/t/Workflow/Activity/RemoveOldCarts.t @@ -12,7 +12,6 @@ use strict; use WebGUI::Test; use WebGUI::Session; -use WebGUI::Utility; use WebGUI::Workflow::Activity::RemoveOldCarts; use WebGUI::Shop::Cart; diff --git a/t/Workflow/Activity/TrashExpiredEvents.t b/t/Workflow/Activity/TrashExpiredEvents.t index 5b7786d13..48f9c1993 100644 --- a/t/Workflow/Activity/TrashExpiredEvents.t +++ b/t/Workflow/Activity/TrashExpiredEvents.t @@ -12,7 +12,6 @@ use strict; use WebGUI::Test; use WebGUI::Session; -use WebGUI::Utility; use WebGUI::Workflow::Activity::TrashExpiredEvents; use WebGUI::Asset; diff --git a/t/lib/WebGUI/Serialize.pm b/t/lib/WebGUI/Serialize.pm index e6cb4bc27..dae496288 100644 --- a/t/lib/WebGUI/Serialize.pm +++ b/t/lib/WebGUI/Serialize.pm @@ -1,7 +1,6 @@ package WebGUI::Serialize; use base qw/WebGUI::Crud/; -use WebGUI::Utility; #------------------------------------------------------------------- diff --git a/t/tests/Test/WebGUI/Asset.pm b/t/tests/Test/WebGUI/Asset.pm index 667a381e3..1773ca4f9 100644 --- a/t/tests/Test/WebGUI/Asset.pm +++ b/t/tests/Test/WebGUI/Asset.pm @@ -18,7 +18,6 @@ use Test::More; use Test::Deep; use Test::Exception; use WebGUI::Test; -use WebGUI::Utility; use Data::Dumper; use List::MoreUtils;