diff --git a/lib/calcms/aggregator.pm b/lib/calcms/aggregator.pm index 3a8113e..7bc0e4e 100644 --- a/lib/calcms/aggregator.pm +++ b/lib/calcms/aggregator.pm @@ -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($$) { diff --git a/lib/calcms/audio_recordings.pm b/lib/calcms/audio_recordings.pm index ff93c96..1eefc62 100644 --- a/lib/calcms/audio_recordings.pm +++ b/lib/calcms/audio_recordings.pm @@ -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: diff --git a/lib/calcms/auth.pm b/lib/calcms/auth.pm index 50c499b..2c2ac01 100644 --- a/lib/calcms/auth.pm +++ b/lib/calcms/auth.pm @@ -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; diff --git a/lib/calcms/calendar.pm b/lib/calcms/calendar.pm index 70be184..7a3c188 100644 --- a/lib/calcms/calendar.pm +++ b/lib/calcms/calendar.pm @@ -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() { diff --git a/lib/calcms/comments.pm b/lib/calcms/comments.pm index 23be77d..f4957fa 100644 --- a/lib/calcms/comments.pm +++ b/lib/calcms/comments.pm @@ -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); diff --git a/lib/calcms/config.pm b/lib/calcms/config.pm index 5a8b942..d04c9bd 100644 --- a/lib/calcms/config.pm +++ b/lib/calcms/config.pm @@ -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; diff --git a/lib/calcms/creole_wiki.pm b/lib/calcms/creole_wiki.pm index ea50f08..e2ddfe2 100644 --- a/lib/calcms/creole_wiki.pm +++ b/lib/calcms/creole_wiki.pm @@ -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); diff --git a/lib/calcms/db.pm b/lib/calcms/db.pm index 00a0f47..8421068 100644 --- a/lib/calcms/db.pm +++ b/lib/calcms/db.pm @@ -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 diff --git a/lib/calcms/eventOps.pm b/lib/calcms/eventOps.pm index 75c6fa6..8036b8a 100644 --- a/lib/calcms/eventOps.pm +++ b/lib/calcms/eventOps.pm @@ -13,7 +13,7 @@ use studios(); use series_events(); use user_stats(); -use base 'Exporter'; +#use base 'Exporter'; our @EXPORT_OK = qw( setAttributesFromSeriesTemplate setAttributesFromSchedule diff --git a/lib/calcms/event_history.pm b/lib/calcms/event_history.pm index ac0ccbb..405958f 100644 --- a/lib/calcms/event_history.pm +++ b/lib/calcms/event_history.pm @@ -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; diff --git a/lib/calcms/events.pm b/lib/calcms/events.pm index 8984926..386bd1a 100644 --- a/lib/calcms/events.pm +++ b/lib/calcms/events.pm @@ -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 diff --git a/lib/calcms/images.pm b/lib/calcms/images.pm index 74e84da..cf7db0c 100644 --- a/lib/calcms/images.pm +++ b/lib/calcms/images.pm @@ -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 diff --git a/lib/calcms/localization.pm b/lib/calcms/localization.pm index 484674b..ad9bc42 100644 --- a/lib/calcms/localization.pm +++ b/lib/calcms/localization.pm @@ -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; diff --git a/lib/calcms/log.pm b/lib/calcms/log.pm index 84d35ed..a4df952 100644 --- a/lib/calcms/log.pm +++ b/lib/calcms/log.pm @@ -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(); diff --git a/lib/calcms/markup.pm b/lib/calcms/markup.pm index fbf3117..556e9b9 100644 --- a/lib/calcms/markup.pm +++ b/lib/calcms/markup.pm @@ -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); diff --git a/lib/calcms/params.pm b/lib/calcms/params.pm index 6c1b12a..1456792 100644 --- a/lib/calcms/params.pm +++ b/lib/calcms/params.pm @@ -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; diff --git a/lib/calcms/password_requests.pm b/lib/calcms/password_requests.pm index 3a4897d..6151384 100644 --- a/lib/calcms/password_requests.pm +++ b/lib/calcms/password_requests.pm @@ -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; diff --git a/lib/calcms/playout.pm b/lib/calcms/playout.pm index aba9b83..2cb894f 100644 --- a/lib/calcms/playout.pm +++ b/lib/calcms/playout.pm @@ -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; diff --git a/lib/calcms/project.pm b/lib/calcms/project.pm index cba7be9..e309b10 100644 --- a/lib/calcms/project.pm +++ b/lib/calcms/project.pm @@ -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 diff --git a/lib/calcms/roles.pm b/lib/calcms/roles.pm index 5572786..eb3f1a6 100644 --- a/lib/calcms/roles.pm +++ b/lib/calcms/roles.pm @@ -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 = { diff --git a/lib/calcms/series.pm b/lib/calcms/series.pm index c17e53a..4382611 100644 --- a/lib/calcms/series.pm +++ b/lib/calcms/series.pm @@ -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 diff --git a/lib/calcms/series_dates.pm b/lib/calcms/series_dates.pm index 15e5941..92a70a0 100644 --- a/lib/calcms/series_dates.pm +++ b/lib/calcms/series_dates.pm @@ -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; diff --git a/lib/calcms/series_events.pm b/lib/calcms/series_events.pm index 2b8d26b..0a5f45c 100644 --- a/lib/calcms/series_events.pm +++ b/lib/calcms/series_events.pm @@ -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 diff --git a/lib/calcms/series_schedule.pm b/lib/calcms/series_schedule.pm index 59ccc31..f0364af 100644 --- a/lib/calcms/series_schedule.pm +++ b/lib/calcms/series_schedule.pm @@ -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; diff --git a/lib/calcms/studio_timeslot_dates.pm b/lib/calcms/studio_timeslot_dates.pm index 0ed9ae9..39dc4fb 100644 --- a/lib/calcms/studio_timeslot_dates.pm +++ b/lib/calcms/studio_timeslot_dates.pm @@ -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; diff --git a/lib/calcms/studio_timeslot_schedule.pm b/lib/calcms/studio_timeslot_schedule.pm index 649b107..4bdd78a 100644 --- a/lib/calcms/studio_timeslot_schedule.pm +++ b/lib/calcms/studio_timeslot_schedule.pm @@ -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; diff --git a/lib/calcms/studios.pm b/lib/calcms/studios.pm index e5cc691..9e9d64b 100644 --- a/lib/calcms/studios.pm +++ b/lib/calcms/studios.pm @@ -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; diff --git a/lib/calcms/tags.pm b/lib/calcms/tags.pm index 3252531..e4b4807 100644 --- a/lib/calcms/tags.pm +++ b/lib/calcms/tags.pm @@ -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($) { diff --git a/lib/calcms/template.pm b/lib/calcms/template.pm index 39a49ed..b99185a 100644 --- a/lib/calcms/template.pm +++ b/lib/calcms/template.pm @@ -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 diff --git a/lib/calcms/time.pm b/lib/calcms/time.pm index 328ad14..4c77d49 100644 --- a/lib/calcms/time.pm +++ b/lib/calcms/time.pm @@ -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 diff --git a/lib/calcms/uac.pm b/lib/calcms/uac.pm index df2b28d..b2c3a4d 100644 --- a/lib/calcms/uac.pm +++ b/lib/calcms/uac.pm @@ -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 diff --git a/lib/calcms/user_sessions.pm b/lib/calcms/user_sessions.pm index 8ec069e..e826d4a 100644 --- a/lib/calcms/user_sessions.pm +++ b/lib/calcms/user_sessions.pm @@ -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; diff --git a/lib/calcms/user_settings.pm b/lib/calcms/user_settings.pm index 1e80718..1881cf2 100644 --- a/lib/calcms/user_settings.pm +++ b/lib/calcms/user_settings.pm @@ -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; diff --git a/lib/calcms/user_stats.pm b/lib/calcms/user_stats.pm index 5320635..b29571c 100644 --- a/lib/calcms/user_stats.pm +++ b/lib/calcms/user_stats.pm @@ -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; diff --git a/lib/calcms/work_dates.pm b/lib/calcms/work_dates.pm index 6a1cd4d..765edb1 100644 --- a/lib/calcms/work_dates.pm +++ b/lib/calcms/work_dates.pm @@ -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; diff --git a/lib/calcms/work_schedule.pm b/lib/calcms/work_schedule.pm index a543730..52c7002 100644 --- a/lib/calcms/work_schedule.pm +++ b/lib/calcms/work_schedule.pm @@ -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;