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 project();
use base 'Exporter';
#use base 'Exporter';
our @EXPORT_OK = qw(get_cache configure_cache put_cache get_list check_params);
sub get_list($$) {

View File

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

View File

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

View File

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

View File

@@ -11,7 +11,7 @@ use markup();
use template();
use time();
use base 'Exporter';
#use base 'Exporter';
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);

View File

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

View File

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

View File

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

View File

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

View File

@@ -6,7 +6,7 @@ no warnings 'redefine';
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);
sub debug;

View File

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

View File

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

View File

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

View File

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

View File

@@ -14,7 +14,7 @@ use Text::Markdown();
use log();
use base 'Exporter';
#use base 'Exporter';
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);

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

@@ -16,7 +16,7 @@ use series_schedule();
# table: calcms_series_dates
# columns: id, studio_id, series_id, start(datetime), end(datetime)
# 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);
sub debug;

View File

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

View File

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

View File

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

View File

@@ -10,7 +10,7 @@ use studio_timeslot_dates();
# table: calcms_studio_timeslot_schedule
# columns: id, project_id, studio_id, start(datetime), end(datetime), end_date(date),
# 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);
sub debug;

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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