remove use base Exporter;

no need to call import
This commit is contained in:
Milan
2020-03-08 11:37:30 +01:00
parent 7b565c6d9b
commit a769424a6e
36 changed files with 36 additions and 36 deletions

View File

@@ -9,7 +9,7 @@ use comments();
use calendar(); use calendar();
use project(); use project();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_cache configure_cache put_cache get_list check_params); our @EXPORT_OK = qw(get_cache configure_cache put_cache get_list check_params);
sub get_list($$) { sub get_list($$) {

View File

@@ -7,7 +7,7 @@ no warnings 'redefine';
use Data::Dumper; use Data::Dumper;
use db(); use db();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_columns get); our @EXPORT_OK = qw(get_columns get);
# columns: # columns:

View File

@@ -12,7 +12,7 @@ use Authen::Passphrase::BlowfishCrypt();
use time(); use time();
use user_sessions (); use user_sessions ();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_user login logout crypt_password); our @EXPORT_OK = qw(get_user login logout crypt_password);
my $defaultExpiration = 60; my $defaultExpiration = 60;

View File

@@ -10,7 +10,7 @@ use Date::Calc();
use template(); use template();
use events(); use events();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(init get_cached_or_render get render get_calendar_weeks configure_cache); our @EXPORT_OK = qw(init get_cached_or_render get render get_calendar_weeks configure_cache);
sub init() { sub init() {

View File

@@ -11,7 +11,7 @@ use markup();
use template(); use template();
use time(); use time();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = our @EXPORT_OK =
qw(init get_cached_or_render get modify_results render configure_cache get_query get_by_event get_level get_events check insert set_lock_status set_news_status lock update_comment_count sort); qw(init get_cached_or_render get modify_results render configure_cache get_query get_by_event get_level get_events check insert set_lock_status set_news_status lock update_comment_count sort);

View File

@@ -7,7 +7,7 @@ no warnings 'redefine';
use FindBin(); use FindBin();
use Config::General(); use Config::General();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get set); our @EXPORT_OK = qw(get set);
my $config = undef; my $config = undef;

View File

@@ -7,7 +7,7 @@ no warnings 'redefine';
use Data::Dumper; use Data::Dumper;
use markup(); use markup();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = our @EXPORT_OK =
qw(extractEventFromWikiText removeMeta eventToWikiText extractMeta removeMeta metaToWiki); qw(extractEventFromWikiText removeMeta eventToWikiText extractMeta removeMeta metaToWiki);

View File

@@ -8,7 +8,7 @@ use DBD::mysql();
use Digest::MD5 qw(); use Digest::MD5 qw();
use Data::Dumper; use Data::Dumper;
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw( our @EXPORT_OK = qw(
connect disconnect connect disconnect
get insert put get insert put

View File

@@ -13,7 +13,7 @@ use studios();
use series_events(); use series_events();
use user_stats(); use user_stats();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw( our @EXPORT_OK = qw(
setAttributesFromSeriesTemplate setAttributesFromSeriesTemplate
setAttributesFromSchedule setAttributesFromSchedule

View File

@@ -6,7 +6,7 @@ no warnings 'redefine';
use Data::Dumper; use Data::Dumper;
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_columns get get_by_id insert insert_by_event_id delete); our @EXPORT_OK = qw(get_columns get get_by_id insert insert_by_event_id delete);
sub debug; sub debug;

View File

@@ -17,7 +17,7 @@ use log();
use project(); use project();
use studios(); use studios();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw( our @EXPORT_OK = qw(
init init
get_cached_or_render get_cached_or_render

View File

@@ -8,7 +8,7 @@ use config();
use template(); use template();
use Data::Dumper; use Data::Dumper;
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get insert update insert_or_update delete delete_files); our @EXPORT_OK = qw(get insert update insert_or_update delete delete_files);
#column 'created_at' will be set at insert #column 'created_at' will be set at insert

View File

@@ -8,7 +8,7 @@ use Data::Dumper;
use uac(); use uac();
use user_settings(); use user_settings();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get getJavascript); our @EXPORT_OK = qw(get getJavascript);
sub debug; sub debug;

View File

@@ -4,7 +4,7 @@ use strict;
use warnings; use warnings;
no warnings 'redefine'; no warnings 'redefine';
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(error load_file save_file append_file); our @EXPORT_OK = qw(error load_file save_file append_file);
use config(); use config();

View File

@@ -14,7 +14,7 @@ use Text::Markdown();
use log(); use log();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = our @EXPORT_OK =
qw(fix_line_ends html_to_creole creole_to_html creole_to_plain plain_to_ical ical_to_plain ical_to_xml html_to_plain fix_utf8 uri_encode compress base26); qw(fix_line_ends html_to_creole creole_to_html creole_to_plain plain_to_ical ical_to_plain ical_to_xml html_to_plain fix_utf8 uri_encode compress base26);

View File

@@ -7,7 +7,7 @@ no warnings 'redefine';
use Data::Dumper; use Data::Dumper;
use Apache2::Request(); use Apache2::Request();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get isJson); our @EXPORT_OK = qw(get isJson);
sub debug; sub debug;

View File

@@ -8,7 +8,7 @@ use Data::Dumper;
use Session::Token(); use Session::Token();
# table: calcms_password_requests # table: calcms_password_requests
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get insert delete get_columns); our @EXPORT_OK = qw(get insert delete get_columns);
use mail; use mail;

View File

@@ -10,7 +10,7 @@ use db();
use time(); use time();
use series_events(); use series_events();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_columns get sync); our @EXPORT_OK = qw(get_columns get sync);
sub debug; sub debug;

View File

@@ -12,7 +12,7 @@ use log();
use template(); use template();
use images(); use images();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw( our @EXPORT_OK = qw(
check get_columns get insert delete get_date_range check get_columns get insert delete get_date_range
get_studios assign_studio unassign_studio is_studio_assigned get_studio_assignments get_studios assign_studio unassign_studio is_studio_assigned get_studio_assignments

View File

@@ -8,7 +8,7 @@ use Apache2::Reload();
use config(); use config();
use base 'Exporter'; #use base 'Exporter';
my @EXPORT_OK = qw(get_user get_user_permissions get_template_parameters get_jobs); my @EXPORT_OK = qw(get_user get_user_permissions get_template_parameters get_jobs);
my $ROLES = { my $ROLES = {

View File

@@ -9,7 +9,7 @@ use Data::Dumper;
use events(); use events();
use images(); use images();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw( our @EXPORT_OK = qw(
get_columns get insert update delete get_columns get insert update delete
get_users add_user remove_user get_users add_user remove_user

View File

@@ -16,7 +16,7 @@ use series_schedule();
# table: calcms_series_dates # table: calcms_series_dates
# columns: id, studio_id, series_id, start(datetime), end(datetime) # columns: id, studio_id, series_id, start(datetime), end(datetime)
# TODO: delete column schedule_id # TODO: delete column schedule_id
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_columns get insert update delete get_dates get_series); our @EXPORT_OK = qw(get_columns get insert update delete get_dates get_series);
sub debug; sub debug;

View File

@@ -22,7 +22,7 @@ use images();
# check permissions, insert and update events related to series # check permissions, insert and update events related to series
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw( our @EXPORT_OK = qw(
check_permission check_permission
save_content save_content

View File

@@ -18,7 +18,7 @@ use series_dates();
# month # month
# nextDay (add 24 hours to start) # nextDay (add 24 hours to start)
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_columns get insert update delete); our @EXPORT_OK = qw(get_columns get insert update delete);
sub debug; sub debug;

View File

@@ -12,7 +12,7 @@ use time();
# table: calcms_studio_timeslot_dates # table: calcms_studio_timeslot_dates
# columns: id, studio_id, start(datetime), end(datetime) # columns: id, studio_id, start(datetime), end(datetime)
# TODO: delete column schedule_id # TODO: delete column schedule_id
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_columns get insert update delete get_dates); our @EXPORT_OK = qw(get_columns get insert update delete get_dates);
sub debug; sub debug;

View File

@@ -10,7 +10,7 @@ use studio_timeslot_dates();
# table: calcms_studio_timeslot_schedule # table: calcms_studio_timeslot_schedule
# columns: id, project_id, studio_id, start(datetime), end(datetime), end_date(date), # columns: id, project_id, studio_id, start(datetime), end(datetime), end_date(date),
# frequency(days), duration(minutes), create_events(days), publish_events(days) # frequency(days), duration(minutes), create_events(days), publish_events(days)
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_columns get insert update delete); our @EXPORT_OK = qw(get_columns get insert update delete);
sub debug; sub debug;

View File

@@ -7,7 +7,7 @@ no warnings 'redefine';
use Data::Dumper; use Data::Dumper;
use images(); use images();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_columns get get_by_id insert update delete check check_studio); our @EXPORT_OK = qw(get_columns get get_by_id insert update delete check check_studio);
sub debug; sub debug;

View File

@@ -5,7 +5,7 @@ use warnings;
no warnings 'redefine'; no warnings 'redefine';
use Data::Dumper; use Data::Dumper;
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_tags); our @EXPORT_OK = qw(get_tags);
sub get_tags($) { sub get_tags($) {

View File

@@ -18,7 +18,7 @@ use project();
use log(); use log();
use roles(); use roles();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(check process exit_on_missing_permission clear_cache); our @EXPORT_OK = qw(check process exit_on_missing_permission clear_cache);
# TODO:config # TODO:config

View File

@@ -14,7 +14,7 @@ use Data::Dumper;
use config(); use config();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw( our @EXPORT_OK = qw(
format_datetime format_time format_datetime format_time
date_format time_format date_format time_format

View File

@@ -15,7 +15,7 @@ use studios();
use user_settings(); use user_settings();
use user_default_studios(); use user_default_studios();
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw( our @EXPORT_OK = qw(
get_user get_users update_user insert_user delete_user get_user get_users update_user insert_user delete_user
get_roles insert_role update_role get_role_columns get_roles insert_role update_role get_role_columns

View File

@@ -18,7 +18,7 @@ use time;
# start (timestamp), # start (timestamp),
# end (timestamp), # end (timestamp),
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_columns get insert update delete); our @EXPORT_OK = qw(get_columns get insert update delete);
sub debug; sub debug;

View File

@@ -9,7 +9,7 @@ use series_dates();
# table: calcms_user_settings # table: calcms_user_settings
# columns: user, colors # columns: user, colors
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(getColors getColorCss get insert update delete get_columns defaultColors); our @EXPORT_OK = qw(getColors getColorCss get insert update delete get_columns defaultColors);
sub debug; sub debug;

View File

@@ -5,7 +5,7 @@ use warnings;
no warnings 'redefine'; no warnings 'redefine';
use Data::Dumper; use Data::Dumper;
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_columns get update insert get_stats increase); our @EXPORT_OK = qw(get_columns get update insert get_stats increase);
sub debug; sub debug;

View File

@@ -16,7 +16,7 @@ use work_schedule();
# table: calcms_work_dates # table: calcms_work_dates
# columns: id, studio_id, schedule_id, start(datetime), end(datetime) # columns: id, studio_id, schedule_id, start(datetime), end(datetime)
# TODO: delete column schedule_id # TODO: delete column schedule_id
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_columns get insert update delete get_dates); our @EXPORT_OK = qw(get_columns get insert update delete get_dates);
sub debug; sub debug;

View File

@@ -17,7 +17,7 @@ use series_dates();
# week_of_month (1..5) # week_of_month (1..5)
# month # month
use base 'Exporter'; #use base 'Exporter';
our @EXPORT_OK = qw(get_columns get insert update delete); our @EXPORT_OK = qw(get_columns get insert update delete);
sub debug; sub debug;