Bugzilla – Attachment 138795 Details for
Bug 30926
Remove unnecessary use statements
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
Bug 30926: Remove unnecessary use statements
Bug-30926-Remove-unnecessary-use-statements.patch (text/plain), 210.24 KB, created by
Jonathan Druart
on 2022-08-08 08:16:41 UTC
(
hide
)
Description:
Bug 30926: Remove unnecessary use statements
Filename:
MIME Type:
Creator:
Jonathan Druart
Created:
2022-08-08 08:16:41 UTC
Size:
210.24 KB
patch
obsolete
>From 43c6eea47c1a6830624355a8034b77e561c11ab8 Mon Sep 17 00:00:00 2001 >From: Jonathan Druart <jonathan.druart@bugs.koha-community.org> >Date: Mon, 8 Aug 2022 10:14:48 +0200 >Subject: [PATCH] Bug 30926: Remove unnecessary use statements > >This is the result of: > perl remove_unused_import.pl **/*.pl **/*.pm svc/* svc/**/* >--- > C4/Accounts.pm | 3 --- > C4/Acquisition.pm | 1 - > C4/Auth.pm | 2 -- > C4/Auth_with_ldap.pm | 1 - > C4/Auth_with_shibboleth.pm | 1 - > C4/AuthoritiesMarc.pm | 3 --- > C4/BackgroundJob.pm | 1 - > C4/Barcodes.pm | 1 - > C4/Barcodes/EAN13.pm | 1 - > C4/Barcodes/annual.pm | 1 - > C4/Barcodes/incremental.pm | 1 - > C4/Biblio.pm | 4 ---- > C4/Breeding.pm | 2 -- > C4/Budgets.pm | 1 - > C4/Calendar.pm | 1 - > C4/Circulation.pm | 3 --- > C4/ClassSortRoutine.pm | 1 - > C4/ClassSortRoutine/Dewey.pm | 1 - > C4/ClassSortRoutine/Generic.pm | 1 - > C4/ClassSortRoutine/LCC.pm | 1 - > C4/ClassSplitRoutine/Dewey.pm | 1 - > C4/ClassSplitRoutine/Generic.pm | 1 - > C4/ClassSplitRoutine/LCC.pm | 1 - > C4/ClassSplitRoutine/RegEx.pm | 1 - > C4/Context.pm | 1 - > C4/Contract.pm | 1 - > C4/Creators/Batch.pm | 1 - > C4/Form/MessagingPreferences.pm | 2 -- > C4/ILSDI/Services.pm | 5 ----- > C4/ImportExportFramework.pm | 2 -- > C4/Items.pm | 1 - > C4/Labels/Label.pm | 4 ---- > C4/Letters.pm | 2 -- > C4/Linker/FirstMatch.pm | 1 - > C4/Linker/LastMatch.pm | 1 - > C4/Members.pm | 2 -- > C4/Output.pm | 1 - > C4/Overdues.pm | 1 - > C4/Record.pm | 1 - > C4/Reports/Guided.pm | 1 - > C4/Reserves.pm | 4 ---- > C4/SIP/ILS.pm | 2 -- > C4/SIP/ILS/Item.pm | 5 ----- > C4/SIP/ILS/Patron.pm | 3 --- > C4/SIP/ILS/Transaction.pm | 2 -- > C4/SIP/ILS/Transaction/Checkout.pm | 1 - > C4/SIP/ILS/Transaction/FeePayment.pm | 1 - > C4/SIP/SIPServer.pm | 1 - > C4/SIP/Sip/MsgType.pm | 1 - > C4/SMS.pm | 1 - > C4/Scheduler.pm | 1 - > C4/Scrubber.pm | 2 -- > C4/Serials.pm | 1 - > C4/Stats.pm | 1 - > C4/Suggestions.pm | 3 --- > C4/Tags.pm | 1 - > C4/TmplToken.pm | 1 - > C4/XISBN.pm | 1 - > Koha/Account.pm | 1 - > Koha/ActionLog.pm | 1 - > Koha/ActionLogs.pm | 1 - > Koha/AdditionalField.pm | 1 - > Koha/Auth/TwoFactorAuth.pm | 1 - > Koha/AuthUtils.pm | 1 - > Koha/Authority/MergeRequests.pm | 1 - > Koha/BackgroundJob/BatchDeleteAuthority.pm | 1 - > Koha/BackgroundJob/BatchDeleteBiblio.pm | 1 - > Koha/BackgroundJob/BatchUpdateBiblio.pm | 2 -- > Koha/BackgroundJob/BatchUpdateItem.pm | 2 -- > Koha/BiblioUtils/Iterator.pm | 1 - > Koha/Config/SysPref.pm | 1 - > Koha/Exporter/Record.pm | 2 -- > Koha/ExternalContent.pm | 1 - > Koha/Filter/MARC/EmbedItems.pm | 1 - > Koha/Hold.pm | 1 - > Koha/I18N.pm | 1 - > Koha/Illrequest.pm | 1 - > Koha/Illrequest/Logger.pm | 1 - > Koha/ImportBatch.pm | 2 +- > Koha/ImportBatchProfile.pm | 2 +- > Koha/ImportBatchProfiles.pm | 2 +- > Koha/ImportBatches.pm | 2 +- > Koha/Item.pm | 1 - > Koha/Item/Attributes.pm | 1 - > Koha/ItemType.pm | 1 - > Koha/ItemTypes.pm | 1 - > Koha/Items.pm | 1 - > Koha/Misc/Files.pm | 1 - > Koha/Patron.pm | 1 - > Koha/Patron/Category.pm | 1 - > Koha/Patron/Files.pm | 1 - > Koha/Patron/Message.pm | 1 - > Koha/Patron/Password/Recovery.pm | 1 - > Koha/Plugins.pm | 1 - > Koha/REST/V1/Checkouts.pm | 1 - > Koha/REST/V1/Clubs/Holds.pm | 1 - > Koha/REST/V1/Holds.pm | 1 - > Koha/REST/V1/ImportBatchProfiles.pm | 2 +- > Koha/SearchEngine/Elasticsearch/Search.pm | 1 - > Koha/SearchEngine/Search.pm | 1 - > Koha/SearchEngine/Zebra/QueryBuilder.pm | 2 -- > Koha/SearchEngine/Zebra/Search.pm | 1 - > Koha/Template/Plugin/AdditionalContents.pm | 2 -- > Koha/Template/Plugin/Branches.pm | 1 - > Koha/Template/Plugin/Cache.pm | 1 - > Koha/Template/Plugin/Context.pm | 1 - > Koha/Template/Plugin/I18N.pm | 1 - > Koha/Template/Plugin/Languages.pm | 2 -- > Koha/Template/Plugin/Registers.pm | 1 - > Koha/Template/Plugin/TablesSettings.pm | 2 -- > Koha/Uploader.pm | 1 - > Koha/Z3950Responder/Session.pm | 1 - > Koha/pdfformat/layout3pagesfr.pm | 1 - > acqui/acqui-home.pl | 1 - > acqui/addorderiso2709.pl | 1 - > acqui/check_budget_total.pl | 1 - > acqui/edimsg.pl | 1 - > acqui/finishreceive.pl | 2 -- > acqui/lateorders-export.pl | 2 -- > acqui/neworderempty.pl | 1 - > acqui/newordersuggestion.pl | 1 - > acqui/orderreceive.pl | 1 - > acqui/supplier.pl | 1 - > acqui/transferorder.pl | 1 - > acqui/updatesupplier.pl | 2 -- > acqui/z3950_search.pl | 1 - > admin/adveditorshortcuts.pl | 1 - > admin/aqbudgetperiods.pl | 2 -- > admin/aqcontract.pl | 2 -- > admin/auth_tag_structure.pl | 1 - > admin/authorised_values.pl | 1 - > admin/authtypes.pl | 1 - > admin/background_jobs.pl | 1 - > admin/biblio_framework.pl | 1 - > admin/branch_transfer_limits.pl | 1 - > admin/branches.pl | 2 -- > admin/cash_registers.pl | 1 - > admin/categories.pl | 1 - > admin/check_budget_parent.pl | 1 - > admin/classsources.pl | 1 - > admin/clone-rules.pl | 2 -- > admin/columns_settings.pl | 1 - > admin/credit_types.pl | 1 - > admin/curbside_pickup.pl | 1 - > admin/currency.pl | 1 - > admin/debit_types.pl | 1 - > admin/desks.pl | 1 - > admin/import_export_authtype.pl | 1 - > admin/import_export_framework.pl | 1 - > admin/item_circulation_alerts.pl | 1 - > admin/library_groups.pl | 1 - > admin/marc-overlay-rules.pl | 2 -- > admin/marctagstructure.pl | 1 - > admin/matching-rules.pl | 1 - > admin/overdrive.pl | 1 - > admin/preferences.pl | 1 - > admin/searchengine/elasticsearch/mappings.pl | 1 - > admin/sms_providers.pl | 1 - > admin/systempreferences.pl | 1 - > admin/z3950servers.pl | 1 - > authorities/authorities-home.pl | 2 -- > authorities/detail-biblio-search.pl | 1 - > authorities/detail.pl | 2 -- > authorities/export.pl | 2 -- > authorities/merge_ajax.pl | 1 - > authorities/ysearch.pl | 1 - > basket/basket.pl | 1 - > basket/downloadcart.pl | 1 - > basket/sendbasket.pl | 1 - > catalogue/ISBDdetail.pl | 1 - > catalogue/MARCdetail.pl | 1 - > catalogue/detail.pl | 1 - > catalogue/export.pl | 2 -- > catalogue/item-export.pl | 1 - > catalogue/moredetail.pl | 1 - > catalogue/search-history.pl | 1 - > catalogue/showmarc.pl | 1 - > catalogue/updateitem.pl | 2 -- > cataloguing/addbooks.pl | 2 -- > cataloguing/additem.pl | 2 -- > cataloguing/merge_ajax.pl | 1 - > cataloguing/value_builder/barcode.pl | 1 - > cataloguing/value_builder/barcode_manual.pl | 1 - > cataloguing/value_builder/marc21_field_006.pl | 1 - > cataloguing/value_builder/marc21_field_007.pl | 1 - > cataloguing/value_builder/marc21_field_008.pl | 1 - > cataloguing/value_builder/marc21_field_008_authorities.pl | 1 - > .../value_builder/marc21_field_008_classifications.pl | 2 -- > cataloguing/value_builder/marc21_field_245h.pl | 1 - > cataloguing/value_builder/marc21_field_260b.pl | 1 - > cataloguing/value_builder/marc21_leader_authorities.pl | 1 - > cataloguing/value_builder/unimarc_field_105.pl | 1 - > cataloguing/value_builder/unimarc_field_106.pl | 1 - > cataloguing/value_builder/unimarc_field_110.pl | 1 - > cataloguing/value_builder/unimarc_field_115a.pl | 1 - > cataloguing/value_builder/unimarc_field_115b.pl | 1 - > cataloguing/value_builder/unimarc_field_116.pl | 1 - > cataloguing/value_builder/unimarc_field_117.pl | 1 - > cataloguing/value_builder/unimarc_field_120.pl | 1 - > cataloguing/value_builder/unimarc_field_121a.pl | 1 - > cataloguing/value_builder/unimarc_field_121b.pl | 1 - > cataloguing/value_builder/unimarc_field_122.pl | 1 - > cataloguing/value_builder/unimarc_field_123a.pl | 1 - > cataloguing/value_builder/unimarc_field_123d.pl | 1 - > cataloguing/value_builder/unimarc_field_123e.pl | 1 - > cataloguing/value_builder/unimarc_field_123f.pl | 1 - > cataloguing/value_builder/unimarc_field_123g.pl | 1 - > cataloguing/value_builder/unimarc_field_123i.pl | 1 - > cataloguing/value_builder/unimarc_field_123j.pl | 1 - > cataloguing/value_builder/unimarc_field_124.pl | 1 - > cataloguing/value_builder/unimarc_field_124a.pl | 1 - > cataloguing/value_builder/unimarc_field_124b.pl | 1 - > cataloguing/value_builder/unimarc_field_124c.pl | 1 - > cataloguing/value_builder/unimarc_field_124d.pl | 1 - > cataloguing/value_builder/unimarc_field_124e.pl | 1 - > cataloguing/value_builder/unimarc_field_124f.pl | 1 - > cataloguing/value_builder/unimarc_field_124g.pl | 1 - > cataloguing/value_builder/unimarc_field_125.pl | 1 - > cataloguing/value_builder/unimarc_field_125a.pl | 1 - > cataloguing/value_builder/unimarc_field_125b.pl | 1 - > cataloguing/value_builder/unimarc_field_126.pl | 1 - > cataloguing/value_builder/unimarc_field_126a.pl | 1 - > cataloguing/value_builder/unimarc_field_126b.pl | 1 - > cataloguing/value_builder/unimarc_field_127.pl | 1 - > cataloguing/value_builder/unimarc_field_128a.pl | 1 - > cataloguing/value_builder/unimarc_field_128b.pl | 1 - > cataloguing/value_builder/unimarc_field_128c.pl | 1 - > cataloguing/value_builder/unimarc_field_130.pl | 1 - > cataloguing/value_builder/unimarc_field_135a.pl | 1 - > cataloguing/value_builder/unimarc_field_140.pl | 1 - > cataloguing/value_builder/unimarc_field_141.pl | 1 - > cataloguing/value_builder/unimarc_field_210c.pl | 1 - > cataloguing/value_builder/unimarc_field_225a_bis.pl | 1 - > cataloguing/value_builder/unimarc_field_686a.pl | 1 - > cataloguing/value_builder/unimarc_field_700-4.pl | 1 - > cataloguing/value_builder/unimarc_leader.pl | 1 - > cataloguing/value_builder/unimarc_leader_authorities.pl | 1 - > cataloguing/z3950_search.pl | 1 - > changelanguage.pl | 1 - > circ/add_message.pl | 1 - > circ/article-request-slip.pl | 2 -- > circ/branchtransfers.pl | 2 -- > circ/checkout-notes.pl | 1 - > circ/circulation.pl | 3 --- > circ/del_message.pl | 1 - > circ/hold-transfer-slip.pl | 1 - > circ/pendingreserves.pl | 1 - > circ/returns.pl | 3 --- > circ/transferstoreceive.pl | 3 --- > course_reserves/mod_course.pl | 2 -- > docs/CAS/CASProxy/examples/koha_webservice.pl | 3 --- > docs/CAS/CASProxy/examples/proxy_cas.pl | 3 --- > docs/CAS/CASProxy/examples/proxy_cas_callback.pl | 1 - > help.pl | 1 - > installer/data/mysql/backfill_statistics.pl | 1 - > installer/data/mysql/db_revs/211200022.pl | 1 - > installer/install.pl | 1 - > labels/barcode-print.pl | 1 - > labels/label-create-csv.pl | 1 - > labels/label-create-pdf.pl | 2 -- > labels/label-create-xml.pl | 1 - > labels/label-edit-batch.pl | 1 - > labels/label-edit-layout.pl | 1 - > labels/label-edit-profile.pl | 1 - > labels/label-edit-template.pl | 1 - > labels/label-manage.pl | 1 - > labels/label-print.pl | 1 - > labels/spinelabel-home.pl | 1 - > mainpage.pl | 1 - > members/accountline-details.pl | 1 - > members/boraccount.pl | 2 -- > members/default_messageprefs.pl | 2 -- > members/discharge.pl | 3 --- > members/files.pl | 1 - > members/housebound.pl | 1 - > members/mancredit.pl | 2 -- > members/maninvoice.pl | 2 -- > members/member-password.pl | 1 - > members/memberentry.pl | 1 - > members/members-home.pl | 1 - > members/members-update-do.pl | 2 -- > members/members-update.pl | 1 - > members/merge-patrons.pl | 1 - > members/moremember.pl | 1 - > members/notices.pl | 2 -- > members/pay.pl | 5 ----- > members/paycollect.pl | 2 -- > members/printfeercpt.pl | 1 - > members/printinvoice.pl | 1 - > members/purchase-suggestions.pl | 1 - > members/readingrec.pl | 1 - > members/routing-lists.pl | 2 -- > members/setstatus.pl | 1 - > members/statistics.pl | 2 -- > members/summary-print.pl | 2 -- > members/update-child.pl | 1 - > misc/add_date_fields_to_marc_records.pl | 1 - > misc/batchRebuildBiblioTables.pl | 1 - > misc/cronjobs/advance_notices.pl | 3 --- > misc/cronjobs/automatic_checkin.pl | 2 +- > misc/cronjobs/automatic_item_modification_by_age.pl | 1 - > misc/cronjobs/automatic_renewals.pl | 1 - > misc/cronjobs/batch_anonymise.pl | 1 - > misc/cronjobs/build_browser_and_cloud.pl | 2 -- > misc/cronjobs/cleanup_database.pl | 2 -- > misc/cronjobs/cloud-kw.pl | 2 -- > misc/cronjobs/create_koc_db.pl | 1 - > misc/cronjobs/gather_print_notices.pl | 1 - > misc/cronjobs/holds/build_holds_queue.pl | 1 - > misc/cronjobs/holds/cancel_expired_holds.pl | 1 - > misc/cronjobs/holds/cancel_unfilled_holds.pl | 1 - > misc/cronjobs/holds/holds_reminder.pl | 1 - > misc/cronjobs/membership_expiry.pl | 1 - > misc/cronjobs/notice_unprocessed_suggestions.pl | 2 -- > misc/cronjobs/overdue_notices.pl | 2 -- > misc/cronjobs/process_message_queue.pl | 1 - > misc/cronjobs/purge_suggestions.pl | 1 - > misc/cronjobs/recalls/expire_recalls.pl | 1 - > misc/cronjobs/recalls/overdue_recalls.pl | 1 - > misc/cronjobs/serialsUpdate.pl | 1 - > misc/cronjobs/share_usage_with_koha_community.pl | 1 - > misc/cronjobs/social_data/get_report_social_data.pl | 1 - > misc/cronjobs/social_data/update_social_data.pl | 1 - > misc/cronjobs/staticfines.pl | 1 - > misc/cronjobs/thirdparty/TalkingTech_itiva_outbound.pl | 2 -- > misc/cronjobs/update_patrons_category.pl | 1 - > misc/devel/coverage.pl | 2 +- > misc/export_records.pl | 2 -- > misc/exportauth.pl | 1 - > misc/load_testing/benchmark_webservices.pl | 2 -- > misc/load_yaml.pl | 1 - > misc/maintenance/borrowers-force-messaging-defaults.pl | 1 - > misc/maintenance/check_syspref_cache.pl | 1 - > misc/maintenance/fix_tags_weight.pl | 1 - > misc/maintenance/sanitize_records.pl | 2 -- > misc/maintenance/touch_all_biblios.pl | 1 - > misc/maintenance/touch_all_items.pl | 1 - > misc/migration_tools/22_to_30/export_Authorities.pl | 1 - > misc/migration_tools/22_to_30/export_Authorities_xml.pl | 1 - > misc/migration_tools/22_to_30/move_marc_to_authheader.pl | 2 -- > misc/migration_tools/buildCOUNTRY.pl | 1 - > misc/migration_tools/buildEDITORS.pl | 1 - > misc/migration_tools/buildLANG.pl | 1 - > misc/migration_tools/bulkmarcimport.pl | 2 -- > misc/migration_tools/import_lexile.pl | 1 - > misc/sip_cli_emulator.pl | 1 - > misc/translator/LangInstaller.pm | 1 - > misc/translator/TmplTokenizer.pm | 1 - > offline_circ/download.pl | 2 -- > offline_circ/enqueue_koc.pl | 3 --- > offline_circ/list.pl | 2 -- > offline_circ/process_koc.pl | 3 --- > opac/ilsdi.pl | 2 -- > opac/maintenance.pl | 1 - > opac/opac-ISBDdetail.pl | 1 - > opac/opac-MARCdetail.pl | 2 -- > opac/opac-account-pay.pl | 2 -- > opac/opac-account.pl | 1 - > opac/opac-article-request-cancel.pl | 1 - > opac/opac-authorities-home.pl | 2 -- > opac/opac-authoritiesdetail.pl | 1 - > opac/opac-basket.pl | 1 - > opac/opac-changelanguage.pl | 1 - > opac/opac-curbside-pickups.pl | 1 - > opac/opac-detail.pl | 1 - > opac/opac-downloadcart.pl | 1 - > opac/opac-downloadshelf.pl | 1 - > opac/opac-export.pl | 4 ---- > opac/opac-idref.pl | 1 - > opac/opac-illrequests.pl | 1 - > opac/opac-issue-note.pl | 2 -- > opac/opac-main.pl | 1 - > opac/opac-memberentry.pl | 1 - > opac/opac-messaging.pl | 2 -- > opac/opac-modrequest-suspend.pl | 1 - > opac/opac-modrequest.pl | 1 - > opac/opac-mymessages.pl | 2 -- > opac/opac-passwd.pl | 1 - > opac/opac-patron-image.pl | 1 - > opac/opac-readingrecord.pl | 1 - > opac/opac-registration-verify.pl | 2 -- > opac/opac-renew.pl | 2 -- > opac/opac-reportproblem.pl | 1 - > opac/opac-reserve.pl | 2 -- > opac/opac-reset-password.pl | 1 - > opac/opac-retrieve-file.pl | 1 - > opac/opac-routing-lists.pl | 1 - > opac/opac-search-history.pl | 1 - > opac/opac-search.pl | 3 --- > opac/opac-sendbasket.pl | 1 - > opac/opac-shareshelf.pl | 1 - > opac/opac-shelves.pl | 1 - > opac/opac-showmarc.pl | 3 --- > opac/opac-suggestions.pl | 2 -- > opac/opac-tags.pl | 1 - > opac/opac-topissues.pl | 1 - > opac/opac-user.pl | 1 - > opac/sco/help.pl | 1 - > opac/sco/sco-main.pl | 2 -- > opac/sco/sco-patron-image.pl | 1 - > opac/tracklinks.pl | 1 - > patron_lists/delete.pl | 1 - > patroncards/create-pdf.pl | 2 -- > patroncards/edit-batch.pl | 1 - > patroncards/edit-layout.pl | 1 - > patroncards/edit-template.pl | 1 - > patroncards/manage.pl | 1 - > plugins/plugins-uninstall.pl | 2 -- > plugins/plugins-upload.pl | 1 - > recalls/recall_pickup_slip.pl | 1 - > recalls/request.pl | 1 - > reports/acquisitions_stats.pl | 1 - > reports/catalogue_out.pl | 1 - > reports/guided_reports.pl | 1 - > reports/reserves_stats.pl | 1 - > reserve/modrequest.pl | 1 - > reserve/modrequest_suspendall.pl | 1 - > rotating_collections/addItems.pl | 2 -- > rotating_collections/editCollections.pl | 2 -- > rotating_collections/rotatingCollections.pl | 2 -- > rotating_collections/transferCollection.pl | 2 -- > serials/lateissues-export.pl | 3 --- > serials/reorder_members.pl | 1 - > serials/routing-preview.pl | 1 - > serials/routing.pl | 1 - > serials/serials-home.pl | 1 - > serials/showpredictionpattern.pl | 1 - > serials/subscription-add.pl | 2 -- > serials/subscription-frequencies.pl | 1 - > serials/subscription-frequency.pl | 1 - > serials/subscription-renew.pl | 1 - > serials/viewalerts.pl | 1 - > suggestion/suggestion.pl | 2 -- > svc/bib | 1 - > svc/bib_framework | 2 -- > svc/bib_profile | 1 - > svc/cataloguing/automatic_linker.pl | 1 - > t/lib/Mocks/Zebra.pm | 1 - > tools/additional-contents.pl | 1 - > tools/automatic_item_modification_by_age.pl | 1 - > tools/background-job-progress.pl | 1 - > tools/batch_delete_records.pl | 2 -- > tools/batch_records_ajax.pl | 1 - > tools/copy-holidays.pl | 1 - > tools/csv-profiles.pl | 1 - > tools/exceptionHolidays.pl | 1 - > tools/import_borrowers.pl | 1 - > tools/manage-marc-import.pl | 2 -- > tools/modborrowers.pl | 1 - > tools/newHolidays.pl | 1 - > tools/overduerules.pl | 2 -- > tools/picture-upload.pl | 1 - > tools/problem-reports.pl | 1 - > tools/quotes-upload.pl | 1 - > tools/quotes.pl | 1 - > tools/showdiffmarc.pl | 1 - > tools/upload-file.pl | 1 - > virtualshelves/downloadshelf.pl | 1 - > virtualshelves/shelves.pl | 1 - > 459 files changed, 7 insertions(+), 600 deletions(-) > >diff --git a/C4/Accounts.pm b/C4/Accounts.pm >index e5b7c441d8a..4a41224b16d 100644 >--- a/C4/Accounts.pm >+++ b/C4/Accounts.pm >@@ -20,8 +20,6 @@ package C4::Accounts; > > use Modern::Perl; > use C4::Context; >-use C4::Stats; >-use C4::Members; > use Koha::Account; > use Koha::Account::Lines; > use Koha::Account::Offsets; >@@ -183,4 +181,3 @@ __END__ > DBI(3) > > =cut >- >diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm >index bf8a2155733..8d048c7a3c1 100644 >--- a/C4/Acquisition.pm >+++ b/C4/Acquisition.pm >@@ -39,7 +39,6 @@ use Koha::Libraries; > use Koha::CsvProfiles; > use Koha::Patrons; > >-use C4::Koha; > > use MARC::Field; > use JSON qw( to_json ); >diff --git a/C4/Auth.pm b/C4/Auth.pm >index 0e9e1d23a5e..fa0def774af 100644 >--- a/C4/Auth.pm >+++ b/C4/Auth.pm >@@ -29,8 +29,6 @@ use URI::QueryParam; > > use C4::Context; > use C4::Templates; # to get the template >-use C4::Languages; >-use C4::Search::History; > use Koha; > use Koha::Logger; > use Koha::Caches; >diff --git a/C4/Auth_with_ldap.pm b/C4/Auth_with_ldap.pm >index 7f6c99a9a46..d1825b2e485 100644 >--- a/C4/Auth_with_ldap.pm >+++ b/C4/Auth_with_ldap.pm >@@ -21,7 +21,6 @@ use Modern::Perl; > use Carp qw( croak ); > > use C4::Context; >-use C4::Members::Messaging; > use C4::Auth qw( checkpw_internal ); > use Koha::Patrons; > use Koha::AuthUtils qw( hash_password ); >diff --git a/C4/Auth_with_shibboleth.pm b/C4/Auth_with_shibboleth.pm >index e214a5307ce..d345be19445 100644 >--- a/C4/Auth_with_shibboleth.pm >+++ b/C4/Auth_with_shibboleth.pm >@@ -23,7 +23,6 @@ use C4::Context; > use Koha::AuthUtils qw( get_script_name ); > use Koha::Database; > use Koha::Patrons; >-use C4::Members::Messaging; > use Carp qw( carp ); > use List::MoreUtils qw( any ); > >diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm >index e211af2b949..9fabbeb13d8 100644 >--- a/C4/AuthoritiesMarc.pm >+++ b/C4/AuthoritiesMarc.pm >@@ -25,8 +25,6 @@ use MARC::Field; > use C4::Context; > use C4::Biblio qw( GetFrameworkCode ModBiblio ); > use C4::Search qw( FindDuplicate new_record_from_zebra ); >-use C4::AuthoritiesMarc::MARC21; >-use C4::AuthoritiesMarc::UNIMARC; > use C4::Charset qw( SetUTF8Flag ); > use C4::Log qw( logaction ); > use Koha::MetadataRecord::Authority; >@@ -1647,4 +1645,3 @@ Paul POULAIN paul.poulain@free.fr > Ere Maijala ere.maijala@helsinki.fi > > =cut >- >diff --git a/C4/BackgroundJob.pm b/C4/BackgroundJob.pm >index 733f72e11b1..5a1eecb629a 100644 >--- a/C4/BackgroundJob.pm >+++ b/C4/BackgroundJob.pm >@@ -19,7 +19,6 @@ package C4::BackgroundJob; > # along with Koha; if not, see <http://www.gnu.org/licenses>. > > use Modern::Perl; >-use C4::Context; > use C4::Auth qw( get_session ); > use Digest::MD5; > >diff --git a/C4/Barcodes.pm b/C4/Barcodes.pm >index 957d60f2835..78f9c808674 100644 >--- a/C4/Barcodes.pm >+++ b/C4/Barcodes.pm >@@ -257,4 +257,3 @@ like the IBM "Boulder" format can cause problems for sprintf. Basically, the va > (64-bit integers). So we have to use floats or increment a piece of it and return the rejoined fragments. > > =cut >- >diff --git a/C4/Barcodes/EAN13.pm b/C4/Barcodes/EAN13.pm >index 7927d195369..e6468186a08 100644 >--- a/C4/Barcodes/EAN13.pm >+++ b/C4/Barcodes/EAN13.pm >@@ -20,7 +20,6 @@ package C4::Barcodes::EAN13; > use strict; > use warnings; > >-use C4::Context; > > use Algorithm::CheckDigits qw( CheckDigits ); > use Carp qw( carp ); >diff --git a/C4/Barcodes/annual.pm b/C4/Barcodes/annual.pm >index 0d7e05ae00a..17e46223d9d 100644 >--- a/C4/Barcodes/annual.pm >+++ b/C4/Barcodes/annual.pm >@@ -90,4 +90,3 @@ sub new_object { > > 1; > __END__ >- >diff --git a/C4/Barcodes/incremental.pm b/C4/Barcodes/incremental.pm >index a2bf6e462e6..dd5e950bd3c 100644 >--- a/C4/Barcodes/incremental.pm >+++ b/C4/Barcodes/incremental.pm >@@ -35,4 +35,3 @@ Since incremental is the default in C4::Barcodes, we do not override anything he > In fact, this file is more of a place holder. > > =cut >- >diff --git a/C4/Biblio.pm b/C4/Biblio.pm >index e2df6019959..f30f944bbd5 100644 >--- a/C4/Biblio.pm >+++ b/C4/Biblio.pm >@@ -86,17 +86,13 @@ use MARC::File::XML; > use POSIX qw( strftime ); > use Module::Load::Conditional qw( can_load ); > >-use C4::Koha; > use C4::Log qw( logaction ); # logaction >-use C4::Budgets; > use C4::ClassSource qw( GetClassSort GetClassSource ); > use C4::Charset qw( > nsb_clean > SetMarcUnicodeFlag > SetUTF8Flag > ); >-use C4::Linker; >-use C4::OAI::Sets; > use C4::Items qw( GetMarcItem ); > > use Koha::Logger; >diff --git a/C4/Breeding.pm b/C4/Breeding.pm >index 7b3dbc58746..b2e2f6c7c98 100644 >--- a/C4/Breeding.pm >+++ b/C4/Breeding.pm >@@ -28,7 +28,6 @@ use MARC::File::USMARC; > use MARC::Field; > use C4::ImportBatch qw( GetZ3950BatchId AddBiblioToBatch AddAuthToBatch ); > use C4::AuthoritiesMarc qw( GuessAuthTypeCode ); >-use C4::Languages; > use Koha::Database; > use Koha::XSLT::Base; > >@@ -640,4 +639,3 @@ sub Z3950SearchAuth { > > 1; > __END__ >- >diff --git a/C4/Budgets.pm b/C4/Budgets.pm >index 9624650be14..212f20e75a1 100644 >--- a/C4/Budgets.pm >+++ b/C4/Budgets.pm >@@ -23,7 +23,6 @@ use C4::Context; > use Koha::Database; > use Koha::Patrons; > use Koha::Acquisition::Invoice::Adjustments; >-use C4::Acquisition; > use C4::Log qw(logaction); > > our (@ISA, @EXPORT_OK); >diff --git a/C4/Calendar.pm b/C4/Calendar.pm >index 257119c8e32..a60bb753d22 100644 >--- a/C4/Calendar.pm >+++ b/C4/Calendar.pm >@@ -733,4 +733,3 @@ __END__ > Koha Physics Library UNLP <matias_veleda@hotmail.com> > > =cut >- >diff --git a/C4/Circulation.pm b/C4/Circulation.pm >index 9cb56f79d32..fb1859726ed 100644 >--- a/C4/Circulation.pm >+++ b/C4/Circulation.pm >@@ -30,11 +30,8 @@ use C4::Stats qw( UpdateStats ); > use C4::Reserves qw( CheckReserves CanItemBeReserved MoveReserve ModReserve ModReserveMinusPriority RevertWaitingStatus IsItemOnHoldAndFound IsAvailableForItemLevelRequest ItemsAnyAvailableAndNotRestricted ); > use C4::Biblio qw( UpdateTotalIssues ); > use C4::Items qw( ModItemTransfer ModDateLastSeen CartToShelf ); >-use C4::Accounts; >-use C4::ItemCirculationAlertPreference; > use C4::Message; > use C4::Log qw( logaction ); # logaction >-use C4::Overdues; > use C4::RotatingCollections qw(GetCollectionItemBranches); > use Algorithm::CheckDigits qw( CheckDigits ); > >diff --git a/C4/ClassSortRoutine.pm b/C4/ClassSortRoutine.pm >index dc530790b29..c105d3f9a1c 100644 >--- a/C4/ClassSortRoutine.pm >+++ b/C4/ClassSortRoutine.pm >@@ -124,4 +124,3 @@ sub _get_class_sort_key { > Koha Development Team <http://koha-community.org/> > > =cut >- >diff --git a/C4/ClassSortRoutine/Dewey.pm b/C4/ClassSortRoutine/Dewey.pm >index eedf4ed768b..30d715b6f1f 100644 >--- a/C4/ClassSortRoutine/Dewey.pm >+++ b/C4/ClassSortRoutine/Dewey.pm >@@ -100,4 +100,3 @@ sub get_class_sort_key { > Koha Development Team <http://koha-community.org/> > > =cut >- >diff --git a/C4/ClassSortRoutine/Generic.pm b/C4/ClassSortRoutine/Generic.pm >index 665dd53ca63..d8208fca7c5 100644 >--- a/C4/ClassSortRoutine/Generic.pm >+++ b/C4/ClassSortRoutine/Generic.pm >@@ -68,4 +68,3 @@ sub get_class_sort_key { > Koha Development Team <http://koha-community.org/> > > =cut >- >diff --git a/C4/ClassSortRoutine/LCC.pm b/C4/ClassSortRoutine/LCC.pm >index b943fb683e2..f81004b8c0e 100644 >--- a/C4/ClassSortRoutine/LCC.pm >+++ b/C4/ClassSortRoutine/LCC.pm >@@ -64,4 +64,3 @@ sub get_class_sort_key { > Koha Development Team <http://koha-community.org/> > > =cut >- >diff --git a/C4/ClassSplitRoutine/Dewey.pm b/C4/ClassSplitRoutine/Dewey.pm >index de97e486b15..1a97e2f43de 100644 >--- a/C4/ClassSplitRoutine/Dewey.pm >+++ b/C4/ClassSplitRoutine/Dewey.pm >@@ -25,7 +25,6 @@ C4::ClassSplitRoutine::Dewey - Dewey call number split method > > =head1 SYNOPSIS > >-use C4::ClassSplitRoutine; > > my $cn_split = C4::ClassSplitRoutine::Dewey::split_callnumber($cn_item); > >diff --git a/C4/ClassSplitRoutine/Generic.pm b/C4/ClassSplitRoutine/Generic.pm >index 48aa85a4191..ea2f59050d2 100644 >--- a/C4/ClassSplitRoutine/Generic.pm >+++ b/C4/ClassSplitRoutine/Generic.pm >@@ -25,7 +25,6 @@ C4::ClassSplitRoutine::Generic - generic call number sorting key routine > > =head1 SYNOPSIS > >-use C4::ClassSplitRoutine; > > =head1 FUNCTIONS > >diff --git a/C4/ClassSplitRoutine/LCC.pm b/C4/ClassSplitRoutine/LCC.pm >index 98bcab79e5a..0d374a1e873 100644 >--- a/C4/ClassSplitRoutine/LCC.pm >+++ b/C4/ClassSplitRoutine/LCC.pm >@@ -28,7 +28,6 @@ C4::ClassSplitRoutine::LCC - LCC call number split method > > =head1 SYNOPSIS > >-use C4::ClassSplitRoutine; > > my $cn_split = C4::ClassSplitRoutine::LCC::split_callnumber($cn_item); > >diff --git a/C4/ClassSplitRoutine/RegEx.pm b/C4/ClassSplitRoutine/RegEx.pm >index d6e669999ac..14d0a52215d 100644 >--- a/C4/ClassSplitRoutine/RegEx.pm >+++ b/C4/ClassSplitRoutine/RegEx.pm >@@ -25,7 +25,6 @@ C4::ClassSplitRoutine::RegEx - regex call number sorting key routine > > =head1 SYNOPSIS > >-use C4::ClassSplitRoutine; > > my $cn_sort = C4::ClassSplitRoutine::RegEx::split_callnumber($cn_item, $regexs); > >diff --git a/C4/Context.pm b/C4/Context.pm >index 8cb9bdefe7b..f58f2485532 100644 >--- a/C4/Context.pm >+++ b/C4/Context.pm >@@ -1025,4 +1025,3 @@ Specifies the configuration file to read. > Andrew Arensburger <arensb at ooblick dot com> > > Joshua Ferraro <jmf at liblime dot com> >- >diff --git a/C4/Contract.pm b/C4/Contract.pm >index 2630af403e8..5812e690465 100644 >--- a/C4/Contract.pm >+++ b/C4/Contract.pm >@@ -18,7 +18,6 @@ package C4::Contract; > # along with Koha; if not, see <http://www.gnu.org/licenses>. > > use Modern::Perl; >-use C4::Context; > use Koha::Database; > > use vars qw(@ISA @EXPORT); >diff --git a/C4/Creators/Batch.pm b/C4/Creators/Batch.pm >index e81f6d60207..e35e2dedfdc 100644 >--- a/C4/Creators/Batch.pm >+++ b/C4/Creators/Batch.pm >@@ -325,4 +325,3 @@ Koha is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY > A PARTICULAR PURPOSE. See the GNU General Public License for more details. > > =cut >- >diff --git a/C4/Form/MessagingPreferences.pm b/C4/Form/MessagingPreferences.pm >index dbac3aceb21..c6e3a5d16f3 100644 >--- a/C4/Form/MessagingPreferences.pm >+++ b/C4/Form/MessagingPreferences.pm >@@ -21,8 +21,6 @@ use strict; > use warnings; > > use CGI qw ( -utf8 ); >-use C4::Context; >-use C4::Members::Messaging; > > use constant MAX_DAYS_IN_ADVANCE => 30; > >diff --git a/C4/ILSDI/Services.pm b/C4/ILSDI/Services.pm >index 1c5b35c1aca..4ac286e455d 100644 >--- a/C4/ILSDI/Services.pm >+++ b/C4/ILSDI/Services.pm >@@ -20,16 +20,11 @@ package C4::ILSDI::Services; > use strict; > use warnings; > >-use C4::Members; > use C4::Items qw( get_hostitemnumbers_of ); > use C4::Circulation qw( CanBookBeRenewed barcodedecode CanBookBeIssued AddRenewal ); >-use C4::Accounts; > use C4::Reserves qw( CanBookBeReserved IsAvailableForItemLevelRequest CalculatePriority AddReserve CanItemBeReserved CanReserveBeCanceledFromOpac ); >-use C4::Context; >-use C4::Auth; > use CGI qw ( -utf8 ); > use DateTime; >-use C4::Auth; > use Koha::DateUtils qw( dt_from_string ); > use C4::AuthoritiesMarc qw( GetAuthorityXML ); > >diff --git a/C4/ImportExportFramework.pm b/C4/ImportExportFramework.pm >index 3d44d46ec39..1bc287c82f2 100644 >--- a/C4/ImportExportFramework.pm >+++ b/C4/ImportExportFramework.pm >@@ -1205,5 +1205,3 @@ __END__ > Koha Development Team <http://koha-community.org/> > > =cut >- >- >diff --git a/C4/Items.pm b/C4/Items.pm >index 443242be5d9..ca8180591b8 100644 >--- a/C4/Items.pm >+++ b/C4/Items.pm >@@ -49,7 +49,6 @@ BEGIN { > > use Carp qw( croak ); > use C4::Context; >-use C4::Koha; > use C4::Biblio qw( GetMarcStructure TransformMarcToKoha ); > use Koha::DateUtils qw( dt_from_string output_pref ); > use MARC::Record; >diff --git a/C4/Labels/Label.pm b/C4/Labels/Label.pm >index eadf9cce0ab..fcba42db179 100644 >--- a/C4/Labels/Label.pm >+++ b/C4/Labels/Label.pm >@@ -14,10 +14,6 @@ use Koha::Biblios; > use Koha::ClassSources; > use Koha::ClassSortRules; > use Koha::ClassSplitRules; >-use C4::ClassSplitRoutine::Dewey; >-use C4::ClassSplitRoutine::LCC; >-use C4::ClassSplitRoutine::Generic; >-use C4::ClassSplitRoutine::RegEx; > > sub _check_params { > my $given_params = {}; >diff --git a/C4/Letters.pm b/C4/Letters.pm >index d2f0b469ca0..9145023da53 100644 >--- a/C4/Letters.pm >+++ b/C4/Letters.pm >@@ -25,10 +25,8 @@ use Module::Load::Conditional qw( can_load ); > > use Try::Tiny qw( catch try ); > >-use C4::Members; > use C4::Log qw( logaction ); > use C4::SMS; >-use C4::Templates; > use Koha::DateUtils qw( dt_from_string output_pref ); > use Koha::SMS::Providers; > >diff --git a/C4/Linker/FirstMatch.pm b/C4/Linker/FirstMatch.pm >index 873395a3628..52c7710e3de 100644 >--- a/C4/Linker/FirstMatch.pm >+++ b/C4/Linker/FirstMatch.pm >@@ -19,7 +19,6 @@ package C4::Linker::FirstMatch; > > use strict; > use warnings; >-use C4::Heading; > use C4::Linker::Default; # Use Default for flipping > > use base qw(C4::Linker); >diff --git a/C4/Linker/LastMatch.pm b/C4/Linker/LastMatch.pm >index 1f873d8c5b4..b223165629f 100644 >--- a/C4/Linker/LastMatch.pm >+++ b/C4/Linker/LastMatch.pm >@@ -19,7 +19,6 @@ package C4::Linker::LastMatch; > > use strict; > use warnings; >-use C4::Heading; > use C4::Linker::Default; # Use Default for flipping > > use base qw(C4::Linker); >diff --git a/C4/Members.pm b/C4/Members.pm >index 5478e0de328..10a0c4e4586 100644 >--- a/C4/Members.pm >+++ b/C4/Members.pm >@@ -25,8 +25,6 @@ use C4::Context; > use Scalar::Util qw( looks_like_number ); > use Date::Calc qw( check_date Date_to_Days ); > use C4::Overdues qw( checkoverdues ); >-use C4::Reserves; >-use C4::Accounts; > use C4::Letters qw( GetPreparedLetter ); > use DateTime; > use Koha::Database; >diff --git a/C4/Output.pm b/C4/Output.pm >index 42c4011ca03..1699af9bac9 100644 >--- a/C4/Output.pm >+++ b/C4/Output.pm >@@ -33,7 +33,6 @@ use URI::Escape; > > use C4::Auth qw( get_template_and_user ); > use C4::Context; >-use C4::Templates; > > our (@ISA, @EXPORT_OK); > >diff --git a/C4/Overdues.pm b/C4/Overdues.pm >index 1894731c067..7191941137b 100644 >--- a/C4/Overdues.pm >+++ b/C4/Overdues.pm >@@ -27,7 +27,6 @@ use POSIX qw( ceil floor ); > use Locale::Currency::Format 1.28 qw( currency_format FMT_SYMBOL ); > use Carp qw( carp ); > >-use C4::Accounts; > use C4::Context; > use Koha::Account::Lines; > use Koha::Account::Offsets; >diff --git a/C4/Record.pm b/C4/Record.pm >index 69a60f3520f..2cb5aed917d 100644 >--- a/C4/Record.pm >+++ b/C4/Record.pm >@@ -28,7 +28,6 @@ use Biblio::EndnoteStyle; > use Unicode::Normalize qw( NFC ); # _entity_encode > use C4::Biblio qw( GetFrameworkCode ); > use C4::Koha; #marc2csv >-use C4::XSLT; > use YAML::XS; #marcrecords2csv > use Encode; > use Template; >diff --git a/C4/Reports/Guided.pm b/C4/Reports/Guided.pm >index 2d29b2138e7..2b3b6debde0 100644 >--- a/C4/Reports/Guided.pm >+++ b/C4/Reports/Guided.pm >@@ -28,7 +28,6 @@ use C4::Koha qw( GetAuthorisedValues ); > use Koha::DateUtils qw( dt_from_string output_pref ); > use Koha::Patrons; > use Koha::Reports; >-use C4::Output; > use C4::Log qw( logaction ); > use Koha::Notice::Templates; > >diff --git a/C4/Reserves.pm b/C4/Reserves.pm >index d5e01f283dc..9e499279609 100644 >--- a/C4/Reserves.pm >+++ b/C4/Reserves.pm >@@ -23,15 +23,11 @@ package C4::Reserves; > > use Modern::Perl; > >-use C4::Accounts; > use C4::Biblio qw( GetMarcFromKohaField ); > use C4::Circulation qw( CheckIfIssuedToPatron GetAgeRestriction GetBranchItemRule ); > use C4::Context; > use C4::Items qw( CartToShelf get_hostitemnumbers_of ); >-use C4::Letters; > use C4::Log qw( logaction ); >-use C4::Members::Messaging; >-use C4::Members; > use Koha::Account::Lines; > use Koha::BackgroundJob::BatchUpdateBiblioHoldsQueue; > use Koha::Biblios; >diff --git a/C4/SIP/ILS.pm b/C4/SIP/ILS.pm >index e6c75671be8..aadfc0d46eb 100644 >--- a/C4/SIP/ILS.pm >+++ b/C4/SIP/ILS.pm >@@ -11,7 +11,6 @@ use Data::Dumper; > > use C4::SIP::ILS::Item; > use C4::SIP::ILS::Patron; >-use C4::SIP::ILS::Transaction; > use C4::SIP::ILS::Transaction::Checkout; > use C4::SIP::ILS::Transaction::Checkin; > use C4::SIP::ILS::Transaction::FeePayment; >@@ -515,4 +514,3 @@ sub renew_all { > > 1; > __END__ >- >diff --git a/C4/SIP/ILS/Item.pm b/C4/SIP/ILS/Item.pm >index 105b8d01003..d4b691d161a 100644 >--- a/C4/SIP/ILS/Item.pm >+++ b/C4/SIP/ILS/Item.pm >@@ -16,11 +16,7 @@ use Template; > use C4::SIP::ILS::Transaction; > use C4::SIP::Sip qw(add_field); > >-use C4::Biblio; > use C4::Circulation qw( barcodedecode ); >-use C4::Context; >-use C4::Items; >-use C4::Members; > use Koha::Biblios; > use Koha::Checkouts::ReturnClaims; > use Koha::Checkouts; >@@ -434,4 +430,3 @@ sub build_additional_item_fields_string { > > 1; > __END__ >- >diff --git a/C4/SIP/ILS/Patron.pm b/C4/SIP/ILS/Patron.pm >index de2b1ddadea..ba29f816da4 100644 >--- a/C4/SIP/ILS/Patron.pm >+++ b/C4/SIP/ILS/Patron.pm >@@ -18,9 +18,7 @@ use Data::Dumper; > use C4::SIP::Sip qw(add_field maybe_add); > > use C4::Context; >-use C4::Koha; > use C4::Members; >-use C4::Reserves; > use C4::Auth qw(checkpw); > > use Koha::Items; >@@ -742,4 +740,3 @@ __END__ > {itemlist} ref-to-array: list of available items > > =cut >- >diff --git a/C4/SIP/ILS/Transaction.pm b/C4/SIP/ILS/Transaction.pm >index fade710a040..2ad97ad82ac 100644 >--- a/C4/SIP/ILS/Transaction.pm >+++ b/C4/SIP/ILS/Transaction.pm >@@ -7,7 +7,6 @@ package C4::SIP::ILS::Transaction; > use Carp; > use strict; > use warnings; >-use C4::Context; > use Koha::DateUtils qw( dt_from_string ); > use Koha::Checkouts; > >@@ -79,4 +78,3 @@ sub AUTOLOAD { > > 1; > __END__ >- >diff --git a/C4/SIP/ILS/Transaction/Checkout.pm b/C4/SIP/ILS/Transaction/Checkout.pm >index b9fa51979e9..946b9fd5fdb 100644 >--- a/C4/SIP/ILS/Transaction/Checkout.pm >+++ b/C4/SIP/ILS/Transaction/Checkout.pm >@@ -16,7 +16,6 @@ use C4::SIP::ILS::Transaction; > > use C4::Context; > use C4::Circulation qw( AddIssue GetIssuingCharges CanBookBeIssued ); >-use C4::Members; > use Koha::DateUtils; > > use parent qw(C4::SIP::ILS::Transaction); >diff --git a/C4/SIP/ILS/Transaction/FeePayment.pm b/C4/SIP/ILS/Transaction/FeePayment.pm >index 80d9698694d..115f6396dc7 100644 >--- a/C4/SIP/ILS/Transaction/FeePayment.pm >+++ b/C4/SIP/ILS/Transaction/FeePayment.pm >@@ -88,4 +88,3 @@ sub pay { > > 1; > __END__ >- >diff --git a/C4/SIP/SIPServer.pm b/C4/SIP/SIPServer.pm >index 995d448d84b..5ef7cb98b53 100644 >--- a/C4/SIP/SIPServer.pm >+++ b/C4/SIP/SIPServer.pm >@@ -23,7 +23,6 @@ use C4::SIP::Logger qw(set_logger); > use Koha::Caches; > use Koha::Logger; > >-use C4::SIP::Trapper; > tie *STDERR, "C4::SIP::Trapper"; > > use base qw(Net::Server::PreFork); >diff --git a/C4/SIP/Sip/MsgType.pm b/C4/SIP/Sip/MsgType.pm >index 2f7ba7da0fa..129e743fcbd 100644 >--- a/C4/SIP/Sip/MsgType.pm >+++ b/C4/SIP/Sip/MsgType.pm >@@ -1760,4 +1760,3 @@ sub desensitize { > > 1; > __END__ >- >diff --git a/C4/SMS.pm b/C4/SMS.pm >index ce3358f66ab..f4acc371dfa 100644 >--- a/C4/SMS.pm >+++ b/C4/SMS.pm >@@ -148,4 +148,3 @@ sub driver { > 1; > > __END__ >- >diff --git a/C4/Scheduler.pm b/C4/Scheduler.pm >index e2f6d85f654..5d3a145d418 100644 >--- a/C4/Scheduler.pm >+++ b/C4/Scheduler.pm >@@ -19,7 +19,6 @@ package C4::Scheduler; > > use Modern::Perl; > >-use C4::Context; > use Schedule::At; > > our (@ISA, @EXPORT_OK); >diff --git a/C4/Scrubber.pm b/C4/Scrubber.pm >index 0fcd3580bc2..e13438f71c3 100644 >--- a/C4/Scrubber.pm >+++ b/C4/Scrubber.pm >@@ -24,7 +24,6 @@ use warnings; > use Carp qw( croak ); > use HTML::Scrubber; > >-use C4::Context; > > my %scrubbertypes = ( > default => {}, # place holder, default settings are below as fallbacks in call to constructor >@@ -68,4 +67,3 @@ for Tags. > =head2 TODO: Add real perldoc > > =cut >- >diff --git a/C4/Serials.pm b/C4/Serials.pm >index 6a1274f20aa..9becd56707e 100644 >--- a/C4/Serials.pm >+++ b/C4/Serials.pm >@@ -35,7 +35,6 @@ use POSIX qw( strftime ); > use C4::Biblio qw( GetMarcFromKohaField ModBiblio ); > use C4::Log qw( logaction ); # logaction > use C4::Serials::Frequency qw( GetSubscriptionFrequency ); >-use C4::Serials::Numberpattern; > use Koha::AdditionalFieldValues; > use Koha::Biblios; > use Koha::DateUtils qw( dt_from_string output_pref ); >diff --git a/C4/Stats.pm b/C4/Stats.pm >index 6afb5380922..78e750bc778 100644 >--- a/C4/Stats.pm >+++ b/C4/Stats.pm >@@ -155,4 +155,3 @@ __END__ > Koha Development Team <http://koha-community.org/> > > =cut >- >diff --git a/C4/Suggestions.pm b/C4/Suggestions.pm >index dc92c1554fa..9d5b635864e 100644 >--- a/C4/Suggestions.pm >+++ b/C4/Suggestions.pm >@@ -22,8 +22,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > > use C4::Context; >-use C4::Output; >-use C4::Letters; > use C4::Biblio qw( GetMarcFromKohaField ); > use Koha::DateUtils qw( dt_from_string ); > use Koha::Suggestions; >@@ -515,4 +513,3 @@ __END__ > Koha Development Team <http://koha-community.org/> > > =cut >- >diff --git a/C4/Tags.pm b/C4/Tags.pm >index e01244f9279..3206154e567 100644 >--- a/C4/Tags.pm >+++ b/C4/Tags.pm >@@ -705,4 +705,3 @@ perl -ne 'use C4::Tags qw(get_tags add_tag); use Data::Dumper;chomp; add_tag($_, > Note, the borrowernumber in this example is 51. Use your own or any arbitrary valid borrowernumber. > > =cut >- >diff --git a/C4/TmplToken.pm b/C4/TmplToken.pm >index 045269b80b7..fe7fbbdc2e4 100644 >--- a/C4/TmplToken.pm >+++ b/C4/TmplToken.pm >@@ -20,7 +20,6 @@ package C4::TmplToken; > > use strict; > use warnings; >-use C4::TmplTokenType; > > =head1 NAME > >diff --git a/C4/XISBN.pm b/C4/XISBN.pm >index 67d89ea96cc..eee3a49c0cc 100644 >--- a/C4/XISBN.pm >+++ b/C4/XISBN.pm >@@ -153,4 +153,3 @@ __END__ > Joshua Ferraro <jmf@liblime.com> > > =cut >- >diff --git a/Koha/Account.pm b/Koha/Account.pm >index 4c13a9a07e0..8de260b6f24 100644 >--- a/Koha/Account.pm >+++ b/Koha/Account.pm >@@ -24,7 +24,6 @@ use Data::Dumper qw( Dumper ); > use Try::Tiny qw( catch try ); > > use C4::Circulation qw( ReturnLostItem CanBookBeRenewed AddRenewal ); >-use C4::Letters; > use C4::Log qw( logaction ); > use C4::Stats qw( UpdateStats ); > use C4::Overdues qw(GetFine); >diff --git a/Koha/ActionLog.pm b/Koha/ActionLog.pm >index 05faf89d0aa..1ebc1fbe833 100644 >--- a/Koha/ActionLog.pm >+++ b/Koha/ActionLog.pm >@@ -19,7 +19,6 @@ package Koha::ActionLog; > > use Modern::Perl; > >-use C4::Context; > > use base qw(Koha::Object); > >diff --git a/Koha/ActionLogs.pm b/Koha/ActionLogs.pm >index c94969fb300..827bb751db4 100644 >--- a/Koha/ActionLogs.pm >+++ b/Koha/ActionLogs.pm >@@ -19,7 +19,6 @@ package Koha::ActionLogs; > > use Modern::Perl; > >-use C4::Context; > > use base qw(Koha::Objects); > >diff --git a/Koha/AdditionalField.pm b/Koha/AdditionalField.pm >index 721c01fffc9..cded9275d39 100644 >--- a/Koha/AdditionalField.pm >+++ b/Koha/AdditionalField.pm >@@ -10,7 +10,6 @@ use Modern::Perl; > > use base qw(Koha::Object); > >-use C4::Context; > > sub _type { 'AdditionalField' } > >diff --git a/Koha/Auth/TwoFactorAuth.pm b/Koha/Auth/TwoFactorAuth.pm >index 48b2a895ea3..a1ed9e15f9e 100644 >--- a/Koha/Auth/TwoFactorAuth.pm >+++ b/Koha/Auth/TwoFactorAuth.pm >@@ -19,7 +19,6 @@ use Modern::Perl; > use GD::Barcode; > use MIME::Base64 qw( encode_base64 ); > >-use C4::Letters; > use Koha::Exceptions; > use Koha::Exceptions::Patron; > >diff --git a/Koha/AuthUtils.pm b/Koha/AuthUtils.pm >index 8345f50a5fe..ceae7c1d269 100644 >--- a/Koha/AuthUtils.pm >+++ b/Koha/AuthUtils.pm >@@ -25,7 +25,6 @@ use List::MoreUtils qw( any ); > use String::Random qw( random_string ); > use Koha::Exceptions::Password; > >-use C4::Context; > > > our (@ISA, @EXPORT_OK); >diff --git a/Koha/Authority/MergeRequests.pm b/Koha/Authority/MergeRequests.pm >index 481118e0f57..f6ddf57cf3c 100644 >--- a/Koha/Authority/MergeRequests.pm >+++ b/Koha/Authority/MergeRequests.pm >@@ -20,7 +20,6 @@ package Koha::Authority::MergeRequests; > use Modern::Perl; > use MARC::File::XML; > >-use C4::Context; > use Koha::Authority::MergeRequest; > use Koha::Database; > use Koha::DateUtils qw( dt_from_string ); >diff --git a/Koha/BackgroundJob/BatchDeleteAuthority.pm b/Koha/BackgroundJob/BatchDeleteAuthority.pm >index 64d10f43ab6..075a9f6c8b0 100644 >--- a/Koha/BackgroundJob/BatchDeleteAuthority.pm >+++ b/Koha/BackgroundJob/BatchDeleteAuthority.pm >@@ -3,7 +3,6 @@ package Koha::BackgroundJob::BatchDeleteAuthority; > use Modern::Perl; > use JSON qw( encode_json decode_json ); > >-use C4::AuthoritiesMarc; > > use Koha::DateUtils qw( dt_from_string ); > use Koha::SearchEngine; >diff --git a/Koha/BackgroundJob/BatchDeleteBiblio.pm b/Koha/BackgroundJob/BatchDeleteBiblio.pm >index b5984ce44ff..7f08c89a36e 100644 >--- a/Koha/BackgroundJob/BatchDeleteBiblio.pm >+++ b/Koha/BackgroundJob/BatchDeleteBiblio.pm >@@ -3,7 +3,6 @@ package Koha::BackgroundJob::BatchDeleteBiblio; > use Modern::Perl; > use JSON qw( encode_json decode_json ); > >-use C4::Biblio; > > use Koha::BackgroundJob::BatchUpdateBiblioHoldsQueue; > use Koha::DateUtils qw( dt_from_string ); >diff --git a/Koha/BackgroundJob/BatchUpdateBiblio.pm b/Koha/BackgroundJob/BatchUpdateBiblio.pm >index 63d1277ff44..8e92b38d152 100644 >--- a/Koha/BackgroundJob/BatchUpdateBiblio.pm >+++ b/Koha/BackgroundJob/BatchUpdateBiblio.pm >@@ -25,8 +25,6 @@ use Koha::SearchEngine; > use Koha::SearchEngine::Indexer; > > use C4::Context; >-use C4::Biblio; >-use C4::MarcModificationTemplates; > > use base 'Koha::BackgroundJob'; > >diff --git a/Koha/BackgroundJob/BatchUpdateItem.pm b/Koha/BackgroundJob/BatchUpdateItem.pm >index d01aed7f39b..e1099fa4075 100644 >--- a/Koha/BackgroundJob/BatchUpdateItem.pm >+++ b/Koha/BackgroundJob/BatchUpdateItem.pm >@@ -24,8 +24,6 @@ use Try::Tiny; > use MARC::Record; > use MARC::Field; > >-use C4::Biblio; >-use C4::Items; > > use Koha::DateUtils qw( dt_from_string ); > use Koha::SearchEngine::Indexer; >diff --git a/Koha/BiblioUtils/Iterator.pm b/Koha/BiblioUtils/Iterator.pm >index e82f69fd735..5d9e4d78509 100644 >--- a/Koha/BiblioUtils/Iterator.pm >+++ b/Koha/BiblioUtils/Iterator.pm >@@ -43,7 +43,6 @@ Returns biblionumber and marc in list context. > > =cut > >-use C4::Biblio; > use Koha::Biblio::Metadata; > > use Carp qw( confess ); >diff --git a/Koha/Config/SysPref.pm b/Koha/Config/SysPref.pm >index dd743f8ef2b..644590645b2 100644 >--- a/Koha/Config/SysPref.pm >+++ b/Koha/Config/SysPref.pm >@@ -22,7 +22,6 @@ use Modern::Perl; > > use Koha::Database; > >-use C4::Log; > > use base qw(Koha::Object); > >diff --git a/Koha/Exporter/Record.pm b/Koha/Exporter/Record.pm >index e678c36ee1b..96cb98fd376 100644 >--- a/Koha/Exporter/Record.pm >+++ b/Koha/Exporter/Record.pm >@@ -4,9 +4,7 @@ use Modern::Perl; > use MARC::File::XML; > use MARC::File::USMARC; > >-use C4::AuthoritiesMarc; > use C4::Biblio qw( GetMarcFromKohaField ); >-use C4::Record; > use Koha::Biblios; > use Koha::CsvProfiles; > use Koha::Logger; >diff --git a/Koha/ExternalContent.pm b/Koha/ExternalContent.pm >index be5174d32e2..b521181f302 100644 >--- a/Koha/ExternalContent.pm >+++ b/Koha/ExternalContent.pm >@@ -24,7 +24,6 @@ use base qw(Class::Accessor); > use Koha; > use Koha::Logger; > use Koha::Patrons; >-use C4::Auth; > > __PACKAGE__->mk_accessors(qw(client koha_session_id koha_patron logger)); > >diff --git a/Koha/Filter/MARC/EmbedItems.pm b/Koha/Filter/MARC/EmbedItems.pm >index 2839694ff8a..a2086675f68 100644 >--- a/Koha/Filter/MARC/EmbedItems.pm >+++ b/Koha/Filter/MARC/EmbedItems.pm >@@ -53,7 +53,6 @@ Filter to embed items information into MARC::Record objects. > > use Modern::Perl; > >-use C4::Biblio; > > use base qw(Koha::RecordProcessor::Base); > our $NAME = 'EmbedItems'; >diff --git a/Koha/Hold.pm b/Koha/Hold.pm >index 63e30970cad..df9c222eb6c 100644 >--- a/Koha/Hold.pm >+++ b/Koha/Hold.pm >@@ -25,7 +25,6 @@ use List::MoreUtils qw( any ); > use C4::Context qw(preference); > use C4::Letters qw( GetPreparedLetter EnqueueLetter ); > use C4::Log qw( logaction ); >-use C4::Reserves; > > use Koha::AuthorisedValues; > use Koha::DateUtils qw( dt_from_string ); >diff --git a/Koha/I18N.pm b/Koha/I18N.pm >index 464911cb2dc..fd726d74a55 100644 >--- a/Koha/I18N.pm >+++ b/Koha/I18N.pm >@@ -19,7 +19,6 @@ package Koha::I18N; > > use Modern::Perl; > >-use C4::Languages; > use C4::Context; > > use Encode; >diff --git a/Koha/Illrequest.pm b/Koha/Illrequest.pm >index a04ea5a5539..c3d7b27d844 100644 >--- a/Koha/Illrequest.pm >+++ b/Koha/Illrequest.pm >@@ -23,7 +23,6 @@ use Clone qw( clone ); > use Try::Tiny qw( catch try ); > use DateTime; > >-use C4::Letters; > use Koha::Database; > use Koha::DateUtils qw( dt_from_string ); > use Koha::Exceptions::Ill; >diff --git a/Koha/Illrequest/Logger.pm b/Koha/Illrequest/Logger.pm >index 31f1704446c..bf2aab8dca1 100644 >--- a/Koha/Illrequest/Logger.pm >+++ b/Koha/Illrequest/Logger.pm >@@ -22,7 +22,6 @@ use JSON qw( from_json to_json ); > > use C4::Koha qw( GetAuthorisedValues ); > use C4::Context; >-use C4::Templates; > use C4::Log qw( logaction ); > use Koha::ActionLogs; > use Koha::Notice::Template; >diff --git a/Koha/ImportBatch.pm b/Koha/ImportBatch.pm >index e30389c133c..dd21d0d46f4 100644 >--- a/Koha/ImportBatch.pm >+++ b/Koha/ImportBatch.pm >@@ -38,4 +38,4 @@ sub _type { > return 'ImportBatch'; > } > >-1; >\ No newline at end of file >+1; >diff --git a/Koha/ImportBatchProfile.pm b/Koha/ImportBatchProfile.pm >index 1b349fc6b9d..51459053aaa 100644 >--- a/Koha/ImportBatchProfile.pm >+++ b/Koha/ImportBatchProfile.pm >@@ -51,4 +51,4 @@ sub _type { > return 'ImportBatchProfile'; > } > >-1; >\ No newline at end of file >+1; >diff --git a/Koha/ImportBatchProfiles.pm b/Koha/ImportBatchProfiles.pm >index 7787af8845c..002207acce8 100644 >--- a/Koha/ImportBatchProfiles.pm >+++ b/Koha/ImportBatchProfiles.pm >@@ -48,4 +48,4 @@ sub object_class { > return 'Koha::ImportBatchProfile'; > } > >-1; >\ No newline at end of file >+1; >diff --git a/Koha/ImportBatches.pm b/Koha/ImportBatches.pm >index 0c6002d58f8..e484e769b6f 100644 >--- a/Koha/ImportBatches.pm >+++ b/Koha/ImportBatches.pm >@@ -48,4 +48,4 @@ sub object_class { > return 'Koha::ImportBatch'; > } > >-1; >\ No newline at end of file >+1; >diff --git a/Koha/Item.pm b/Koha/Item.pm >index b3ac3623347..d208e2560f3 100644 >--- a/Koha/Item.pm >+++ b/Koha/Item.pm >@@ -27,7 +27,6 @@ use Koha::DateUtils qw( dt_from_string output_pref ); > > use C4::Context; > use C4::Circulation qw( barcodedecode GetBranchItemRule ); >-use C4::Reserves; > use C4::ClassSource qw( GetClassSort ); > use C4::Log qw( logaction ); > >diff --git a/Koha/Item/Attributes.pm b/Koha/Item/Attributes.pm >index 0c91d3e4431..dec8bb34387 100644 >--- a/Koha/Item/Attributes.pm >+++ b/Koha/Item/Attributes.pm >@@ -20,7 +20,6 @@ use MARC::Record; > use MARC::Field; > use List::MoreUtils qw( uniq ); > >-use C4::Biblio; > use C4::Charset qw( StripNonXmlChars ); > > =head1 NAME >diff --git a/Koha/ItemType.pm b/Koha/ItemType.pm >index 4b77433e8e1..4c39babc93b 100644 >--- a/Koha/ItemType.pm >+++ b/Koha/ItemType.pm >@@ -19,7 +19,6 @@ use Modern::Perl; > > > use C4::Koha qw( getitemtypeimagelocation ); >-use C4::Languages; > use Koha::Database; > use Koha::CirculationRules; > use Koha::Localizations; >diff --git a/Koha/ItemTypes.pm b/Koha/ItemTypes.pm >index 13caa648a81..6523e4a147a 100644 >--- a/Koha/ItemTypes.pm >+++ b/Koha/ItemTypes.pm >@@ -18,7 +18,6 @@ package Koha::ItemTypes; > use Modern::Perl; > > >-use C4::Languages; > > use Koha::Database; > use Koha::ItemType; >diff --git a/Koha/Items.pm b/Koha/Items.pm >index 90b178a1cef..db04b2b4cd2 100644 >--- a/Koha/Items.pm >+++ b/Koha/Items.pm >@@ -24,7 +24,6 @@ use Try::Tiny; > > use C4::Context; > use C4::Biblio qw( GetMarcStructure GetMarcFromKohaField ); >-use C4::Circulation; > > use Koha::Database; > use Koha::SearchEngine::Indexer; >diff --git a/Koha/Misc/Files.pm b/Koha/Misc/Files.pm >index a107441b6d6..126d9434349 100644 >--- a/Koha/Misc/Files.pm >+++ b/Koha/Misc/Files.pm >@@ -22,7 +22,6 @@ package Koha::Misc::Files; > use Modern::Perl; > > use C4::Context; >-use C4::Output; > > =head1 NAME > >diff --git a/Koha/Patron.pm b/Koha/Patron.pm >index 8031257304d..fd93c435508 100644 >--- a/Koha/Patron.pm >+++ b/Koha/Patron.pm >@@ -29,7 +29,6 @@ use C4::Context; > use C4::Log qw( logaction ); > use Koha::Account; > use Koha::ArticleRequests; >-use C4::Letters; > use Koha::AuthUtils; > use Koha::Checkouts; > use Koha::CirculationRules; >diff --git a/Koha/Patron/Category.pm b/Koha/Patron/Category.pm >index c6837ca00f2..dcbc9beeccb 100644 >--- a/Koha/Patron/Category.pm >+++ b/Koha/Patron/Category.pm >@@ -19,7 +19,6 @@ use Modern::Perl; > > use List::MoreUtils qw( any ); > >-use C4::Members::Messaging; > > use Koha::Database; > use Koha::DateUtils qw( dt_from_string ); >diff --git a/Koha/Patron/Files.pm b/Koha/Patron/Files.pm >index 6c3a33072ce..883ca752eed 100644 >--- a/Koha/Patron/Files.pm >+++ b/Koha/Patron/Files.pm >@@ -21,7 +21,6 @@ use Modern::Perl; > > > use C4::Context; >-use C4::Output; > > =head1 NAME > >diff --git a/Koha/Patron/Message.pm b/Koha/Patron/Message.pm >index fa4473d2201..e851d3e6f50 100644 >--- a/Koha/Patron/Message.pm >+++ b/Koha/Patron/Message.pm >@@ -19,7 +19,6 @@ use Modern::Perl; > > > use C4::Context; >-use C4::Log; > > use Koha::Database; > >diff --git a/Koha/Patron/Password/Recovery.pm b/Koha/Patron/Password/Recovery.pm >index 0f1882bf840..828fbf3841e 100644 >--- a/Koha/Patron/Password/Recovery.pm >+++ b/Koha/Patron/Password/Recovery.pm >@@ -19,7 +19,6 @@ package Koha::Patron::Password::Recovery; > > use Modern::Perl; > use C4::Context; >-use C4::Letters; > use Crypt::Eksblowfish::Bcrypt qw( en_base64 ); > use Koha::DateUtils qw( dt_from_string ); > >diff --git a/Koha/Plugins.pm b/Koha/Plugins.pm >index f7b716638d9..f332d54c996 100644 >--- a/Koha/Plugins.pm >+++ b/Koha/Plugins.pm >@@ -28,7 +28,6 @@ use Module::Pluggable search_path => ['Koha::Plugin'], except => qr/::Edifact(|: > use Try::Tiny; > > use C4::Context; >-use C4::Output; > > use Koha::Exceptions::Plugin; > use Koha::Plugins::Methods; >diff --git a/Koha/REST/V1/Checkouts.pm b/Koha/REST/V1/Checkouts.pm >index e4a52b4cadb..74c859f26a9 100644 >--- a/Koha/REST/V1/Checkouts.pm >+++ b/Koha/REST/V1/Checkouts.pm >@@ -21,7 +21,6 @@ use Mojo::Base 'Mojolicious::Controller'; > use Mojo::JSON; > > use C4::Auth qw( haspermission ); >-use C4::Context; > use C4::Circulation qw( AddRenewal ); > use Koha::Checkouts; > use Koha::Old::Checkouts; >diff --git a/Koha/REST/V1/Clubs/Holds.pm b/Koha/REST/V1/Clubs/Holds.pm >index 3333d75e7df..55c7d192f51 100644 >--- a/Koha/REST/V1/Clubs/Holds.pm >+++ b/Koha/REST/V1/Clubs/Holds.pm >@@ -19,7 +19,6 @@ use Modern::Perl; > > use Mojo::Base 'Mojolicious::Controller'; > >-use C4::Reserves; > > use Koha::Items; > use Koha::Patrons; >diff --git a/Koha/REST/V1/Holds.pm b/Koha/REST/V1/Holds.pm >index acd4b78e20e..658381dd9fc 100644 >--- a/Koha/REST/V1/Holds.pm >+++ b/Koha/REST/V1/Holds.pm >@@ -21,7 +21,6 @@ use Mojo::Base 'Mojolicious::Controller'; > > use Mojo::JSON; > >-use C4::Reserves; > > use Koha::Items; > use Koha::Patrons; >diff --git a/Koha/REST/V1/ImportBatchProfiles.pm b/Koha/REST/V1/ImportBatchProfiles.pm >index ddac0eee4fb..11322013060 100644 >--- a/Koha/REST/V1/ImportBatchProfiles.pm >+++ b/Koha/REST/V1/ImportBatchProfiles.pm >@@ -142,4 +142,4 @@ sub delete { > }; > } > >-1; >\ No newline at end of file >+1; >diff --git a/Koha/SearchEngine/Elasticsearch/Search.pm b/Koha/SearchEngine/Elasticsearch/Search.pm >index 0a1bc7ccc91..f69616d35d7 100644 >--- a/Koha/SearchEngine/Elasticsearch/Search.pm >+++ b/Koha/SearchEngine/Elasticsearch/Search.pm >@@ -42,7 +42,6 @@ use Modern::Perl; > > use base qw(Koha::SearchEngine::Elasticsearch); > use C4::Context; >-use C4::AuthoritiesMarc; > use Koha::ItemTypes; > use Koha::AuthorisedValues; > use Koha::SearchEngine::QueryBuilder; >diff --git a/Koha/SearchEngine/Search.pm b/Koha/SearchEngine/Search.pm >index 578ae8979c9..43bf17d421a 100644 >--- a/Koha/SearchEngine/Search.pm >+++ b/Koha/SearchEngine/Search.pm >@@ -45,7 +45,6 @@ Creates a new C<Search> of whatever the relevant type is. > > use Modern::Perl; > use C4::Context; >-use C4::Biblio; > use POSIX qw( ceil ); > > sub new { >diff --git a/Koha/SearchEngine/Zebra/QueryBuilder.pm b/Koha/SearchEngine/Zebra/QueryBuilder.pm >index 8b8d3473e7f..721068d5a9f 100644 >--- a/Koha/SearchEngine/Zebra/QueryBuilder.pm >+++ b/Koha/SearchEngine/Zebra/QueryBuilder.pm >@@ -40,8 +40,6 @@ use Modern::Perl; > > use base qw(Class::Accessor); > >-use C4::Search; >-use C4::AuthoritiesMarc; > > =head2 build_query > >diff --git a/Koha/SearchEngine/Zebra/Search.pm b/Koha/SearchEngine/Zebra/Search.pm >index 1d504d384fd..0325f4f4bd3 100644 >--- a/Koha/SearchEngine/Zebra/Search.pm >+++ b/Koha/SearchEngine/Zebra/Search.pm >@@ -22,7 +22,6 @@ use Modern::Perl; > use base qw(Class::Accessor); > > use C4::Search qw( getRecords ); # :( >-use C4::AuthoritiesMarc; > use Koha::SearchEngine::Search; > > =head1 NAME >diff --git a/Koha/Template/Plugin/AdditionalContents.pm b/Koha/Template/Plugin/AdditionalContents.pm >index c37abece4ea..4d6044f1688 100644 >--- a/Koha/Template/Plugin/AdditionalContents.pm >+++ b/Koha/Template/Plugin/AdditionalContents.pm >@@ -24,8 +24,6 @@ use Modern::Perl; > use Template::Plugin; > use base qw( Template::Plugin ); > >-use C4::Koha; >-use C4::Context; > use Koha::AdditionalContents; > > sub get { >diff --git a/Koha/Template/Plugin/Branches.pm b/Koha/Template/Plugin/Branches.pm >index 981c5b413da..4e780c1060e 100644 >--- a/Koha/Template/Plugin/Branches.pm >+++ b/Koha/Template/Plugin/Branches.pm >@@ -23,7 +23,6 @@ use Modern::Perl; > use Template::Plugin; > use base qw( Template::Plugin ); > >-use C4::Koha; > use C4::Context; > use Koha::Cache::Memory::Lite; > use Koha::Libraries; >diff --git a/Koha/Template/Plugin/Cache.pm b/Koha/Template/Plugin/Cache.pm >index 93bbf0f24df..32df15d4d3a 100644 >--- a/Koha/Template/Plugin/Cache.pm >+++ b/Koha/Template/Plugin/Cache.pm >@@ -21,7 +21,6 @@ use strict; > use warnings; > use base qw( Template::Plugin ); > use Template::Plugin; >-use C4::Context; > > #------------------------------------------------------------------------ > # new(\%options) >diff --git a/Koha/Template/Plugin/Context.pm b/Koha/Template/Plugin/Context.pm >index cccb346963c..49ebaff90b9 100644 >--- a/Koha/Template/Plugin/Context.pm >+++ b/Koha/Template/Plugin/Context.pm >@@ -19,7 +19,6 @@ use Modern::Perl; > > use base qw( Template::Plugin ); > >-use C4::Context; > > =head1 NAME > >diff --git a/Koha/Template/Plugin/I18N.pm b/Koha/Template/Plugin/I18N.pm >index 43e2ef3c079..baae0fa133b 100644 >--- a/Koha/Template/Plugin/I18N.pm >+++ b/Koha/Template/Plugin/I18N.pm >@@ -21,7 +21,6 @@ use Modern::Perl; > > use base qw( Template::Plugin ); > >-use C4::Context; > use Koha::I18N qw( __ __n __np __npx __nx __p __px __x __xn ); > > =head1 NAME >diff --git a/Koha/Template/Plugin/Languages.pm b/Koha/Template/Plugin/Languages.pm >index 65534e50714..707a5d724d6 100644 >--- a/Koha/Template/Plugin/Languages.pm >+++ b/Koha/Template/Plugin/Languages.pm >@@ -21,8 +21,6 @@ use Modern::Perl; > use Template::Plugin; > use base qw( Template::Plugin ); > >-use C4::Koha; >-use C4::Languages; > > sub GetByISOCode { > my ( $self, $lang, $code ) = @_; >diff --git a/Koha/Template/Plugin/Registers.pm b/Koha/Template/Plugin/Registers.pm >index cb5fab8b61b..0bdf62814cd 100644 >--- a/Koha/Template/Plugin/Registers.pm >+++ b/Koha/Template/Plugin/Registers.pm >@@ -38,7 +38,6 @@ use Modern::Perl; > use Template::Plugin; > use base qw( Template::Plugin ); > >-use C4::Koha; > use C4::Context; > use Koha::Cash::Registers; > >diff --git a/Koha/Template/Plugin/TablesSettings.pm b/Koha/Template/Plugin/TablesSettings.pm >index 720b67445ac..969e507928e 100644 >--- a/Koha/Template/Plugin/TablesSettings.pm >+++ b/Koha/Template/Plugin/TablesSettings.pm >@@ -56,8 +56,6 @@ use base qw( Template::Plugin ); > > use JSON qw( to_json ); > >-use C4::Context; >-use C4::Utils::DataTables::TablesSettings; > > =head1 FUNCTIONS > >diff --git a/Koha/Uploader.pm b/Koha/Uploader.pm >index 8fbb06a14c9..1b76c6e5480 100644 >--- a/Koha/Uploader.pm >+++ b/Koha/Uploader.pm >@@ -75,7 +75,6 @@ use Time::HiRes; > use base qw(Class::Accessor); > > use C4::Context; >-use C4::Koha; > use Koha::UploadedFile; > use Koha::UploadedFiles; > >diff --git a/Koha/Z3950Responder/Session.pm b/Koha/Z3950Responder/Session.pm >index 6f663b5f95c..e83326576e3 100644 >--- a/Koha/Z3950Responder/Session.pm >+++ b/Koha/Z3950Responder/Session.pm >@@ -20,7 +20,6 @@ package Koha::Z3950Responder::Session; > use Modern::Perl; > > use C4::Circulation qw( GetTransfers ); >-use C4::Context; > use C4::Reserves qw( GetReserveStatus ); > use C4::Search qw( new_record_from_zebra ); > >diff --git a/Koha/pdfformat/layout3pagesfr.pm b/Koha/pdfformat/layout3pagesfr.pm >index 21f3f0270d8..bfcbdd72b0d 100644 >--- a/Koha/pdfformat/layout3pagesfr.pm >+++ b/Koha/pdfformat/layout3pagesfr.pm >@@ -27,7 +27,6 @@ use List::MoreUtils qw( uniq ); > use Modern::Perl; > use utf8; > >-use C4::Acquisition; > use Koha::Number::Price; > use Koha::DateUtils qw( dt_from_string output_pref ); > use Koha::Libraries; >diff --git a/acqui/acqui-home.pl b/acqui/acqui-home.pl >index 05eb16bf06d..73ac7dcdbc1 100755 >--- a/acqui/acqui-home.pl >+++ b/acqui/acqui-home.pl >@@ -32,7 +32,6 @@ use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Budgets qw( GetBudgetHierarchy GetBudget CanUserUseBudget ); >-use C4::Members; > use Koha::Acquisition::Currencies; > use Koha::Patrons; > use Koha::Suggestions; >diff --git a/acqui/addorderiso2709.pl b/acqui/addorderiso2709.pl >index 9d5911564ce..c66832e1a2f 100755 >--- a/acqui/addorderiso2709.pl >+++ b/acqui/addorderiso2709.pl >@@ -45,7 +45,6 @@ use C4::Items qw( PrepareItemrecordDisplay AddItemFromMarc ); > use C4::Budgets qw( GetBudget GetBudgets GetBudgetHierarchy CanUserUseBudget GetBudgetByCode ); > use C4::Acquisition qw( populate_order_with_prices ); > use C4::Suggestions; # GetSuggestion >-use C4::Members; > > use Koha::Number::Price; > use Koha::Libraries; >diff --git a/acqui/check_budget_total.pl b/acqui/check_budget_total.pl >index 46379fa0053..a1a582761ca 100755 >--- a/acqui/check_budget_total.pl >+++ b/acqui/check_budget_total.pl >@@ -19,7 +19,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); > use C4::Budgets qw( GetBudget ); >diff --git a/acqui/edimsg.pl b/acqui/edimsg.pl >index 05340d44813..bb8fefa0d1c 100755 >--- a/acqui/edimsg.pl >+++ b/acqui/edimsg.pl >@@ -20,7 +20,6 @@ use Modern::Perl; > > use CGI; > use Koha::Database; >-use C4::Koha; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > >diff --git a/acqui/finishreceive.pl b/acqui/finishreceive.pl >index c2d51686eb2..d94a9ab492a 100755 >--- a/acqui/finishreceive.pl >+++ b/acqui/finishreceive.pl >@@ -24,13 +24,11 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw( checkauth ); > use JSON qw( encode_json ); >-use C4::Output; > use C4::Context; > use C4::Acquisition qw( GetInvoice GetOrder populate_order_with_prices ModReceiveOrder ); > use C4::Biblio qw( GetFrameworkCode GetMarcFromKohaField TransformHtmlToXml ); > use C4::Items qw( GetMarcItem ModItemFromMarc AddItemFromMarc ); > use C4::Log qw(logaction); >-use C4::Search; > > use Koha::Number::Price; > use Koha::Acquisition::Booksellers; >diff --git a/acqui/lateorders-export.pl b/acqui/lateorders-export.pl >index a8717774351..18b93b4e329 100755 >--- a/acqui/lateorders-export.pl >+++ b/acqui/lateorders-export.pl >@@ -21,8 +21,6 @@ use Encode; > > use C4::Auth qw( get_template_and_user ); > use C4::Acquisition qw( GetOrder ); >-use C4::Output; >-use C4::Context; > > my $input = CGI->new; > my ($template, $loggedinuser, $cookie) = get_template_and_user({ >diff --git a/acqui/neworderempty.pl b/acqui/neworderempty.pl >index 182a04eccb2..b557ae2e6ab 100755 >--- a/acqui/neworderempty.pl >+++ b/acqui/neworderempty.pl >@@ -83,7 +83,6 @@ use C4::Biblio qw( > IsMarcStructureInternal > ); > use C4::Output qw( output_and_exit output_html_with_http_headers ); >-use C4::Members; > use C4::Search qw( FindDuplicate ); > > #needed for z3950 import: >diff --git a/acqui/newordersuggestion.pl b/acqui/newordersuggestion.pl >index 9d35ec48def..da005c4998f 100755 >--- a/acqui/newordersuggestion.pl >+++ b/acqui/newordersuggestion.pl >@@ -94,7 +94,6 @@ use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Suggestions qw( ConnectSuggestionAndBiblio ); >-use C4::Budgets; > > use Koha::Acquisition::Booksellers; > use Koha::Suggestions; >diff --git a/acqui/orderreceive.pl b/acqui/orderreceive.pl >index e1b76d32732..bb00364999c 100755 >--- a/acqui/orderreceive.pl >+++ b/acqui/orderreceive.pl >@@ -66,7 +66,6 @@ use C4::Acquisition qw( GetInvoice ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Budgets qw( GetBudget GetBudgetPeriods GetBudgetPeriod GetBudgetHierarchy CanUserUseBudget ); >-use C4::Members; > use C4::Biblio qw( GetMarcStructure ); > use C4::Suggestions qw( GetSuggestion GetSuggestionInfoFromBiblionumber GetSuggestionInfo ); > >diff --git a/acqui/supplier.pl b/acqui/supplier.pl >index 0e3570780a5..268d521f5bc 100755 >--- a/acqui/supplier.pl >+++ b/acqui/supplier.pl >@@ -46,7 +46,6 @@ use C4::Contract qw( GetContracts GetContract ); > use C4::Output qw( output_html_with_http_headers ); > use CGI qw ( -utf8 ); > >-use C4::Budgets; > > use Koha::Acquisition::Bookseller::Contacts; > use Koha::Acquisition::Booksellers; >diff --git a/acqui/transferorder.pl b/acqui/transferorder.pl >index 1fa15be7b85..2aec37dfa8b 100755 >--- a/acqui/transferorder.pl >+++ b/acqui/transferorder.pl >@@ -139,4 +139,3 @@ $template->param( > ); > > output_html_with_http_headers $input, $cookie, $template->output; >- >diff --git a/acqui/updatesupplier.pl b/acqui/updatesupplier.pl >index b195c88fb6b..a411fdb8936 100755 >--- a/acqui/updatesupplier.pl >+++ b/acqui/updatesupplier.pl >@@ -47,10 +47,8 @@ contact_serialsprimary. > =cut > > use Modern::Perl; >-use C4::Context; > use C4::Auth qw( checkauth ); > >-use C4::Output; > > use Koha::Acquisition::Bookseller::Contacts; > use Koha::Acquisition::Booksellers; >diff --git a/acqui/z3950_search.pl b/acqui/z3950_search.pl >index d596cbf227c..471db10a131 100755 >--- a/acqui/z3950_search.pl >+++ b/acqui/z3950_search.pl >@@ -24,7 +24,6 @@ use CGI qw/-utf8/; > > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Context; > use C4::Breeding qw( Z3950Search ); > > use Koha::Acquisition::Booksellers; >diff --git a/admin/adveditorshortcuts.pl b/admin/adveditorshortcuts.pl >index 0fbe51c1602..919b8f8d65b 100755 >--- a/admin/adveditorshortcuts.pl >+++ b/admin/adveditorshortcuts.pl >@@ -36,7 +36,6 @@ This script allows the user to redefine the keyboard shortcuts for the advacned > use Modern::Perl; > > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use CGI qw ( -utf8 ); > use Koha::KeyboardShortcuts; >diff --git a/admin/aqbudgetperiods.pl b/admin/aqbudgetperiods.pl >index efd174c1676..c48d16827c6 100755 >--- a/admin/aqbudgetperiods.pl >+++ b/admin/aqbudgetperiods.pl >@@ -50,11 +50,9 @@ use CGI qw ( -utf8 ); > use Koha::DateUtils qw( dt_from_string ); > use JSON qw( encode_json ); > use Koha::Database; >-use C4::Koha; > use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Acquisition; > use C4::Budgets qw( GetBudgetPeriod GetBudgetHierarchy GetBudgetPeriods ModBudgetPeriod AddBudgetPeriod GetBudgets DelBudgetPeriod CloneBudgetPeriod MoveOrders ); > use C4::Log qw(logaction); > use Koha::Acquisition::Currencies; >diff --git a/admin/aqcontract.pl b/admin/aqcontract.pl >index 83e99d7d0c6..22c4835ac43 100755 >--- a/admin/aqcontract.pl >+++ b/admin/aqcontract.pl >@@ -22,7 +22,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Contract qw( >@@ -177,4 +176,3 @@ if ( $op eq 'list' ) { > } > > output_html_with_http_headers $input, $cookie, $template->output; >- >diff --git a/admin/auth_tag_structure.pl b/admin/auth_tag_structure.pl >index 1c952d58a58..9e881651678 100755 >--- a/admin/auth_tag_structure.pl >+++ b/admin/auth_tag_structure.pl >@@ -251,4 +251,3 @@ sub duplicate_auth_framework { > $sth_insert->execute($newauthtype, $tagfield, $tagsubfield, $liblibrarian, $libopac, $repeatable, $mandatory,$kohafield, $tab, $authorised_value, $thesaurus_category, $seealso,$hidden); > } > } >- >diff --git a/admin/authorised_values.pl b/admin/authorised_values.pl >index dd8339b5689..c896ef628b9 100755 >--- a/admin/authorised_values.pl >+++ b/admin/authorised_values.pl >@@ -23,7 +23,6 @@ use CGI qw ( -utf8 ); > use List::MoreUtils qw( any ); > > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Koha qw( getitemtypeimagelocation ); > use C4::Output qw( output_html_with_http_headers ); > >diff --git a/admin/authtypes.pl b/admin/authtypes.pl >index 3fea873e0d9..9cccbf54351 100755 >--- a/admin/authtypes.pl >+++ b/admin/authtypes.pl >@@ -21,7 +21,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > >diff --git a/admin/background_jobs.pl b/admin/background_jobs.pl >index 8a27c00a274..e119b3b50b4 100755 >--- a/admin/background_jobs.pl >+++ b/admin/background_jobs.pl >@@ -18,7 +18,6 @@ > use Modern::Perl; > use CGI qw ( -utf8 ); > >-use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > >diff --git a/admin/biblio_framework.pl b/admin/biblio_framework.pl >index 4712f0ea728..6ccc2d63b2f 100755 >--- a/admin/biblio_framework.pl >+++ b/admin/biblio_framework.pl >@@ -127,4 +127,3 @@ $template->param( > ); > > output_html_with_http_headers $input, $cookie, $template->output; >- >diff --git a/admin/branch_transfer_limits.pl b/admin/branch_transfer_limits.pl >index 5a2a688c70a..ca35732d175 100755 >--- a/admin/branch_transfer_limits.pl >+++ b/admin/branch_transfer_limits.pl >@@ -122,4 +122,3 @@ $template->param( > ); > > output_html_with_http_headers $input, $cookie, $template->output; >- >diff --git a/admin/branches.pl b/admin/branches.pl >index 134321a2bd4..2a608289e17 100755 >--- a/admin/branches.pl >+++ b/admin/branches.pl >@@ -24,9 +24,7 @@ use CGI qw ( -utf8 ); > use Try::Tiny qw( catch try ); > > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); >-use C4::Koha; > > use Koha::Database; > use Koha::Patrons; >diff --git a/admin/cash_registers.pl b/admin/cash_registers.pl >index db55b2aadc7..d7c68e0d5a5 100755 >--- a/admin/cash_registers.pl >+++ b/admin/cash_registers.pl >@@ -25,7 +25,6 @@ use Try::Tiny qw( catch try ); > > use C4::Auth qw( get_template_and_user ); > use Koha::Libraries; >-use C4::Koha; > use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use Koha::Cash::Registers; >diff --git a/admin/categories.pl b/admin/categories.pl >index b30193deb92..4fe5110777b 100755 >--- a/admin/categories.pl >+++ b/admin/categories.pl >@@ -24,7 +24,6 @@ use CGI qw ( -utf8 ); > use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Form::MessagingPreferences; > use Koha::Patrons; > use Koha::Database; > use Koha::DateUtils qw( dt_from_string output_pref ); >diff --git a/admin/check_budget_parent.pl b/admin/check_budget_parent.pl >index 2274679f3b0..35cab18c08e 100755 >--- a/admin/check_budget_parent.pl >+++ b/admin/check_budget_parent.pl >@@ -19,7 +19,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); > use C4::Budgets qw( CheckBudgetParent GetBudget ); >diff --git a/admin/classsources.pl b/admin/classsources.pl >index 89b2200c647..ea4ad1950f6 100755 >--- a/admin/classsources.pl >+++ b/admin/classsources.pl >@@ -22,7 +22,6 @@ > use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::ClassSortRoutine qw( GetSortRoutineNames ); > use C4::ClassSplitRoutine qw( GetSplitRoutineNames ); >diff --git a/admin/clone-rules.pl b/admin/clone-rules.pl >index 9dc78d80940..35ed942df88 100755 >--- a/admin/clone-rules.pl >+++ b/admin/clone-rules.pl >@@ -27,7 +27,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); > use Koha::CirculationRules; >@@ -63,4 +62,3 @@ $template->param(result => 1); > > > output_html_with_http_headers $input, $cookie, $template->output; >- >diff --git a/admin/columns_settings.pl b/admin/columns_settings.pl >index 4d040e96a12..ae8c9bb4d8e 100755 >--- a/admin/columns_settings.pl >+++ b/admin/columns_settings.pl >@@ -3,7 +3,6 @@ > use Modern::Perl; > use CGI; > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::Utils::DataTables::TablesSettings qw( get_modules ); > my $input = CGI->new; >diff --git a/admin/credit_types.pl b/admin/credit_types.pl >index 27f6edf2ad6..53a4769b8cc 100755 >--- a/admin/credit_types.pl >+++ b/admin/credit_types.pl >@@ -21,7 +21,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use Try::Tiny qw( catch try ); > >-use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > >diff --git a/admin/curbside_pickup.pl b/admin/curbside_pickup.pl >index 528d8466116..49dd28a1c34 100755 >--- a/admin/curbside_pickup.pl >+++ b/admin/curbside_pickup.pl >@@ -17,7 +17,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > >diff --git a/admin/currency.pl b/admin/currency.pl >index 28dc2d26735..eaa946aeead 100755 >--- a/admin/currency.pl >+++ b/admin/currency.pl >@@ -22,7 +22,6 @@ > use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > > use Koha::Acquisition::Booksellers; >diff --git a/admin/debit_types.pl b/admin/debit_types.pl >index 40210479a1f..f6bf1b2d609 100755 >--- a/admin/debit_types.pl >+++ b/admin/debit_types.pl >@@ -21,7 +21,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use Try::Tiny qw( catch try ); > >-use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > >diff --git a/admin/desks.pl b/admin/desks.pl >index bc087a3c9de..ec7047acc9c 100755 >--- a/admin/desks.pl >+++ b/admin/desks.pl >@@ -20,7 +20,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > >diff --git a/admin/import_export_authtype.pl b/admin/import_export_authtype.pl >index e12bcc78872..5229556aac6 100755 >--- a/admin/import_export_authtype.pl >+++ b/admin/import_export_authtype.pl >@@ -20,7 +20,6 @@ > use Modern::Perl; > use CGI qw ( -utf8 ); > use CGI::Cookie; >-use C4::Context; > use C4::Auth qw/check_cookie_auth/; > use C4::ImportExportFramework qw( ExportFramework ImportFramework createODS ); > >diff --git a/admin/import_export_framework.pl b/admin/import_export_framework.pl >index 9973eb9c081..e6a289fd5bf 100755 >--- a/admin/import_export_framework.pl >+++ b/admin/import_export_framework.pl >@@ -20,7 +20,6 @@ > use Modern::Perl; > use CGI qw ( -utf8 ); > use CGI::Cookie; >-use C4::Context; > use C4::Auth qw( check_cookie_auth ); > use C4::ImportExportFramework qw( createODS ExportFramework ImportFramework ); > >diff --git a/admin/item_circulation_alerts.pl b/admin/item_circulation_alerts.pl >index 57a3c7d1233..da3ab6efb6e 100755 >--- a/admin/item_circulation_alerts.pl >+++ b/admin/item_circulation_alerts.pl >@@ -23,7 +23,6 @@ use JSON qw( encode_json ); > > use C4::Auth qw( get_template_and_user ); > use C4::Context; >-use C4::ItemCirculationAlertPreference; > use C4::Output qw( output_html_with_http_headers ); > > use Koha::ItemTypes; >diff --git a/admin/library_groups.pl b/admin/library_groups.pl >index 5284a881f48..a736fe1171f 100755 >--- a/admin/library_groups.pl >+++ b/admin/library_groups.pl >@@ -19,7 +19,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > >diff --git a/admin/marc-overlay-rules.pl b/admin/marc-overlay-rules.pl >index 05a5bbe5817..5664818579f 100755 >--- a/admin/marc-overlay-rules.pl >+++ b/admin/marc-overlay-rules.pl >@@ -20,10 +20,8 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use Try::Tiny; > >-use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::ImportBatch; > use Koha::MarcOverlayRules; > use Koha::Patron::Categories; > >diff --git a/admin/marctagstructure.pl b/admin/marctagstructure.pl >index 3514baca938..d5bd58ffe50 100755 >--- a/admin/marctagstructure.pl >+++ b/admin/marctagstructure.pl >@@ -339,4 +339,3 @@ sub duplicate_framework { > SELECT ?,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,important,kohafield,tab,authorised_value,authtypecode,value_builder,isurl,seealso,hidden,link,defaultvalue,maxlength from marc_subfield_structure where frameworkcode=? > |, undef, $newframeworkcode, $oldframeworkcode ); > } >- >diff --git a/admin/matching-rules.pl b/admin/matching-rules.pl >index 3cdbbb7b6f3..3f26247e3fb 100755 >--- a/admin/matching-rules.pl >+++ b/admin/matching-rules.pl >@@ -22,7 +22,6 @@ use Modern::Perl; > > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::Matcher qw/valid_normalization_routines/; > >diff --git a/admin/overdrive.pl b/admin/overdrive.pl >index a961b893373..22ef1a36acd 100755 >--- a/admin/overdrive.pl >+++ b/admin/overdrive.pl >@@ -20,7 +20,6 @@ > use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > > use Koha::Libraries; >diff --git a/admin/preferences.pl b/admin/preferences.pl >index 45a5891c623..6ca2b404755 100755 >--- a/admin/preferences.pl >+++ b/admin/preferences.pl >@@ -26,7 +26,6 @@ use C4::Koha qw( getallthemes ); > use C4::Languages qw( getTranslatedLanguages ); > use C4::ClassSource qw( GetClassSources GetClassSource ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Templates; > use Koha::Acquisition::Currencies; > use Koha::Database::Columns; > use IO::File; >diff --git a/admin/searchengine/elasticsearch/mappings.pl b/admin/searchengine/elasticsearch/mappings.pl >index e4d5ab10ea2..33772df20a3 100755 >--- a/admin/searchengine/elasticsearch/mappings.pl >+++ b/admin/searchengine/elasticsearch/mappings.pl >@@ -21,7 +21,6 @@ use Scalar::Util qw( looks_like_number ); > use List::Util qw( first ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); >-use C4::Log; > > use Koha::SearchEngine::Elasticsearch; > use Koha::SearchEngine::Elasticsearch::QueryBuilder; >diff --git a/admin/sms_providers.pl b/admin/sms_providers.pl >index 1677576d941..6c08d153466 100755 >--- a/admin/sms_providers.pl >+++ b/admin/sms_providers.pl >@@ -21,7 +21,6 @@ use Modern::Perl; > > use CGI; > >-use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > >diff --git a/admin/systempreferences.pl b/admin/systempreferences.pl >index 1eb54552b12..da77e4d3ddb 100755 >--- a/admin/systempreferences.pl >+++ b/admin/systempreferences.pl >@@ -451,4 +451,3 @@ sub get_local_prefs { > > return @names; > } >- >diff --git a/admin/z3950servers.pl b/admin/z3950servers.pl >index d7dd4161c5b..3788842f7ad 100755 >--- a/admin/z3950servers.pl >+++ b/admin/z3950servers.pl >@@ -26,7 +26,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use Koha::Database; >diff --git a/authorities/authorities-home.pl b/authorities/authorities-home.pl >index 2be064c1c21..fb6f1f9a1f8 100755 >--- a/authorities/authorities-home.pl >+++ b/authorities/authorities-home.pl >@@ -27,8 +27,6 @@ use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit pagination_bar output_html_with_http_headers ); > use C4::AuthoritiesMarc qw( DelAuthority ); >-use C4::Search::History; >-use C4::Languages; > > use Koha::Authority::Types; > use Koha::SearchEngine::Search; >diff --git a/authorities/detail-biblio-search.pl b/authorities/detail-biblio-search.pl >index 2e8ea40e9af..8203553df15 100755 >--- a/authorities/detail-biblio-search.pl >+++ b/authorities/detail-biblio-search.pl >@@ -123,4 +123,3 @@ $template->param( > index => $index, > ); > output_html_with_http_headers $query, $cookie, $template->output; >- >diff --git a/authorities/detail.pl b/authorities/detail.pl >index a95460958b3..2fef05aad1a 100755 >--- a/authorities/detail.pl >+++ b/authorities/detail.pl >@@ -43,7 +43,6 @@ use C4::AuthoritiesMarc qw( GetAuthority GenerateHierarchy GetTagsLabels ); > use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use CGI qw ( -utf8 ); >-use C4::Koha; > use Koha::Authorities; > > use Koha::Authority::Types; >@@ -236,4 +235,3 @@ $template->param( > > $template->{VARS}->{marcflavour} = C4::Context->preference("marcflavour"); > output_html_with_http_headers $query, $cookie, $template->output; >- >diff --git a/authorities/export.pl b/authorities/export.pl >index 0703da840b6..a8d5b368eb8 100755 >--- a/authorities/export.pl >+++ b/authorities/export.pl >@@ -1,9 +1,7 @@ > #!/usr/bin/perl > use Modern::Perl; > >-use C4::Record; > use C4::Auth qw( get_template_and_user ); >-use C4::Output; > use C4::AuthoritiesMarc qw( GetAuthority ); > use CGI qw ( -utf8 ); > >diff --git a/authorities/merge_ajax.pl b/authorities/merge_ajax.pl >index b4e489be5e1..4e0ad6eee91 100755 >--- a/authorities/merge_ajax.pl >+++ b/authorities/merge_ajax.pl >@@ -6,7 +6,6 @@ use CGI qw ( -utf8 ); > use CGI::Cookie; # need to check cookies before CGI parses the POST request > use JSON qw( encode_json ); > >-use C4::Context; > use C4::Auth qw( check_cookie_auth ); > use C4::AuthoritiesMarc qw( GetTagsLabels ); > >diff --git a/authorities/ysearch.pl b/authorities/ysearch.pl >index 3a58fe97581..682128a087c 100755 >--- a/authorities/ysearch.pl >+++ b/authorities/ysearch.pl >@@ -31,7 +31,6 @@ use CGI qw ( -utf8 ); > use Modern::Perl; > use JSON qw( to_json ); > >-use C4::Context; > use C4::Charset qw( nsb_clean ); > use C4::Auth qw( check_cookie_auth ); > use C4::Output qw( output_with_http_headers ); >diff --git a/basket/basket.pl b/basket/basket.pl >index 6f93e5a82b8..699856d62db 100755 >--- a/basket/basket.pl >+++ b/basket/basket.pl >@@ -18,7 +18,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Koha; > use C4::Biblio qw( > GetMarcSeries > GetMarcSubjects >diff --git a/basket/downloadcart.pl b/basket/downloadcart.pl >index 806ad4959fe..46d73cdf966 100755 >--- a/basket/downloadcart.pl >+++ b/basket/downloadcart.pl >@@ -24,7 +24,6 @@ use Encode qw( encode ); > > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Record; > use C4::Ris qw( marc2ris ); > > use Koha::CsvProfiles; >diff --git a/basket/sendbasket.pl b/basket/sendbasket.pl >index c5bf9822fb6..f8d2be4dc10 100755 >--- a/basket/sendbasket.pl >+++ b/basket/sendbasket.pl >@@ -28,7 +28,6 @@ use C4::Biblio qw( > use C4::Items qw( GetItemsInfo ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit output_html_with_http_headers ); >-use C4::Templates; > use Koha::Biblios; > use Koha::Email; > use Koha::Token; >diff --git a/catalogue/ISBDdetail.pl b/catalogue/ISBDdetail.pl >index d7431e8bc8d..6c5436c1f61 100755 >--- a/catalogue/ISBDdetail.pl >+++ b/catalogue/ISBDdetail.pl >@@ -180,4 +180,3 @@ my $holds = $biblio->holds; > $template->param( holdcount => $holds->count ); > > output_html_with_http_headers $query, $cookie, $template->output; >- >diff --git a/catalogue/MARCdetail.pl b/catalogue/MARCdetail.pl >index 92ec1141094..edfb6822f4c 100755 >--- a/catalogue/MARCdetail.pl >+++ b/catalogue/MARCdetail.pl >@@ -50,7 +50,6 @@ use HTML::Entities; > use C4::Auth qw( get_template_and_user ); > use C4::Context; > use C4::Output qw( output_html_with_http_headers ); >-use C4::Koha; > use C4::Biblio qw( > GetAuthorisedValueDesc > GetBiblioData >diff --git a/catalogue/detail.pl b/catalogue/detail.pl >index 29d816aa938..96c3f462332 100755 >--- a/catalogue/detail.pl >+++ b/catalogue/detail.pl >@@ -35,7 +35,6 @@ use C4::Output qw( output_html_with_http_headers ); > use C4::Biblio qw( GetBiblioData GetFrameworkCode ); > use C4::Items qw( GetAnalyticsCount GetHostItemsInfo GetItemsInfo ); > use C4::Circulation qw( GetTransfers ); >-use C4::Reserves; > use C4::Serials qw( CountSubscriptionFromBiblionumber SearchSubscriptions GetLatestSerials ); > use C4::XISBN qw( get_xisbns ); > use C4::External::Amazon qw( get_amazon_tld ); >diff --git a/catalogue/export.pl b/catalogue/export.pl >index ff02cea67f0..186860dceba 100755 >--- a/catalogue/export.pl >+++ b/catalogue/export.pl >@@ -1,9 +1,7 @@ > #!/usr/bin/perl > use Modern::Perl; > >-use C4::Record; > use C4::Auth qw( get_template_and_user ); >-use C4::Output; > use C4::Biblio qw( GetMarcControlnumber ); > use CGI qw ( -utf8 ); > use C4::Ris qw( marc2ris ); >diff --git a/catalogue/item-export.pl b/catalogue/item-export.pl >index 52f6b84a4c6..bce6ff47713 100755 >--- a/catalogue/item-export.pl >+++ b/catalogue/item-export.pl >@@ -22,7 +22,6 @@ use Modern::Perl; > use CGI; > > use C4::Auth qw( get_template_and_user ); >-use C4::Output; > > my $cgi = CGI->new; > >diff --git a/catalogue/moredetail.pl b/catalogue/moredetail.pl >index 834678ec3c9..bf8a011e3db 100755 >--- a/catalogue/moredetail.pl >+++ b/catalogue/moredetail.pl >@@ -309,4 +309,3 @@ my $holds = $biblio->holds; > $template->param( holdcount => $holds->count ); > > output_html_with_http_headers $query, $cookie, $template->output; >- >diff --git a/catalogue/search-history.pl b/catalogue/search-history.pl >index 42bef7cfd46..230bdb103c7 100755 >--- a/catalogue/search-history.pl >+++ b/catalogue/search-history.pl >@@ -22,7 +22,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > > use C4::Auth qw( get_template_and_user ); >-use C4::Search::History; > use C4::Output qw( output_html_with_http_headers ); > > my $cgi = CGI->new; >diff --git a/catalogue/showmarc.pl b/catalogue/showmarc.pl >index 207710fded4..67277f91f85 100755 >--- a/catalogue/showmarc.pl >+++ b/catalogue/showmarc.pl >@@ -31,7 +31,6 @@ use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); > use C4::Biblio qw( GetXmlBiblio ); >-use C4::XSLT; > > use Koha::Biblios; > use Koha::Import::Records; >diff --git a/catalogue/updateitem.pl b/catalogue/updateitem.pl >index 6d9022ff871..7a80b5c052b 100755 >--- a/catalogue/updateitem.pl >+++ b/catalogue/updateitem.pl >@@ -21,9 +21,7 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw( checkauth ); > use C4::Context; >-use C4::Output; > use C4::Circulation qw( LostItem ); >-use C4::Reserves; > > my $cgi= CGI->new; > >diff --git a/cataloguing/addbooks.pl b/cataloguing/addbooks.pl >index 2206c5e143b..df7b662fb01 100755 >--- a/cataloguing/addbooks.pl >+++ b/cataloguing/addbooks.pl >@@ -31,7 +31,6 @@ use C4::Auth qw( get_template_and_user ); > use C4::Breeding qw( BreedingSearch ); > use C4::Output qw( output_html_with_http_headers pagination_bar ); > use C4::Koha qw( getnbpages ); >-use C4::Languages; > use C4::Search qw( searchResults z3950_search_args ); > > use Koha::BiblioFrameworks; >@@ -136,4 +135,3 @@ $template->param( > ); > > output_html_with_http_headers $input, $cookie, $template->output; >- >diff --git a/cataloguing/additem.pl b/cataloguing/additem.pl >index 49571e790da..8cbb7d3d77e 100755 >--- a/cataloguing/additem.pl >+++ b/cataloguing/additem.pl >@@ -34,7 +34,6 @@ use C4::Biblio qw( > use C4::Context; > use C4::Circulation qw( barcodedecode LostItem ); > use C4::Barcodes; >-use C4::Barcodes::ValueBuilder; > use Koha::DateUtils qw( dt_from_string ); > use Koha::Biblios; > use Koha::Items; >@@ -46,7 +45,6 @@ use Koha::SearchEngine::Indexer; > use C4::Search qw( enabled_staff_search_views ); > use Storable qw( freeze thaw ); > use URI::Escape qw( uri_escape_utf8 ); >-use C4::Members; > use Koha::UI::Form::Builder::Item; > > use MARC::File::XML; >diff --git a/cataloguing/merge_ajax.pl b/cataloguing/merge_ajax.pl >index ca4543690e3..5230295e382 100755 >--- a/cataloguing/merge_ajax.pl >+++ b/cataloguing/merge_ajax.pl >@@ -6,7 +6,6 @@ use CGI qw ( -utf8 ); > use CGI::Cookie; # need to check cookies before CGI parses the POST request > use JSON qw( encode_json ); > >-use C4::Context; > use C4::Biblio qw( GetMarcStructure ); > use C4::Auth qw( check_cookie_auth ); > >diff --git a/cataloguing/value_builder/barcode.pl b/cataloguing/value_builder/barcode.pl >index 8fcd45beae8..3d1c4897420 100755 >--- a/cataloguing/value_builder/barcode.pl >+++ b/cataloguing/value_builder/barcode.pl >@@ -23,7 +23,6 @@ > use Modern::Perl; > > use C4::Context; >-use C4::Barcodes::ValueBuilder; > use C4::Biblio qw( GetMarcFromKohaField ); > use Koha::DateUtils qw( dt_from_string output_pref ); > >diff --git a/cataloguing/value_builder/barcode_manual.pl b/cataloguing/value_builder/barcode_manual.pl >index d2b7f7a4149..ffb45ae251f 100755 >--- a/cataloguing/value_builder/barcode_manual.pl >+++ b/cataloguing/value_builder/barcode_manual.pl >@@ -23,7 +23,6 @@ > use Modern::Perl; > > use C4::Context; >-use C4::Barcodes::ValueBuilder; > use C4::Biblio qw( GetMarcFromKohaField ); > use Koha::DateUtils qw( dt_from_string output_pref ); > >diff --git a/cataloguing/value_builder/marc21_field_006.pl b/cataloguing/value_builder/marc21_field_006.pl >index b4f28521f96..dc7cccc4517 100755 >--- a/cataloguing/value_builder/marc21_field_006.pl >+++ b/cataloguing/value_builder/marc21_field_006.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > use XML::LibXML; >diff --git a/cataloguing/value_builder/marc21_field_007.pl b/cataloguing/value_builder/marc21_field_007.pl >index 093653d1bfb..8b64a3b6756 100755 >--- a/cataloguing/value_builder/marc21_field_007.pl >+++ b/cataloguing/value_builder/marc21_field_007.pl >@@ -25,7 +25,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > my $builder = sub { >diff --git a/cataloguing/value_builder/marc21_field_008.pl b/cataloguing/value_builder/marc21_field_008.pl >index 08b1540f69e..fe04c975b82 100755 >--- a/cataloguing/value_builder/marc21_field_008.pl >+++ b/cataloguing/value_builder/marc21_field_008.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > use XML::LibXML; >diff --git a/cataloguing/value_builder/marc21_field_008_authorities.pl b/cataloguing/value_builder/marc21_field_008_authorities.pl >index e7a7f168d88..952cbcbba31 100755 >--- a/cataloguing/value_builder/marc21_field_008_authorities.pl >+++ b/cataloguing/value_builder/marc21_field_008_authorities.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > use Koha::Util::FrameworkPlugin qw|date_entered|; > >diff --git a/cataloguing/value_builder/marc21_field_008_classifications.pl b/cataloguing/value_builder/marc21_field_008_classifications.pl >index c5979f8f7e4..9291ea17582 100755 >--- a/cataloguing/value_builder/marc21_field_008_classifications.pl >+++ b/cataloguing/value_builder/marc21_field_008_classifications.pl >@@ -18,9 +18,7 @@ > use Modern::Perl; > use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); >-use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > use Koha::Util::FrameworkPlugin qw|date_entered|; > >diff --git a/cataloguing/value_builder/marc21_field_245h.pl b/cataloguing/value_builder/marc21_field_245h.pl >index 667ae2249ac..c4bcc1d7e37 100755 >--- a/cataloguing/value_builder/marc21_field_245h.pl >+++ b/cataloguing/value_builder/marc21_field_245h.pl >@@ -20,7 +20,6 @@ > # along with Koha; if not, see <http://www.gnu.org/licenses>. > > use Modern::Perl; >-use C4::Context; > > my $builder = sub { > my ( $params ) = @_; >diff --git a/cataloguing/value_builder/marc21_field_260b.pl b/cataloguing/value_builder/marc21_field_260b.pl >index 406feb41221..3bb957abbba 100755 >--- a/cataloguing/value_builder/marc21_field_260b.pl >+++ b/cataloguing/value_builder/marc21_field_260b.pl >@@ -25,7 +25,6 @@ biblioitems.publishercode > =cut > > use Modern::Perl; >-use C4::Context; > > my $builder = sub { > my ( $params ) = @_; >diff --git a/cataloguing/value_builder/marc21_leader_authorities.pl b/cataloguing/value_builder/marc21_leader_authorities.pl >index 04a55ea28bf..b49926d48ea 100755 >--- a/cataloguing/value_builder/marc21_leader_authorities.pl >+++ b/cataloguing/value_builder/marc21_leader_authorities.pl >@@ -25,7 +25,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > my $builder = sub { >diff --git a/cataloguing/value_builder/unimarc_field_105.pl b/cataloguing/value_builder/unimarc_field_105.pl >index f0ff7f2dd8b..6c27f5dedf0 100755 >--- a/cataloguing/value_builder/unimarc_field_105.pl >+++ b/cataloguing/value_builder/unimarc_field_105.pl >@@ -26,7 +26,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_106.pl b/cataloguing/value_builder/unimarc_field_106.pl >index 7b91dd4410b..cc9478c4c8d 100755 >--- a/cataloguing/value_builder/unimarc_field_106.pl >+++ b/cataloguing/value_builder/unimarc_field_106.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_110.pl b/cataloguing/value_builder/unimarc_field_110.pl >index b3e88e2c207..03eafcb7279 100755 >--- a/cataloguing/value_builder/unimarc_field_110.pl >+++ b/cataloguing/value_builder/unimarc_field_110.pl >@@ -26,7 +26,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_115a.pl b/cataloguing/value_builder/unimarc_field_115a.pl >index fc0223a3e65..0dea3c3c1d0 100755 >--- a/cataloguing/value_builder/unimarc_field_115a.pl >+++ b/cataloguing/value_builder/unimarc_field_115a.pl >@@ -25,7 +25,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_115b.pl b/cataloguing/value_builder/unimarc_field_115b.pl >index 901e73eb3e0..e4e49dd3abb 100755 >--- a/cataloguing/value_builder/unimarc_field_115b.pl >+++ b/cataloguing/value_builder/unimarc_field_115b.pl >@@ -25,7 +25,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_116.pl b/cataloguing/value_builder/unimarc_field_116.pl >index 8781a5da2f4..fd0ea2183d3 100755 >--- a/cataloguing/value_builder/unimarc_field_116.pl >+++ b/cataloguing/value_builder/unimarc_field_116.pl >@@ -25,7 +25,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_117.pl b/cataloguing/value_builder/unimarc_field_117.pl >index 92868261458..4849d769ffb 100755 >--- a/cataloguing/value_builder/unimarc_field_117.pl >+++ b/cataloguing/value_builder/unimarc_field_117.pl >@@ -25,7 +25,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_120.pl b/cataloguing/value_builder/unimarc_field_120.pl >index 4c4d06139d2..5a836169f24 100755 >--- a/cataloguing/value_builder/unimarc_field_120.pl >+++ b/cataloguing/value_builder/unimarc_field_120.pl >@@ -26,7 +26,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_121a.pl b/cataloguing/value_builder/unimarc_field_121a.pl >index e1967e38ca6..dfe700b6bb8 100755 >--- a/cataloguing/value_builder/unimarc_field_121a.pl >+++ b/cataloguing/value_builder/unimarc_field_121a.pl >@@ -25,7 +25,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_121b.pl b/cataloguing/value_builder/unimarc_field_121b.pl >index bcdc22aac0a..9d056de9799 100755 >--- a/cataloguing/value_builder/unimarc_field_121b.pl >+++ b/cataloguing/value_builder/unimarc_field_121b.pl >@@ -23,7 +23,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_122.pl b/cataloguing/value_builder/unimarc_field_122.pl >index ecedc74cc23..235b14756e5 100755 >--- a/cataloguing/value_builder/unimarc_field_122.pl >+++ b/cataloguing/value_builder/unimarc_field_122.pl >@@ -23,7 +23,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_123a.pl b/cataloguing/value_builder/unimarc_field_123a.pl >index 3d3fa4f56f8..88c536c21ea 100755 >--- a/cataloguing/value_builder/unimarc_field_123a.pl >+++ b/cataloguing/value_builder/unimarc_field_123a.pl >@@ -23,7 +23,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_123d.pl b/cataloguing/value_builder/unimarc_field_123d.pl >index 50865fb2eba..6ca8a9840b6 100755 >--- a/cataloguing/value_builder/unimarc_field_123d.pl >+++ b/cataloguing/value_builder/unimarc_field_123d.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_123e.pl b/cataloguing/value_builder/unimarc_field_123e.pl >index 50865fb2eba..6ca8a9840b6 100755 >--- a/cataloguing/value_builder/unimarc_field_123e.pl >+++ b/cataloguing/value_builder/unimarc_field_123e.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_123f.pl b/cataloguing/value_builder/unimarc_field_123f.pl >index 4fb190e52a8..d097b4a88bf 100755 >--- a/cataloguing/value_builder/unimarc_field_123f.pl >+++ b/cataloguing/value_builder/unimarc_field_123f.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_123g.pl b/cataloguing/value_builder/unimarc_field_123g.pl >index 50865fb2eba..6ca8a9840b6 100755 >--- a/cataloguing/value_builder/unimarc_field_123g.pl >+++ b/cataloguing/value_builder/unimarc_field_123g.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_123i.pl b/cataloguing/value_builder/unimarc_field_123i.pl >index a62c23ab37b..7fabb7ca394 100755 >--- a/cataloguing/value_builder/unimarc_field_123i.pl >+++ b/cataloguing/value_builder/unimarc_field_123i.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_123j.pl b/cataloguing/value_builder/unimarc_field_123j.pl >index aa2a3c31e07..02e74295ac2 100755 >--- a/cataloguing/value_builder/unimarc_field_123j.pl >+++ b/cataloguing/value_builder/unimarc_field_123j.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_124.pl b/cataloguing/value_builder/unimarc_field_124.pl >index 82ab72d4f41..5b0a1e5a914 100755 >--- a/cataloguing/value_builder/unimarc_field_124.pl >+++ b/cataloguing/value_builder/unimarc_field_124.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_124a.pl b/cataloguing/value_builder/unimarc_field_124a.pl >index ef2e7dccb70..0b4921ecf83 100755 >--- a/cataloguing/value_builder/unimarc_field_124a.pl >+++ b/cataloguing/value_builder/unimarc_field_124a.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_124b.pl b/cataloguing/value_builder/unimarc_field_124b.pl >index 9008ea673c5..a0c2d0e0717 100755 >--- a/cataloguing/value_builder/unimarc_field_124b.pl >+++ b/cataloguing/value_builder/unimarc_field_124b.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_124c.pl b/cataloguing/value_builder/unimarc_field_124c.pl >index 3433ea9a93c..c5d1236ee3e 100755 >--- a/cataloguing/value_builder/unimarc_field_124c.pl >+++ b/cataloguing/value_builder/unimarc_field_124c.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_124d.pl b/cataloguing/value_builder/unimarc_field_124d.pl >index e65d93eaa2c..59d019bf792 100755 >--- a/cataloguing/value_builder/unimarc_field_124d.pl >+++ b/cataloguing/value_builder/unimarc_field_124d.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_124e.pl b/cataloguing/value_builder/unimarc_field_124e.pl >index 11d1aabfa34..23d28119205 100755 >--- a/cataloguing/value_builder/unimarc_field_124e.pl >+++ b/cataloguing/value_builder/unimarc_field_124e.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_124f.pl b/cataloguing/value_builder/unimarc_field_124f.pl >index 96df17be7a7..20c15d04603 100755 >--- a/cataloguing/value_builder/unimarc_field_124f.pl >+++ b/cataloguing/value_builder/unimarc_field_124f.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_124g.pl b/cataloguing/value_builder/unimarc_field_124g.pl >index 4dfe3a7d9f9..c6df2c60333 100755 >--- a/cataloguing/value_builder/unimarc_field_124g.pl >+++ b/cataloguing/value_builder/unimarc_field_124g.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_125.pl b/cataloguing/value_builder/unimarc_field_125.pl >index fa312008618..47b48393d7f 100755 >--- a/cataloguing/value_builder/unimarc_field_125.pl >+++ b/cataloguing/value_builder/unimarc_field_125.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > =head1 DESCRIPTION >diff --git a/cataloguing/value_builder/unimarc_field_125a.pl b/cataloguing/value_builder/unimarc_field_125a.pl >index c4585d7e24e..a20c2e22f79 100755 >--- a/cataloguing/value_builder/unimarc_field_125a.pl >+++ b/cataloguing/value_builder/unimarc_field_125a.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_125b.pl b/cataloguing/value_builder/unimarc_field_125b.pl >index 2429d3e48bd..678a4cc422f 100755 >--- a/cataloguing/value_builder/unimarc_field_125b.pl >+++ b/cataloguing/value_builder/unimarc_field_125b.pl >@@ -25,7 +25,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_126.pl b/cataloguing/value_builder/unimarc_field_126.pl >index 82ab72d4f41..5b0a1e5a914 100755 >--- a/cataloguing/value_builder/unimarc_field_126.pl >+++ b/cataloguing/value_builder/unimarc_field_126.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_126a.pl b/cataloguing/value_builder/unimarc_field_126a.pl >index d1cfd84c4c9..505ad3079b4 100755 >--- a/cataloguing/value_builder/unimarc_field_126a.pl >+++ b/cataloguing/value_builder/unimarc_field_126a.pl >@@ -25,7 +25,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_126b.pl b/cataloguing/value_builder/unimarc_field_126b.pl >index 79778cfe44d..7b395b3c3bc 100755 >--- a/cataloguing/value_builder/unimarc_field_126b.pl >+++ b/cataloguing/value_builder/unimarc_field_126b.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_127.pl b/cataloguing/value_builder/unimarc_field_127.pl >index 85adba0dad0..e1f65b25c0e 100755 >--- a/cataloguing/value_builder/unimarc_field_127.pl >+++ b/cataloguing/value_builder/unimarc_field_127.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_128a.pl b/cataloguing/value_builder/unimarc_field_128a.pl >index 9f235e1e5d4..ac83096eb95 100755 >--- a/cataloguing/value_builder/unimarc_field_128a.pl >+++ b/cataloguing/value_builder/unimarc_field_128a.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_128b.pl b/cataloguing/value_builder/unimarc_field_128b.pl >index 7d2e215fb8e..1c5f07217ad 100755 >--- a/cataloguing/value_builder/unimarc_field_128b.pl >+++ b/cataloguing/value_builder/unimarc_field_128b.pl >@@ -25,7 +25,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_128c.pl b/cataloguing/value_builder/unimarc_field_128c.pl >index a0ff9ddd4e4..11d173d976e 100755 >--- a/cataloguing/value_builder/unimarc_field_128c.pl >+++ b/cataloguing/value_builder/unimarc_field_128c.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_130.pl b/cataloguing/value_builder/unimarc_field_130.pl >index 411eb80a8ea..04e05570370 100755 >--- a/cataloguing/value_builder/unimarc_field_130.pl >+++ b/cataloguing/value_builder/unimarc_field_130.pl >@@ -26,7 +26,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_135a.pl b/cataloguing/value_builder/unimarc_field_135a.pl >index db5bf3c8b07..8ac0920b1db 100755 >--- a/cataloguing/value_builder/unimarc_field_135a.pl >+++ b/cataloguing/value_builder/unimarc_field_135a.pl >@@ -25,7 +25,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_140.pl b/cataloguing/value_builder/unimarc_field_140.pl >index a5b303158bb..c6b270bde99 100755 >--- a/cataloguing/value_builder/unimarc_field_140.pl >+++ b/cataloguing/value_builder/unimarc_field_140.pl >@@ -26,7 +26,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_141.pl b/cataloguing/value_builder/unimarc_field_141.pl >index a7a28ea3060..db4ad100731 100755 >--- a/cataloguing/value_builder/unimarc_field_141.pl >+++ b/cataloguing/value_builder/unimarc_field_141.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_210c.pl b/cataloguing/value_builder/unimarc_field_210c.pl >index c9e1ebbcf80..0aefaaa095a 100755 >--- a/cataloguing/value_builder/unimarc_field_210c.pl >+++ b/cataloguing/value_builder/unimarc_field_210c.pl >@@ -24,7 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use C4::Context; > use C4::Output qw( pagination_bar output_html_with_http_headers ); > use CGI qw ( -utf8 ); >-use C4::Search; > use C4::Koha qw( getnbpages ); > use C4::AuthoritiesMarc qw( GetAuthority SearchAuthorities ); > >diff --git a/cataloguing/value_builder/unimarc_field_225a_bis.pl b/cataloguing/value_builder/unimarc_field_225a_bis.pl >index 1ca62775a99..9ecf01d2f41 100755 >--- a/cataloguing/value_builder/unimarc_field_225a_bis.pl >+++ b/cataloguing/value_builder/unimarc_field_225a_bis.pl >@@ -26,7 +26,6 @@ use Modern::Perl; > > use C4::Auth qw( get_template_and_user ); > use CGI qw( -utf8 ); >-use C4::Context; > > use C4::Output qw( output_html_with_http_headers ); > >diff --git a/cataloguing/value_builder/unimarc_field_686a.pl b/cataloguing/value_builder/unimarc_field_686a.pl >index d766b038c63..b35373a87c1 100755 >--- a/cataloguing/value_builder/unimarc_field_686a.pl >+++ b/cataloguing/value_builder/unimarc_field_686a.pl >@@ -23,7 +23,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_field_700-4.pl b/cataloguing/value_builder/unimarc_field_700-4.pl >index 0d083e9d399..d90311e8ab1 100755 >--- a/cataloguing/value_builder/unimarc_field_700-4.pl >+++ b/cataloguing/value_builder/unimarc_field_700-4.pl >@@ -25,7 +25,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_leader.pl b/cataloguing/value_builder/unimarc_leader.pl >index 838f5a88f09..1296ce57c5c 100755 >--- a/cataloguing/value_builder/unimarc_leader.pl >+++ b/cataloguing/value_builder/unimarc_leader.pl >@@ -25,7 +25,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > sub plugin_javascript { >diff --git a/cataloguing/value_builder/unimarc_leader_authorities.pl b/cataloguing/value_builder/unimarc_leader_authorities.pl >index 365a44ddbb6..555c309ff0f 100755 >--- a/cataloguing/value_builder/unimarc_leader_authorities.pl >+++ b/cataloguing/value_builder/unimarc_leader_authorities.pl >@@ -22,7 +22,6 @@ use Modern::Perl; > use Koha::Util::FrameworkPlugin qw(wrapper); > use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > > >diff --git a/cataloguing/z3950_search.pl b/cataloguing/z3950_search.pl >index 8acc92c25d0..1eaa2031dee 100755 >--- a/cataloguing/z3950_search.pl >+++ b/cataloguing/z3950_search.pl >@@ -23,7 +23,6 @@ use CGI qw ( -utf8 ); > > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Context; > use C4::Breeding qw( Z3950Search ); > > my $input = CGI->new; >diff --git a/changelanguage.pl b/changelanguage.pl >index 48d8c4657f0..fb83f498753 100755 >--- a/changelanguage.pl >+++ b/changelanguage.pl >@@ -17,7 +17,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Templates; > use Koha::Util::Navigation; > > my $query = CGI->new; >diff --git a/circ/add_message.pl b/circ/add_message.pl >index ee90af35227..65605a86cb2 100755 >--- a/circ/add_message.pl >+++ b/circ/add_message.pl >@@ -22,7 +22,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > > use C4::Auth qw( get_template_and_user ); >-use C4::Output; > use Koha::Patron::Message; > > my $input = CGI->new; >diff --git a/circ/article-request-slip.pl b/circ/article-request-slip.pl >index f31eac72d06..aec7adbe930 100755 >--- a/circ/article-request-slip.pl >+++ b/circ/article-request-slip.pl >@@ -21,10 +21,8 @@ use Modern::Perl; > > use CGI qw( -utf8 ); > >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); >-use C4::Letters; > use Koha::ArticleRequests; > use Koha::Patrons; > >diff --git a/circ/branchtransfers.pl b/circ/branchtransfers.pl >index cb10b5b0f16..c15bcfea795 100755 >--- a/circ/branchtransfers.pl >+++ b/circ/branchtransfers.pl >@@ -26,7 +26,6 @@ use C4::Circulation qw( transferbook barcodedecode ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Reserves qw( ModReserve ModReserveAffect ); > use C4::Auth qw( get_session get_template_and_user ); >-use C4::Members; > use Koha::BiblioFrameworks; > use Koha::AuthorisedValues; > use Koha::Holds; >@@ -246,4 +245,3 @@ $template->param( > $template->param( fast_cataloging => 1 ) if Koha::BiblioFrameworks->find( 'FA' ); > > output_html_with_http_headers $query, $cookie, $template->output; >- >diff --git a/circ/checkout-notes.pl b/circ/checkout-notes.pl >index 9f5e1c7bdfd..70a89e983ad 100755 >--- a/circ/checkout-notes.pl >+++ b/circ/checkout-notes.pl >@@ -20,7 +20,6 @@ > use Modern::Perl; > > use CGI qw ( -utf8 ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); > use Koha::Checkouts; >diff --git a/circ/circulation.pl b/circ/circulation.pl >index d4b5dcfe945..b3a9ac3c221 100755 >--- a/circ/circulation.pl >+++ b/circ/circulation.pl >@@ -32,12 +32,9 @@ use DateTime::Duration; > use Scalar::Util qw( looks_like_number ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); > use C4::Auth qw( get_session get_template_and_user ); >-use C4::Koha; > use C4::Circulation qw( barcodedecode CanBookBeIssued AddIssue ); >-use C4::Members; > use C4::Biblio qw( TransformMarcToKoha ); > use C4::Search qw( new_record_from_zebra ); >-use C4::Reserves; > use Koha::Holds; > use C4::Context; > use CGI::Session; >diff --git a/circ/del_message.pl b/circ/del_message.pl >index 3e7c7756662..7179096e99e 100755 >--- a/circ/del_message.pl >+++ b/circ/del_message.pl >@@ -22,7 +22,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > > use C4::Auth qw( get_template_and_user ); >-use C4::Output; > use Koha::Patron::Messages; > > my $input = CGI->new; >diff --git a/circ/hold-transfer-slip.pl b/circ/hold-transfer-slip.pl >index 61aef56c4cd..032e803742b 100755 >--- a/circ/hold-transfer-slip.pl >+++ b/circ/hold-transfer-slip.pl >@@ -54,4 +54,3 @@ $template->param( caller => 'hold-transfer' ); > $template->param( plain => !$is_html ); > > output_html_with_http_headers $input, $cookie, $template->output; >- >diff --git a/circ/pendingreserves.pl b/circ/pendingreserves.pl >index a438557ed1a..17e24d2fcad 100755 >--- a/circ/pendingreserves.pl >+++ b/circ/pendingreserves.pl >@@ -28,7 +28,6 @@ use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); >-use C4::Items; > use C4::Reserves qw( ModReserveCancelAll ); > use Koha::Biblios; > use Koha::DateUtils qw( dt_from_string ); >diff --git a/circ/returns.pl b/circ/returns.pl >index ac3260a5e92..7743c04f446 100755 >--- a/circ/returns.pl >+++ b/circ/returns.pl >@@ -38,11 +38,8 @@ use C4::Auth qw( get_template_and_user get_session haspermission ); > use C4::Circulation qw( barcodedecode GetBranchItemRule AddReturn updateWrongTransfer LostItem ); > use C4::Context; > use C4::Items qw( ModItemTransfer ); >-use C4::Members::Messaging; >-use C4::Members; > use C4::Output qw( output_html_with_http_headers ); > use C4::Reserves qw( ModReserve ModReserveAffect GetOtherReserves ); >-use C4::RotatingCollections; > use Koha::AuthorisedValues; > use Koha::BiblioFrameworks; > use Koha::Calendar; >diff --git a/circ/transferstoreceive.pl b/circ/transferstoreceive.pl >index 939891211dd..d15ad063e1a 100755 >--- a/circ/transferstoreceive.pl >+++ b/circ/transferstoreceive.pl >@@ -24,10 +24,8 @@ use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); > use C4::Circulation qw( GetTransfers GetTransfersFromTo ); >-use C4::Members; > use Date::Calc qw( Add_Delta_Days Date_to_Days Today ); > >-use C4::Reserves; > use Koha::Items; > use Koha::ItemTypes; > use Koha::Libraries; >@@ -138,4 +136,3 @@ $template->param( > $template->param( fast_cataloging => 1 ) if Koha::BiblioFrameworks->find( 'FA' ); > > output_html_with_http_headers $input, $cookie, $template->output; >- >diff --git a/course_reserves/mod_course.pl b/course_reserves/mod_course.pl >index 3abcb9731fa..c83e6f07620 100755 >--- a/course_reserves/mod_course.pl >+++ b/course_reserves/mod_course.pl >@@ -21,8 +21,6 @@ use Modern::Perl; > > use CGI qw ( -utf8 ); > >-use C4::Output; >-use C4::Reserves; > use C4::Auth qw( get_template_and_user ); > > use C4::CourseReserves qw( DelCourse ModCourse ModCourseInstructors ); >diff --git a/docs/CAS/CASProxy/examples/koha_webservice.pl b/docs/CAS/CASProxy/examples/koha_webservice.pl >index da7fc8b10de..46eda2d0042 100755 >--- a/docs/CAS/CASProxy/examples/koha_webservice.pl >+++ b/docs/CAS/CASProxy/examples/koha_webservice.pl >@@ -40,8 +40,6 @@ use Modern::Perl; > binmode(STDOUT, ":encoding(UTF-8)"); > > use C4::Auth qw(check_api_auth); >-use C4::Output; >-use C4::Context; > use CGI qw ( -utf8 ); > > my $cgi = CGI->new; >@@ -58,4 +56,3 @@ if ($status ne 'ok') { > print "Hello World!"; > } > exit 0; >- >diff --git a/docs/CAS/CASProxy/examples/proxy_cas.pl b/docs/CAS/CASProxy/examples/proxy_cas.pl >index c69d197f80e..d6e35a7ef20 100755 >--- a/docs/CAS/CASProxy/examples/proxy_cas.pl >+++ b/docs/CAS/CASProxy/examples/proxy_cas.pl >@@ -85,6 +85,3 @@ if ($cgi->param('ticket')) { > } > > print $cgi->end_html; >- >- >- >diff --git a/docs/CAS/CASProxy/examples/proxy_cas_callback.pl b/docs/CAS/CASProxy/examples/proxy_cas_callback.pl >index 75df85ffd65..1fc84b1068e 100755 >--- a/docs/CAS/CASProxy/examples/proxy_cas_callback.pl >+++ b/docs/CAS/CASProxy/examples/proxy_cas_callback.pl >@@ -58,4 +58,3 @@ if ($cgi->param('pgtId')) { > } > > print $cgi->end_html; >- >diff --git a/help.pl b/help.pl >index 92162539554..694c3f199a8 100755 >--- a/help.pl >+++ b/help.pl >@@ -21,7 +21,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use Koha::Manual; > > my $query = CGI->new; >diff --git a/installer/data/mysql/backfill_statistics.pl b/installer/data/mysql/backfill_statistics.pl >index 8c573cbc548..80b1d5f15e5 100755 >--- a/installer/data/mysql/backfill_statistics.pl >+++ b/installer/data/mysql/backfill_statistics.pl >@@ -103,4 +103,3 @@ foreach (@$nullborrs) { > > print "\nOperations complete.\n"; > (scalar @ARGV) or show_counts; >- >diff --git a/installer/data/mysql/db_revs/211200022.pl b/installer/data/mysql/db_revs/211200022.pl >index 68a49c6346c..03efd00b883 100755 >--- a/installer/data/mysql/db_revs/211200022.pl >+++ b/installer/data/mysql/db_revs/211200022.pl >@@ -13,4 +13,3 @@ return { > }); > }, > }; >- >diff --git a/installer/install.pl b/installer/install.pl >index 063832569c8..26eba4ad2cd 100755 >--- a/installer/install.pl >+++ b/installer/install.pl >@@ -26,7 +26,6 @@ use POSIX; > > use C4::Context; > use C4::Output qw( output_html_with_http_headers ); >-use C4::Templates; > use C4::Languages qw( getAllLanguages getTranslatedLanguages ); > use C4::Installer; > use C4::Installer::PerlModules; >diff --git a/labels/barcode-print.pl b/labels/barcode-print.pl >index 27075215754..8cc795c8772 100755 >--- a/labels/barcode-print.pl >+++ b/labels/barcode-print.pl >@@ -19,7 +19,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Context; > > my $query = CGI->new; > my ( $template, $loggedinuser, $cookie ) = get_template_and_user( >diff --git a/labels/label-create-csv.pl b/labels/label-create-csv.pl >index 8c06a41a0b5..e6ccc525a36 100755 >--- a/labels/label-create-csv.pl >+++ b/labels/label-create-csv.pl >@@ -23,7 +23,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use Text::CSV_XS; > >-use C4::Labels; > > my $cgi = CGI->new; > >diff --git a/labels/label-create-pdf.pl b/labels/label-create-pdf.pl >index f1cd47183c1..95be8f291ca 100755 >--- a/labels/label-create-pdf.pl >+++ b/labels/label-create-pdf.pl >@@ -22,8 +22,6 @@ use Modern::Perl; > > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); >-use C4::Creators; >-use C4::Labels; > > my $cgi = CGI->new; > >diff --git a/labels/label-create-xml.pl b/labels/label-create-xml.pl >index 3962cfb5022..798b81a360e 100755 >--- a/labels/label-create-xml.pl >+++ b/labels/label-create-xml.pl >@@ -23,7 +23,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use XML::Simple; > >-use C4::Labels; > > my $cgi = CGI->new; > >diff --git a/labels/label-edit-batch.pl b/labels/label-edit-batch.pl >index ac2da6392f7..a3051db052a 100755 >--- a/labels/label-edit-batch.pl >+++ b/labels/label-edit-batch.pl >@@ -25,7 +25,6 @@ use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Creators qw( get_label_summary html_table ); >-use C4::Labels; > > use Koha::Items; > >diff --git a/labels/label-edit-layout.pl b/labels/label-edit-layout.pl >index f1fc6878a18..329ad4a1ba3 100755 >--- a/labels/label-edit-layout.pl >+++ b/labels/label-edit-layout.pl >@@ -31,7 +31,6 @@ use C4::Creators qw( > get_label_types > get_text_justification_types > ); >-use C4::Labels; > > my $cgi = CGI->new; > my ( $template, $loggedinuser, $cookie ) = get_template_and_user( >diff --git a/labels/label-edit-profile.pl b/labels/label-edit-profile.pl >index 257bf4382d9..51d10488829 100755 >--- a/labels/label-edit-profile.pl >+++ b/labels/label-edit-profile.pl >@@ -25,7 +25,6 @@ use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Creators qw( get_all_templates get_unit_values ); >-use C4::Labels; > > my $cgi = CGI->new; > my ( $template, $loggedinuser, $cookie ) = get_template_and_user( >diff --git a/labels/label-edit-template.pl b/labels/label-edit-template.pl >index 5765c2e47f9..946582146db 100755 >--- a/labels/label-edit-template.pl >+++ b/labels/label-edit-template.pl >@@ -25,7 +25,6 @@ use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Creators qw( get_all_profiles get_unit_values ); >-use C4::Labels; > > my $cgi = CGI->new; > my ( $template, $loggedinuser, $cookie ) = get_template_and_user( >diff --git a/labels/label-manage.pl b/labels/label-manage.pl >index 01a7d5babe9..5589ba22ec2 100755 >--- a/labels/label-manage.pl >+++ b/labels/label-manage.pl >@@ -31,7 +31,6 @@ use C4::Creators qw( > get_batch_summary > html_table > ); >-use C4::Labels; > > my $cgi = CGI->new; > my ( $template, $loggedinuser, $cookie ) = get_template_and_user( >diff --git a/labels/label-print.pl b/labels/label-print.pl >index f3dd120f18c..99a404d5369 100755 >--- a/labels/label-print.pl >+++ b/labels/label-print.pl >@@ -29,7 +29,6 @@ use C4::Creators::Lib qw( > get_all_templates > get_output_formats > ); >-use C4::Labels::Batch; > > my $cgi = CGI->new; > my ( $template, $loggedinuser, $cookie ) = get_template_and_user( >diff --git a/labels/spinelabel-home.pl b/labels/spinelabel-home.pl >index 3e9f016146a..7472443b63c 100755 >--- a/labels/spinelabel-home.pl >+++ b/labels/spinelabel-home.pl >@@ -19,7 +19,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Context; > > my $query = CGI->new; > my ( $template, $loggedinuser, $cookie ) = get_template_and_user( >diff --git a/mainpage.pl b/mainpage.pl >index f5872e65bbb..157f30d392b 100755 >--- a/mainpage.pl >+++ b/mainpage.pl >@@ -23,7 +23,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); >-use C4::Koha; > use C4::Tags qw( get_count_by_tag_status ); > use Koha::AdditionalContents; > use Koha::Patron::Modifications; >diff --git a/members/accountline-details.pl b/members/accountline-details.pl >index b798ef96477..b7f440cc1dc 100755 >--- a/members/accountline-details.pl >+++ b/members/accountline-details.pl >@@ -22,7 +22,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Context; > use Koha::Patrons; > use Koha::Account::Lines; > >diff --git a/members/boraccount.pl b/members/boraccount.pl >index 83fa43bf653..b799d06a177 100755 >--- a/members/boraccount.pl >+++ b/members/boraccount.pl >@@ -28,8 +28,6 @@ use URI::Escape qw( uri_unescape ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); > use CGI qw ( -utf8 ); >-use C4::Members; >-use C4::Accounts; > use Koha::Cash::Registers; > use Koha::Patrons; > use Koha::Patron::Categories; >diff --git a/members/default_messageprefs.pl b/members/default_messageprefs.pl >index e0b4343b066..06609cf8cc2 100755 >--- a/members/default_messageprefs.pl >+++ b/members/default_messageprefs.pl >@@ -20,7 +20,6 @@ > > use Modern::Perl; > use C4::Service; >-use C4::Form::MessagingPreferences; > > # Simple JSON service to get the default messaging preferences > # for a patron category - used by the patron editing form to >@@ -31,4 +30,3 @@ my ($query, $response) = C4::Service->init(borrowers => 'edit_borrowers'); > my ($categorycode) = C4::Service->require_params('categorycode'); > C4::Form::MessagingPreferences::set_form_values({ categorycode => $categorycode }, $response); > C4::Service->return_success( $response ); >- >diff --git a/members/discharge.pl b/members/discharge.pl >index e0f4b2d8cc2..b8750d07ce0 100755 >--- a/members/discharge.pl >+++ b/members/discharge.pl >@@ -33,9 +33,6 @@ use Carp qw( carp ); > use CGI qw( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); >-use C4::Members; >-use C4::Reserves; >-use C4::Letters; > use Koha::Patron::Discharge; > use Koha::Patrons; > >diff --git a/members/files.pl b/members/files.pl >index 2abfbc71dee..e469c29c8bb 100755 >--- a/members/files.pl >+++ b/members/files.pl >@@ -23,7 +23,6 @@ use CGI qw ( -utf8 ); > > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); >-use C4::Members; > > use Koha::Patrons; > use Koha::Patron::Files; >diff --git a/members/housebound.pl b/members/housebound.pl >index c86fad8b33c..b2b824855e4 100755 >--- a/members/housebound.pl >+++ b/members/housebound.pl >@@ -27,7 +27,6 @@ > use Modern::Perl; > use CGI; > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); > use DateTime; > use Koha::DateUtils qw( dt_from_string ); >diff --git a/members/mancredit.pl b/members/mancredit.pl >index 7ec9b957b21..d6dcd7999af 100755 >--- a/members/mancredit.pl >+++ b/members/mancredit.pl >@@ -27,8 +27,6 @@ use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); > use CGI qw ( -utf8 ); > >-use C4::Members; >-use C4::Accounts; > > use Koha::Items; > use Koha::Patrons; >diff --git a/members/maninvoice.pl b/members/maninvoice.pl >index d194bdd299a..1b544cf4b6a 100755 >--- a/members/maninvoice.pl >+++ b/members/maninvoice.pl >@@ -29,8 +29,6 @@ use URI::Escape qw( uri_escape_utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); > use CGI qw ( -utf8 ); >-use C4::Members; >-use C4::Accounts; > use Koha::Token; > > use Koha::Patrons; >diff --git a/members/member-password.pl b/members/member-password.pl >index d44f29d0f77..929e3e6adc0 100755 >--- a/members/member-password.pl >+++ b/members/member-password.pl >@@ -8,7 +8,6 @@ use Modern::Perl; > > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); >-use C4::Context; > use CGI qw ( -utf8 ); > use Koha::Token; > >diff --git a/members/memberentry.pl b/members/memberentry.pl >index ee44ea68748..8c028e6656d 100755 >--- a/members/memberentry.pl >+++ b/members/memberentry.pl >@@ -31,7 +31,6 @@ use C4::Output qw( output_and_exit output_and_exit_if_error output_html_with_htt > use C4::Members qw( checkcardnumber get_cardnumber_length ); > use C4::Koha qw( GetAuthorisedValues ); > use C4::Letters qw( GetPreparedLetter EnqueueLetter SendQueuedMessages ); >-use C4::Form::MessagingPreferences; > use Koha::AuthUtils; > use Koha::AuthorisedValues; > use Koha::Email; >diff --git a/members/members-home.pl b/members/members-home.pl >index e3b903f463f..b4bf9db50d2 100755 >--- a/members/members-home.pl >+++ b/members/members-home.pl >@@ -22,7 +22,6 @@ use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Context; >-use C4::Members; > use Koha::Patron::Modifications; > use Koha::Libraries; > use Koha::List::Patron qw( GetPatronLists ); >diff --git a/members/members-update-do.pl b/members/members-update-do.pl >index 88d021a3943..df7f414468d 100755 >--- a/members/members-update-do.pl >+++ b/members/members-update-do.pl >@@ -20,8 +20,6 @@ use Modern::Perl; > > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); >-use C4::Output; >-use C4::Context; > use Koha::Patrons; > use Koha::Patron::Modifications; > >diff --git a/members/members-update.pl b/members/members-update.pl >index b34a8b3ca31..585d0719e38 100755 >--- a/members/members-update.pl >+++ b/members/members-update.pl >@@ -23,7 +23,6 @@ use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Context; >-use C4::Members; > use Koha::Patron::Attribute::Types; > use Koha::Patron::Attributes; > use Koha::Patron::Modifications; >diff --git a/members/merge-patrons.pl b/members/merge-patrons.pl >index 5318ff6ff5f..8169bf4a711 100755 >--- a/members/merge-patrons.pl >+++ b/members/merge-patrons.pl >@@ -23,7 +23,6 @@ use Try::Tiny qw( catch try ); > > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Context; > use Koha::Patrons; > > my $cgi = CGI->new; >diff --git a/members/moremember.pl b/members/moremember.pl >index 00e4c8e1af9..b7508e885a8 100755 >--- a/members/moremember.pl >+++ b/members/moremember.pl >@@ -32,7 +32,6 @@ use CGI qw ( -utf8 ); > use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); >-use C4::Form::MessagingPreferences; > use List::MoreUtils qw( uniq ); > use Scalar::Util qw( looks_like_number ); > use Koha::Patron::Attribute::Types; >diff --git a/members/notices.pl b/members/notices.pl >index 806ec4a5a8b..d1e8f81fa1d 100755 >--- a/members/notices.pl >+++ b/members/notices.pl >@@ -23,7 +23,6 @@ use Modern::Perl; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); > use CGI qw ( -utf8 ); >-use C4::Members; > use C4::Letters qw( GetPreparedLetter EnqueueLetter ); > use Koha::Patrons; > use Koha::Patron::Categories; >@@ -122,4 +121,3 @@ $template->param( > sentnotices => 1, > ); > output_html_with_http_headers $input, $cookie, $template->output; >- >diff --git a/members/pay.pl b/members/pay.pl >index 27181164ad1..e7243072cc1 100755 >--- a/members/pay.pl >+++ b/members/pay.pl >@@ -33,11 +33,6 @@ use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); > use CGI qw ( -utf8 ); >-use C4::Members; >-use C4::Accounts; >-use C4::Stats; >-use C4::Koha; >-use C4::Overdues; > use Koha::Patrons; > use Koha::Items; > >diff --git a/members/paycollect.pl b/members/paycollect.pl >index e8301a76604..95eb129bed8 100755 >--- a/members/paycollect.pl >+++ b/members/paycollect.pl >@@ -24,8 +24,6 @@ use CGI qw ( -utf8 ); > use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); >-use C4::Accounts; >-use C4::Koha; > > use Koha::Cash::Registers; > use Koha::Patrons; >diff --git a/members/printfeercpt.pl b/members/printfeercpt.pl >index 6c695e469a2..ffe60222810 100755 >--- a/members/printfeercpt.pl >+++ b/members/printfeercpt.pl >@@ -23,7 +23,6 @@ use Modern::Perl; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); > use CGI qw ( -utf8 ); >-use C4::Letters; > use Koha::Account::Lines; > > my $input = CGI->new; >diff --git a/members/printinvoice.pl b/members/printinvoice.pl >index 7d591c44d23..3f62204469b 100755 >--- a/members/printinvoice.pl >+++ b/members/printinvoice.pl >@@ -23,7 +23,6 @@ use Modern::Perl; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); > use CGI qw ( -utf8 ); >-use C4::Letters; > use Koha::Account::Lines; > > my $input = CGI->new; >diff --git a/members/purchase-suggestions.pl b/members/purchase-suggestions.pl >index 1739e841ae6..486b18eb7d6 100755 >--- a/members/purchase-suggestions.pl >+++ b/members/purchase-suggestions.pl >@@ -21,7 +21,6 @@ use Modern::Perl; > > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); > use Koha::Patrons; > use Koha::Suggestions; >diff --git a/members/readingrec.pl b/members/readingrec.pl >index 0dcdab25ce8..095f34737ee 100755 >--- a/members/readingrec.pl >+++ b/members/readingrec.pl >@@ -101,4 +101,3 @@ $template->param( > loop_reading => $issues > ); > output_html_with_http_headers $input, $cookie, $template->output; >- >diff --git a/members/routing-lists.pl b/members/routing-lists.pl >index 81ad7980ab0..ed4064538dd 100755 >--- a/members/routing-lists.pl >+++ b/members/routing-lists.pl >@@ -21,9 +21,7 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); >-use C4::Members; > use C4::Context; >-use C4::Serials; > use Koha::Patrons; > use CGI::Session; > >diff --git a/members/setstatus.pl b/members/setstatus.pl >index 83ef1590be5..223bdc0fb61 100755 >--- a/members/setstatus.pl >+++ b/members/setstatus.pl >@@ -28,7 +28,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw( checkauth ); > use C4::Context; >-use C4::Members; > use Koha::Patrons; > > >diff --git a/members/statistics.pl b/members/statistics.pl >index e407eaf025b..11264eea50c 100755 >--- a/members/statistics.pl >+++ b/members/statistics.pl >@@ -26,8 +26,6 @@ use Modern::Perl; > > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); >-use C4::Context; >-use C4::Members; > use C4::Members::Statistics qw( > GetPrecedentStateByBorrower > GetTotalIssuesReturnedTodayByBorrower >diff --git a/members/summary-print.pl b/members/summary-print.pl >index 6c6ed923ec3..6b93fd1f262 100755 >--- a/members/summary-print.pl >+++ b/members/summary-print.pl >@@ -21,9 +21,7 @@ use CGI; > > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit_if_error output_and_exit output_html_with_http_headers ); >-use C4::Members; > use C4::Circulation qw( GetIssuingCharges ); >-use C4::Reserves; > use Koha::DateUtils qw( dt_from_string ); > use Koha::Holds; > use Koha::ItemTypes; >diff --git a/members/update-child.pl b/members/update-child.pl >index 765687f128c..11a436755a7 100755 >--- a/members/update-child.pl >+++ b/members/update-child.pl >@@ -100,4 +100,3 @@ elsif ( $op eq 'update' ) { > ); > } > } >- >diff --git a/misc/add_date_fields_to_marc_records.pl b/misc/add_date_fields_to_marc_records.pl >index 40b9fa38dab..8f44f39c5bb 100755 >--- a/misc/add_date_fields_to_marc_records.pl >+++ b/misc/add_date_fields_to_marc_records.pl >@@ -23,7 +23,6 @@ use Getopt::Long qw( GetOptions ); > use Pod::Usage qw( pod2usage ); > use MARC::Field; > >-use C4::Biblio; > use Koha::Biblios; > use Koha::DateUtils qw( dt_from_string ); > >diff --git a/misc/batchRebuildBiblioTables.pl b/misc/batchRebuildBiblioTables.pl >index 5b3ce003348..cc066abb213 100755 >--- a/misc/batchRebuildBiblioTables.pl >+++ b/misc/batchRebuildBiblioTables.pl >@@ -8,7 +8,6 @@ use strict; > # Koha modules used > use Koha::Script; > use MARC::Record; >-use C4::Charset; > use C4::Context; > use C4::Biblio qw( > GetXmlBiblio >diff --git a/misc/cronjobs/advance_notices.pl b/misc/cronjobs/advance_notices.pl >index 9ec07659aa9..5860fe83146 100755 >--- a/misc/cronjobs/advance_notices.pl >+++ b/misc/cronjobs/advance_notices.pl >@@ -42,9 +42,6 @@ use Getopt::Long qw( GetOptions ); > use Pod::Usage qw( pod2usage ); > use Koha::Script -cron; > use C4::Context; >-use C4::Letters; >-use C4::Members; >-use C4::Members::Messaging; > use C4::Log qw( cronlogaction ); > use Koha::Items; > use Koha::Libraries; >diff --git a/misc/cronjobs/automatic_checkin.pl b/misc/cronjobs/automatic_checkin.pl >index 2960b4a83dd..69dda78c2ee 100755 >--- a/misc/cronjobs/automatic_checkin.pl >+++ b/misc/cronjobs/automatic_checkin.pl >@@ -24,4 +24,4 @@ use C4::Log qw( cronlogaction ); > > cronlogaction(); > >-Koha::Checkouts->automatic_checkin; >\ No newline at end of file >+Koha::Checkouts->automatic_checkin; >diff --git a/misc/cronjobs/automatic_item_modification_by_age.pl b/misc/cronjobs/automatic_item_modification_by_age.pl >index a4e5538430a..fae48199e57 100755 >--- a/misc/cronjobs/automatic_item_modification_by_age.pl >+++ b/misc/cronjobs/automatic_item_modification_by_age.pl >@@ -8,7 +8,6 @@ use JSON; > > use Koha::Script -cron; > use C4::Context; >-use C4::Items; > use C4::Log qw( cronlogaction ); > > # Getting options >diff --git a/misc/cronjobs/automatic_renewals.pl b/misc/cronjobs/automatic_renewals.pl >index 1af18c70f54..07dc7c740d0 100755 >--- a/misc/cronjobs/automatic_renewals.pl >+++ b/misc/cronjobs/automatic_renewals.pl >@@ -82,7 +82,6 @@ use Koha::Script -cron; > use C4::Circulation qw( CanBookBeRenewed AddRenewal ); > use C4::Context; > use C4::Log qw( cronlogaction ); >-use C4::Letters; > use Koha::Checkouts; > use Koha::Libraries; > use Koha::Patrons; >diff --git a/misc/cronjobs/batch_anonymise.pl b/misc/cronjobs/batch_anonymise.pl >index 786e847c348..ed4d356813b 100755 >--- a/misc/cronjobs/batch_anonymise.pl >+++ b/misc/cronjobs/batch_anonymise.pl >@@ -21,7 +21,6 @@ use Modern::Perl; > > use Koha::Script -cron; > >-use C4::Context; > use C4::Log qw( cronlogaction ); > > use Koha::Database; >diff --git a/misc/cronjobs/build_browser_and_cloud.pl b/misc/cronjobs/build_browser_and_cloud.pl >index c8b12611fbe..72c1aa4668b 100755 >--- a/misc/cronjobs/build_browser_and_cloud.pl >+++ b/misc/cronjobs/build_browser_and_cloud.pl >@@ -5,14 +5,12 @@ use strict; > #use warnings; FIXME - Bug 2505 > > use Koha::Script -cron; >-use C4::Koha; > use C4::Context; > use Date::Calc; > use Time::HiRes qw(gettimeofday); > use ZOOM; > use MARC::File::USMARC; > use Getopt::Long; >-use C4::Log; > use Koha::Biblios; > > my ( $input_marc_file, $number) = ('',0); >diff --git a/misc/cronjobs/cleanup_database.pl b/misc/cronjobs/cleanup_database.pl >index 74505cf067e..3729cb3a4fc 100755 >--- a/misc/cronjobs/cleanup_database.pl >+++ b/misc/cronjobs/cleanup_database.pl >@@ -30,8 +30,6 @@ use constant DEFAULT_DEBARMENTS_PURGEDAYS => 30; > > use Koha::Script -cron; > use C4::Context; >-use C4::Search; >-use C4::Search::History; > use Getopt::Long qw( GetOptions ); > use C4::Log qw( cronlogaction ); > use C4::Accounts qw( purge_zero_balance_fees ); >diff --git a/misc/cronjobs/cloud-kw.pl b/misc/cronjobs/cloud-kw.pl >index d6e64be9022..7936a641ec5 100755 >--- a/misc/cronjobs/cloud-kw.pl >+++ b/misc/cronjobs/cloud-kw.pl >@@ -405,5 +405,3 @@ by their weight. > =back > > =cut >- >- >diff --git a/misc/cronjobs/create_koc_db.pl b/misc/cronjobs/create_koc_db.pl >index a9704d7a15b..b34d02dd551 100755 >--- a/misc/cronjobs/create_koc_db.pl >+++ b/misc/cronjobs/create_koc_db.pl >@@ -455,4 +455,3 @@ sub get_columns_for_issues_table { > > 1; > __END__ >- >diff --git a/misc/cronjobs/gather_print_notices.pl b/misc/cronjobs/gather_print_notices.pl >index 729c0d956bb..72598344f09 100755 >--- a/misc/cronjobs/gather_print_notices.pl >+++ b/misc/cronjobs/gather_print_notices.pl >@@ -6,7 +6,6 @@ use CGI; # NOT a CGI script, this is just to keep C4::Templates::gettemplate hap > use Koha::Script -cron; > use C4::Context; > use C4::Letters qw( GetPrintMessages ); >-use C4::Templates; > use File::Spec; > use Pod::Usage qw( pod2usage ); > use Getopt::Long qw( GetOptions ); >diff --git a/misc/cronjobs/holds/build_holds_queue.pl b/misc/cronjobs/holds/build_holds_queue.pl >index 6ba476b585f..a19c501135d 100755 >--- a/misc/cronjobs/holds/build_holds_queue.pl >+++ b/misc/cronjobs/holds/build_holds_queue.pl >@@ -16,4 +16,3 @@ use C4::Log qw( cronlogaction ); > cronlogaction(); > > CreateQueue(); >- >diff --git a/misc/cronjobs/holds/cancel_expired_holds.pl b/misc/cronjobs/holds/cancel_expired_holds.pl >index a4addc01708..366e157f9c2 100755 >--- a/misc/cronjobs/holds/cancel_expired_holds.pl >+++ b/misc/cronjobs/holds/cancel_expired_holds.pl >@@ -43,7 +43,6 @@ use Getopt::Long qw( GetOptions ); > use Pod::Usage qw( pod2usage ); > > use Koha::Script -cron; >-use C4::Reserves; > use C4::Log qw( cronlogaction ); > > =head1 OPTIONS >diff --git a/misc/cronjobs/holds/cancel_unfilled_holds.pl b/misc/cronjobs/holds/cancel_unfilled_holds.pl >index ea5d70ab485..58024984319 100755 >--- a/misc/cronjobs/holds/cancel_unfilled_holds.pl >+++ b/misc/cronjobs/holds/cancel_unfilled_holds.pl >@@ -22,7 +22,6 @@ use Getopt::Long qw( GetOptions ); > use Pod::Usage qw( pod2usage ); > > use Koha::Script -cron; >-use C4::Reserves; > use C4::Log qw( cronlogaction ); > use Koha::Holds; > use Koha::Calendar; >diff --git a/misc/cronjobs/holds/holds_reminder.pl b/misc/cronjobs/holds/holds_reminder.pl >index d1f49287ca7..28ba5204dcd 100755 >--- a/misc/cronjobs/holds/holds_reminder.pl >+++ b/misc/cronjobs/holds/holds_reminder.pl >@@ -23,7 +23,6 @@ use DateTime; > use DateTime::Duration; > > use C4::Context; >-use C4::Letters; > use C4::Log qw( cronlogaction ); > use Koha::DateUtils qw( dt_from_string ); > use Koha::Calendar; >diff --git a/misc/cronjobs/membership_expiry.pl b/misc/cronjobs/membership_expiry.pl >index c52843c7dcc..698f025b7fb 100755 >--- a/misc/cronjobs/membership_expiry.pl >+++ b/misc/cronjobs/membership_expiry.pl >@@ -142,7 +142,6 @@ use Pod::Usage qw( pod2usage ); > > use Koha::Script -cron; > use C4::Context; >-use C4::Letters; > use C4::Log qw( cronlogaction ); > > use Koha::Patrons; >diff --git a/misc/cronjobs/notice_unprocessed_suggestions.pl b/misc/cronjobs/notice_unprocessed_suggestions.pl >index 6567c35d752..6de5003274f 100755 >--- a/misc/cronjobs/notice_unprocessed_suggestions.pl >+++ b/misc/cronjobs/notice_unprocessed_suggestions.pl >@@ -6,8 +6,6 @@ use Pod::Usage qw( pod2usage ); > use Getopt::Long qw( GetOptions ); > > use Koha::Script -cron; >-use C4::Budgets; >-use C4::Suggestions; > use Koha::Libraries; > use Koha::Patrons; > >diff --git a/misc/cronjobs/overdue_notices.pl b/misc/cronjobs/overdue_notices.pl >index 86a0cb0266c..29b2cb8fd85 100755 >--- a/misc/cronjobs/overdue_notices.pl >+++ b/misc/cronjobs/overdue_notices.pl >@@ -28,7 +28,6 @@ use DateTime::Duration; > > use Koha::Script -cron; > use C4::Context; >-use C4::Letters; > use C4::Overdues qw( GetOverdueMessageTransportTypes parse_overdues_letter ); > use C4::Log qw( cronlogaction ); > use Koha::Patron::Debarments qw( AddUniqueDebarment ); >@@ -935,4 +934,3 @@ sub prepare_letter_for_printing { > } > return $return; > } >- >diff --git a/misc/cronjobs/process_message_queue.pl b/misc/cronjobs/process_message_queue.pl >index d8918be6077..f5e846376e0 100755 >--- a/misc/cronjobs/process_message_queue.pl >+++ b/misc/cronjobs/process_message_queue.pl >@@ -103,4 +103,3 @@ C4::Letters::SendQueuedMessages( > letter_code => $letter_code, > } > ); >- >diff --git a/misc/cronjobs/purge_suggestions.pl b/misc/cronjobs/purge_suggestions.pl >index 7b55efb1aa8..6999c0f5c5b 100755 >--- a/misc/cronjobs/purge_suggestions.pl >+++ b/misc/cronjobs/purge_suggestions.pl >@@ -22,7 +22,6 @@ use Modern::Perl; > use Getopt::Long qw( GetOptions ); > > use Koha::Script -cron; >-use C4::Suggestions; > use C4::Log qw( cronlogaction ); > use C4::Context; > >diff --git a/misc/cronjobs/recalls/expire_recalls.pl b/misc/cronjobs/recalls/expire_recalls.pl >index 7a4a6deebfe..9ced1b5e373 100755 >--- a/misc/cronjobs/recalls/expire_recalls.pl >+++ b/misc/cronjobs/recalls/expire_recalls.pl >@@ -33,7 +33,6 @@ BEGIN { > use Koha::Script -cron; > use Koha::DateUtils qw( dt_from_string ); > use Koha::Recalls; >-use C4::Log; > > cronlogaction(); > >diff --git a/misc/cronjobs/recalls/overdue_recalls.pl b/misc/cronjobs/recalls/overdue_recalls.pl >index d0e60859b4d..716c1e599f2 100755 >--- a/misc/cronjobs/recalls/overdue_recalls.pl >+++ b/misc/cronjobs/recalls/overdue_recalls.pl >@@ -32,7 +32,6 @@ use Koha::Script -cron; > use Koha::DateUtils; > use Koha::Checkouts; > use Koha::Recalls; >-use C4::Log; > > cronlogaction(); > >diff --git a/misc/cronjobs/serialsUpdate.pl b/misc/cronjobs/serialsUpdate.pl >index 26ebf25dde0..8c1daa6e7dc 100755 >--- a/misc/cronjobs/serialsUpdate.pl >+++ b/misc/cronjobs/serialsUpdate.pl >@@ -23,7 +23,6 @@ use warnings; > use Koha::Script -cron; > use C4::Context; > use C4::Serials qw( GetSubscription GetNextDate ModSerialStatus ); >-use C4::Serials::Frequency; > use C4::Log qw( cronlogaction ); > use Koha::DateUtils qw( dt_from_string output_pref ); > >diff --git a/misc/cronjobs/share_usage_with_koha_community.pl b/misc/cronjobs/share_usage_with_koha_community.pl >index fa6d59850f4..cdad9a5c34c 100755 >--- a/misc/cronjobs/share_usage_with_koha_community.pl >+++ b/misc/cronjobs/share_usage_with_koha_community.pl >@@ -7,7 +7,6 @@ use Getopt::Long qw( GetOptions ); > > use Koha::Script -cron; > use C4::Context; >-use C4::UsageStats; > use C4::Log qw( cronlogaction ); > use POSIX qw( strftime ); > >diff --git a/misc/cronjobs/social_data/get_report_social_data.pl b/misc/cronjobs/social_data/get_report_social_data.pl >index c5e13aaf1b5..48f106ea764 100755 >--- a/misc/cronjobs/social_data/get_report_social_data.pl >+++ b/misc/cronjobs/social_data/get_report_social_data.pl >@@ -3,7 +3,6 @@ > use Modern::Perl; > > use Koha::Script -cron; >-use C4::SocialData; > > my $results = C4::SocialData::get_report; > >diff --git a/misc/cronjobs/social_data/update_social_data.pl b/misc/cronjobs/social_data/update_social_data.pl >index 58e3dc06969..7f338d63eb8 100755 >--- a/misc/cronjobs/social_data/update_social_data.pl >+++ b/misc/cronjobs/social_data/update_social_data.pl >@@ -4,7 +4,6 @@ use Modern::Perl; > > use Koha::Script -cron; > use C4::Context; >-use C4::SocialData; > > my $url = C4::Context->preference( "Babeltheque_url_update" ); > my $output_dir = qq{/tmp}; >diff --git a/misc/cronjobs/staticfines.pl b/misc/cronjobs/staticfines.pl >index d4141b25f3b..d5610022205 100755 >--- a/misc/cronjobs/staticfines.pl >+++ b/misc/cronjobs/staticfines.pl >@@ -237,4 +237,3 @@ Number of Overdue Items: > > EOM > } >- >diff --git a/misc/cronjobs/thirdparty/TalkingTech_itiva_outbound.pl b/misc/cronjobs/thirdparty/TalkingTech_itiva_outbound.pl >index 6a1456987fa..77d5b02d1da 100755 >--- a/misc/cronjobs/thirdparty/TalkingTech_itiva_outbound.pl >+++ b/misc/cronjobs/thirdparty/TalkingTech_itiva_outbound.pl >@@ -25,8 +25,6 @@ use Pod::Usage qw( pod2usage ); > > use Koha::Script -cron; > use C4::Context; >-use C4::Letters; >-use C4::Overdues; > use Koha::Calendar; > use Koha::DateUtils qw( dt_from_string output_pref ); > use Koha::Patrons; >diff --git a/misc/cronjobs/update_patrons_category.pl b/misc/cronjobs/update_patrons_category.pl >index aafbf86aa58..44c15097ff3 100755 >--- a/misc/cronjobs/update_patrons_category.pl >+++ b/misc/cronjobs/update_patrons_category.pl >@@ -17,7 +17,6 @@ > > use Modern::Perl; > >-use C4::Context; > use C4::Log qw(cronlogaction); > use Getopt::Long qw( GetOptions ); > use Pod::Usage qw( pod2usage ); >diff --git a/misc/devel/coverage.pl b/misc/devel/coverage.pl >index a4d09344cc4..44a5629f768 100755 >--- a/misc/devel/coverage.pl >+++ b/misc/devel/coverage.pl >@@ -76,4 +76,4 @@ system("cover"); > say("file://$KOHA_PATH/cover_db/coverage.html") > unless !-e "$KOHA_PATH/cover_db/coverage.html"; > >-1; >\ No newline at end of file >+1; >diff --git a/misc/export_records.pl b/misc/export_records.pl >index 32658cb8c8c..e8ff04f8e31 100755 >--- a/misc/export_records.pl >+++ b/misc/export_records.pl >@@ -23,9 +23,7 @@ use Getopt::Long qw( GetOptions ); > use Pod::Usage qw( pod2usage ); > > use Koha::Script; >-use C4::Auth; > use C4::Context; >-use C4::Record; > > use Koha::Biblioitems; > use Koha::Database; >diff --git a/misc/exportauth.pl b/misc/exportauth.pl >index 14e30884d2d..733e7c51df3 100755 >--- a/misc/exportauth.pl >+++ b/misc/exportauth.pl >@@ -8,7 +8,6 @@ use strict; > > use Koha::Script; > use C4::Context; >-use C4::Auth; > my $outfile = $ARGV[0]; > open(my $fh, '>', $outfile) or die $!; > my $dbh=C4::Context->dbh; >diff --git a/misc/load_testing/benchmark_webservices.pl b/misc/load_testing/benchmark_webservices.pl >index 2ccd15bf731..1996b1cd9af 100755 >--- a/misc/load_testing/benchmark_webservices.pl >+++ b/misc/load_testing/benchmark_webservices.pl >@@ -50,5 +50,3 @@ for( my $i = 0; $i < $timestopost; $i++) { > } > sleep($timeout); > } >- >- >diff --git a/misc/load_yaml.pl b/misc/load_yaml.pl >index 6eece296378..0b9bfa1f294 100755 >--- a/misc/load_yaml.pl >+++ b/misc/load_yaml.pl >@@ -21,7 +21,6 @@ use Modern::Perl; > > use Koha::Script; > use Getopt::Long qw( GetOptions :config no_ignore_case ); >-use C4::Context; > use C4::Installer; > > sub print_usage { >diff --git a/misc/maintenance/borrowers-force-messaging-defaults.pl b/misc/maintenance/borrowers-force-messaging-defaults.pl >index 7f2bba0c694..be11311e05f 100755 >--- a/misc/maintenance/borrowers-force-messaging-defaults.pl >+++ b/misc/maintenance/borrowers-force-messaging-defaults.pl >@@ -22,7 +22,6 @@ use warnings; > > use Koha::Script; > use C4::Context; >-use C4::Members::Messaging; > use Getopt::Long qw( GetOptions ); > use Pod::Usage qw( pod2usage ); > >diff --git a/misc/maintenance/check_syspref_cache.pl b/misc/maintenance/check_syspref_cache.pl >index 9328988baf1..ded344aacf4 100755 >--- a/misc/maintenance/check_syspref_cache.pl >+++ b/misc/maintenance/check_syspref_cache.pl >@@ -23,7 +23,6 @@ use Encode qw( encode_utf8 ); > use Koha::Script; > use Koha::Caches; > use Koha::Config::SysPrefs; >-use C4::Context; > > =head1 NAME > >diff --git a/misc/maintenance/fix_tags_weight.pl b/misc/maintenance/fix_tags_weight.pl >index ff7e3d78350..cd381c17d8f 100755 >--- a/misc/maintenance/fix_tags_weight.pl >+++ b/misc/maintenance/fix_tags_weight.pl >@@ -20,7 +20,6 @@ > use Modern::Perl; > > use C4::Context; >-use C4::Tags; > > use Koha::Script; > use Koha::Database; >diff --git a/misc/maintenance/sanitize_records.pl b/misc/maintenance/sanitize_records.pl >index 430d89d6a7c..8abd31f90f4 100755 >--- a/misc/maintenance/sanitize_records.pl >+++ b/misc/maintenance/sanitize_records.pl >@@ -20,9 +20,7 @@ > use Modern::Perl; > > use Koha::Script; >-use C4::Charset; > use C4::Context; >-use C4::Biblio; > use Koha::Biblios; > use Getopt::Long qw( GetOptions ); > use Pod::Usage qw( pod2usage ); >diff --git a/misc/maintenance/touch_all_biblios.pl b/misc/maintenance/touch_all_biblios.pl >index 956b7677ad7..2cc281601fd 100755 >--- a/misc/maintenance/touch_all_biblios.pl >+++ b/misc/maintenance/touch_all_biblios.pl >@@ -136,4 +136,3 @@ Limits the search with a user-specified WHERE clause. > =back > > =cut >- >diff --git a/misc/maintenance/touch_all_items.pl b/misc/maintenance/touch_all_items.pl >index ddc9a821cea..b28b31f3205 100755 >--- a/misc/maintenance/touch_all_items.pl >+++ b/misc/maintenance/touch_all_items.pl >@@ -142,4 +142,3 @@ Limits the search with a user-specified WHERE clause. > =back > > =cut >- >diff --git a/misc/migration_tools/22_to_30/export_Authorities.pl b/misc/migration_tools/22_to_30/export_Authorities.pl >index bed75f27c7e..6e6c56a5e09 100755 >--- a/misc/migration_tools/22_to_30/export_Authorities.pl >+++ b/misc/migration_tools/22_to_30/export_Authorities.pl >@@ -3,7 +3,6 @@ use Modern::Perl; > use C4::Context; > #use MARC::File::XML(BinaryEncoding=>"utf8"); > #use MARC::File::USMARC; >-use C4::AuthoritiesMarc; > use POSIX; > #MARC::File::XML::default_record_format("UNIMARCAUTH"); > my $dbh = C4::Context->dbh; >diff --git a/misc/migration_tools/22_to_30/export_Authorities_xml.pl b/misc/migration_tools/22_to_30/export_Authorities_xml.pl >index 2aefe5b62dd..e762296a86d 100755 >--- a/misc/migration_tools/22_to_30/export_Authorities_xml.pl >+++ b/misc/migration_tools/22_to_30/export_Authorities_xml.pl >@@ -2,7 +2,6 @@ > use Modern::Perl; > use C4::Context; > use MARC::File::XML(BinaryEncoding=>"utf8"); >-use C4::AuthoritiesMarc; > use POSIX; > MARC::File::XML::default_record_format("UNIMARCAUTH"); > my $dbh = C4::Context->dbh; >diff --git a/misc/migration_tools/22_to_30/move_marc_to_authheader.pl b/misc/migration_tools/22_to_30/move_marc_to_authheader.pl >index 53069bff01d..03de1fcaf3e 100755 >--- a/misc/migration_tools/22_to_30/move_marc_to_authheader.pl >+++ b/misc/migration_tools/22_to_30/move_marc_to_authheader.pl >@@ -5,7 +5,6 @@ > use strict; > #use warnings; FIXME - Bug 2505 > use C4::Context; >-use C4::AuthoritiesMarc; > use MARC::Record; > use MARC::File::XML ( BinaryEncoding => 'utf8' ); > >@@ -123,4 +122,3 @@ sub old_AUTHgetauthority { > } > return $record; > } >- >diff --git a/misc/migration_tools/buildCOUNTRY.pl b/misc/migration_tools/buildCOUNTRY.pl >index 9329ac0e595..a8e4503a32e 100755 >--- a/misc/migration_tools/buildCOUNTRY.pl >+++ b/misc/migration_tools/buildCOUNTRY.pl >@@ -8,7 +8,6 @@ use strict; > # Koha modules used > use Koha::Script; > use C4::Context; >-use C4::AuthoritiesMarc; > use Time::HiRes qw( gettimeofday ); > > use Getopt::Long qw( GetOptions ); >diff --git a/misc/migration_tools/buildEDITORS.pl b/misc/migration_tools/buildEDITORS.pl >index 816b5892a02..652ba50dea5 100755 >--- a/misc/migration_tools/buildEDITORS.pl >+++ b/misc/migration_tools/buildEDITORS.pl >@@ -10,7 +10,6 @@ use MARC::Record; > use MARC::Batch; > use Koha::Script; > use C4::Context; >-use C4::AuthoritiesMarc; > use Koha::Biblios; > use Time::HiRes qw( gettimeofday ); > >diff --git a/misc/migration_tools/buildLANG.pl b/misc/migration_tools/buildLANG.pl >index bdef6dd9d31..244825d012f 100755 >--- a/misc/migration_tools/buildLANG.pl >+++ b/misc/migration_tools/buildLANG.pl >@@ -8,7 +8,6 @@ use strict; > # Koha modules used > use Koha::Script; > use C4::Context; >-use C4::AuthoritiesMarc; > use Time::HiRes qw( gettimeofday ); > > use Getopt::Long qw( GetOptions ); >diff --git a/misc/migration_tools/bulkmarcimport.pl b/misc/migration_tools/bulkmarcimport.pl >index d2dfe1ad56a..6cf38533585 100755 >--- a/misc/migration_tools/bulkmarcimport.pl >+++ b/misc/migration_tools/bulkmarcimport.pl >@@ -18,7 +18,6 @@ use C4::Biblio qw( > ModBiblio > ModBiblioMarc > ); >-use C4::Koha; > use C4::Charset qw( MarcToUTF8Record SetUTF8Flag ); > use C4::Items qw( AddItemBatchFromMarc ); > use C4::MarcModificationTemplates qw( >@@ -826,4 +825,3 @@ If not specified, no MARC modification templates are used (default). > =back > > =cut >- >diff --git a/misc/migration_tools/import_lexile.pl b/misc/migration_tools/import_lexile.pl >index 0d506ccc0f4..3da937a0283 100755 >--- a/misc/migration_tools/import_lexile.pl >+++ b/misc/migration_tools/import_lexile.pl >@@ -32,7 +32,6 @@ use Getopt::Long qw( GetOptions ); > use Text::CSV; > > use Koha::Script; >-use C4::Context; > use C4::Biblio qw( ModBiblio ); > use C4::Koha qw( GetVariationsOfISBN ); > >diff --git a/misc/sip_cli_emulator.pl b/misc/sip_cli_emulator.pl >index 8336ced436a..b1038dc0e92 100755 >--- a/misc/sip_cli_emulator.pl >+++ b/misc/sip_cli_emulator.pl >@@ -24,7 +24,6 @@ use IO::Socket::INET; > use Getopt::Long; > > use C4::SIP::Sip::Constants qw(:all); >-use C4::SIP::Sip; > > use constant { LANGUAGE => '001' }; > >diff --git a/misc/translator/LangInstaller.pm b/misc/translator/LangInstaller.pm >index f5dd1831bad..c52b476de01 100644 >--- a/misc/translator/LangInstaller.pm >+++ b/misc/translator/LangInstaller.pm >@@ -589,4 +589,3 @@ Update .po files in F<po> directory, named F<lang>-*.po. > =back > > =cut >- >diff --git a/misc/translator/TmplTokenizer.pm b/misc/translator/TmplTokenizer.pm >index 05cc54ea6b6..ae69d0032ca 100644 >--- a/misc/translator/TmplTokenizer.pm >+++ b/misc/translator/TmplTokenizer.pm >@@ -1,7 +1,6 @@ > package TmplTokenizer; > > use Modern::Perl; >-use C4::TmplTokenType; > use C4::TmplToken; > use C4::TTParser; > use VerboseWarnings qw( pedantic_p error_normal warn_normal warn_pedantic ); >diff --git a/offline_circ/download.pl b/offline_circ/download.pl >index ad120fd7661..bbf2b447f45 100755 >--- a/offline_circ/download.pl >+++ b/offline_circ/download.pl >@@ -21,9 +21,7 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use JSON qw( to_json ); > use C4::Auth qw( checkauth ); >-use C4::Output; > use C4::Context; >-use C4::Koha; > > my $query = CGI->new; > checkauth( $query, undef, { circulate => "circulate_remaining_permissions" }, >diff --git a/offline_circ/enqueue_koc.pl b/offline_circ/enqueue_koc.pl >index e10df9545d9..b146bf2d399 100755 >--- a/offline_circ/enqueue_koc.pl >+++ b/offline_circ/enqueue_koc.pl >@@ -24,10 +24,7 @@ use CGI qw ( -utf8 ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); > use C4::Context; >-use C4::Accounts; > use C4::Circulation qw( AddOfflineOperation ); >-use C4::Members; >-use C4::Stats; > use Koha::Checkouts; > use Koha::UploadedFiles; > use Koha::Items; >diff --git a/offline_circ/list.pl b/offline_circ/list.pl >index 252dc8594b8..f1bfa081c3f 100755 >--- a/offline_circ/list.pl >+++ b/offline_circ/list.pl >@@ -23,9 +23,7 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Circulation qw( GetOfflineOperations GetOfflineOperation ); >-use C4::Members; > use Koha::Patrons; > > use Koha::Items; >diff --git a/offline_circ/process_koc.pl b/offline_circ/process_koc.pl >index b3dc48a54c1..d7f900b2ac4 100755 >--- a/offline_circ/process_koc.pl >+++ b/offline_circ/process_koc.pl >@@ -25,11 +25,8 @@ use CGI qw ( -utf8 ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); > use C4::Context; >-use C4::Accounts; > use C4::Circulation qw( barcodedecode GetOpenIssue AddRenewal AddIssue MarkIssueReturned ); > use C4::Items qw( ModDateLastSeen ); >-use C4::Members; >-use C4::Stats; > use C4::BackgroundJob; > use Koha::UploadedFiles; > use Koha::Account; >diff --git a/opac/ilsdi.pl b/opac/ilsdi.pl >index 5b105246fa4..e4bfb462cfe 100755 >--- a/opac/ilsdi.pl >+++ b/opac/ilsdi.pl >@@ -19,7 +19,6 @@ > > use Modern::Perl; > >-use C4::ILSDI::Services; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Context; >@@ -254,4 +253,3 @@ print XMLout( > SuppressEmpty => 1 > ); > exit 0; >- >diff --git a/opac/maintenance.pl b/opac/maintenance.pl >index c7924921c3d..33ebf915eb3 100755 >--- a/opac/maintenance.pl >+++ b/opac/maintenance.pl >@@ -18,7 +18,6 @@ > use Modern::Perl; > > use CGI qw ( -utf8 ); >-use C4::Auth; > use C4::Output qw( output_html_with_http_headers ); > use C4::Templates qw/gettemplate/; > >diff --git a/opac/opac-ISBDdetail.pl b/opac/opac-ISBDdetail.pl >index b3b29deea72..8ee11ef4ca2 100755 >--- a/opac/opac-ISBDdetail.pl >+++ b/opac/opac-ISBDdetail.pl >@@ -52,7 +52,6 @@ use C4::Biblio qw( > GetMarcISSN > TransformMarcToKoha > ); >-use C4::Reserves; > use C4::Serials qw( CountSubscriptionFromBiblionumber SearchSubscriptions GetLatestSerials ); > use C4::Koha qw( > GetNormalizedEAN >diff --git a/opac/opac-MARCdetail.pl b/opac/opac-MARCdetail.pl >index c902f849c41..258a601d33b 100755 >--- a/opac/opac-MARCdetail.pl >+++ b/opac/opac-MARCdetail.pl >@@ -58,8 +58,6 @@ use C4::Biblio qw( > GetMarcStructure > TransformMarcToKoha > ); >-use C4::Reserves; >-use C4::Members; > use C4::Koha qw( GetNormalizedISBN ); > use List::MoreUtils qw( uniq ); > use Koha::Biblios; >diff --git a/opac/opac-account-pay.pl b/opac/opac-account-pay.pl >index 30be841dfcb..1e77c593e2c 100755 >--- a/opac/opac-account-pay.pl >+++ b/opac/opac-account-pay.pl >@@ -24,8 +24,6 @@ use Modern::Perl; > use CGI; > > use C4::Auth qw( get_template_and_user ); >-use C4::Output; >-use C4::Context; > use Koha::Acquisition::Currencies; > use Koha::Database; > use Koha::Plugins::Handler; >diff --git a/opac/opac-account.pl b/opac/opac-account.pl >index c47bd58644b..0db38d054e8 100755 >--- a/opac/opac-account.pl >+++ b/opac/opac-account.pl >@@ -21,7 +21,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Members; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use Koha::Account::Lines; >diff --git a/opac/opac-article-request-cancel.pl b/opac/opac-article-request-cancel.pl >index e926a5f5066..198e1d07d86 100755 >--- a/opac/opac-article-request-cancel.pl >+++ b/opac/opac-article-request-cancel.pl >@@ -21,7 +21,6 @@ use Modern::Perl; > > use CGI qw ( -utf8 ); > >-use C4::Output; > use C4::Auth qw( get_template_and_user ); > use Koha::ArticleRequests; > >diff --git a/opac/opac-authorities-home.pl b/opac/opac-authorities-home.pl >index eb795f4ed3c..6fc702cec62 100755 >--- a/opac/opac-authorities-home.pl >+++ b/opac/opac-authorities-home.pl >@@ -26,8 +26,6 @@ use C4::Auth qw( get_template_and_user ); > > use C4::Context; > use C4::Output qw( pagination_bar output_html_with_http_headers ); >-use C4::Koha; >-use C4::Search::History; > > use Koha::Authority::Types; > use Koha::SearchEngine::Search; >diff --git a/opac/opac-authoritiesdetail.pl b/opac/opac-authoritiesdetail.pl >index ed0a1c70144..3e9deb4a275 100755 >--- a/opac/opac-authoritiesdetail.pl >+++ b/opac/opac-authoritiesdetail.pl >@@ -44,7 +44,6 @@ use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::AuthoritiesMarc qw( GetAuthority BuildSummary GetTagsLabels GenerateHierarchy ); > use CGI qw ( -utf8 ); >-use C4::Koha; > > use Koha::Authorities; > use Koha::Authority::Types; >diff --git a/opac/opac-basket.pl b/opac/opac-basket.pl >index bf3e6f48173..08b55fe831a 100755 >--- a/opac/opac-basket.pl >+++ b/opac/opac-basket.pl >@@ -19,7 +19,6 @@ use Modern::Perl; > > use CGI qw ( -utf8 ); > >-use C4::Koha; > use C4::Biblio qw( > GetFrameworkCode > GetMarcSeries >diff --git a/opac/opac-changelanguage.pl b/opac/opac-changelanguage.pl >index eb1c2960749..513ad472d0d 100755 >--- a/opac/opac-changelanguage.pl >+++ b/opac/opac-changelanguage.pl >@@ -17,7 +17,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Templates; > use Koha::Util::Navigation; > > my $query = CGI->new; >diff --git a/opac/opac-curbside-pickups.pl b/opac/opac-curbside-pickups.pl >index f5b4790ae71..81a3b3c0aa1 100755 >--- a/opac/opac-curbside-pickups.pl >+++ b/opac/opac-curbside-pickups.pl >@@ -19,7 +19,6 @@ > use Modern::Perl; > use CGI qw ( -utf8 ); > use Try::Tiny; >-use C4::Members; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > >diff --git a/opac/opac-detail.pl b/opac/opac-detail.pl >index 1d1cdadc075..2456eeeca47 100755 >--- a/opac/opac-detail.pl >+++ b/opac/opac-detail.pl >@@ -59,7 +59,6 @@ use C4::External::Syndetics qw( > get_syndetics_summary > get_syndetics_toc > ); >-use C4::Members; > use C4::XSLT qw( XSLTParse4Display ); > use C4::ShelfBrowser qw( GetNearbyItems ); > use C4::Reserves qw( GetReserveStatus ); >diff --git a/opac/opac-downloadcart.pl b/opac/opac-downloadcart.pl >index 1f4b20d1fb4..24d65911986 100755 >--- a/opac/opac-downloadcart.pl >+++ b/opac/opac-downloadcart.pl >@@ -25,7 +25,6 @@ use Encode qw( encode ); > use C4::Auth qw( get_template_and_user ); > use C4::Biblio qw( GetFrameworkCode GetISBDView ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Record; > use C4::Ris qw( marc2ris ); > use Koha::Biblios; > use Koha::CsvProfiles; >diff --git a/opac/opac-downloadshelf.pl b/opac/opac-downloadshelf.pl >index 2414d1566a4..a7f5e01538d 100755 >--- a/opac/opac-downloadshelf.pl >+++ b/opac/opac-downloadshelf.pl >@@ -24,7 +24,6 @@ use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Biblio qw( GetFrameworkCode GetISBDView ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Record; > use C4::Ris qw( marc2ris ); > use Koha::Biblios; > use Koha::CsvProfiles; >diff --git a/opac/opac-export.pl b/opac/opac-export.pl >index 1b0fdad59ac..8fac03b6bb2 100755 >--- a/opac/opac-export.pl >+++ b/opac/opac-export.pl >@@ -19,16 +19,12 @@ > > use Modern::Perl; > >-use C4::Record; >-use C4::Auth; >-use C4::Output; > use C4::Biblio qw( > GetFrameworkCode > GetISBDView > GetMarcControlnumber > ); > use CGI qw ( -utf8 ); >-use C4::Auth; > use C4::Ris qw( marc2ris ); > use Koha::Biblios; > use Koha::RecordProcessor; >diff --git a/opac/opac-idref.pl b/opac/opac-idref.pl >index 795842215f9..8b666908bc6 100755 >--- a/opac/opac-idref.pl >+++ b/opac/opac-idref.pl >@@ -26,7 +26,6 @@ use Encode; > > use C4::Auth qw( get_template_and_user ); > use C4::Context; >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > > my $cgi = CGI->new; >diff --git a/opac/opac-illrequests.pl b/opac/opac-illrequests.pl >index e619707451e..afdc4546e56 100755 >--- a/opac/opac-illrequests.pl >+++ b/opac/opac-illrequests.pl >@@ -23,7 +23,6 @@ use JSON qw( encode_json ); > > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); >-use C4::Koha; > use C4::Output qw( output_html_with_http_headers ); > > use Koha::Illrequest::Config; >diff --git a/opac/opac-issue-note.pl b/opac/opac-issue-note.pl >index b59e838b062..460f6cffab9 100755 >--- a/opac/opac-issue-note.pl >+++ b/opac/opac-issue-note.pl >@@ -20,12 +20,10 @@ > use Modern::Perl; > > use CGI qw ( -utf8 ); >-use C4::Koha; > use C4::Context; > use C4::Scrubber; > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); >-use C4::Letters; > use Koha::Checkouts; > use Koha::DateUtils qw( dt_from_string ); > use Koha::Patrons; >diff --git a/opac/opac-main.pl b/opac/opac-main.pl >index 779c06d5870..549f79161ec 100755 >--- a/opac/opac-main.pl >+++ b/opac/opac-main.pl >@@ -23,7 +23,6 @@ use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use Koha::Quotes; >-use C4::Members; > use C4::Overdues qw( checkoverdues ); > use Koha::Checkouts; > use Koha::Holds; >diff --git a/opac/opac-memberentry.pl b/opac/opac-memberentry.pl >index f456362c3a2..08c6e8fa991 100755 >--- a/opac/opac-memberentry.pl >+++ b/opac/opac-memberentry.pl >@@ -28,7 +28,6 @@ use C4::Output qw( output_html_with_http_headers ); > use C4::Context; > use C4::Letters qw( GetPreparedLetter EnqueueLetter SendQueuedMessages ); > use C4::Members qw( checkcardnumber ); >-use C4::Form::MessagingPreferences; > use Koha::AuthUtils; > use Koha::Patrons; > use Koha::Patron::Consent; >diff --git a/opac/opac-messaging.pl b/opac/opac-messaging.pl >index a221b39a839..6d031d62746 100755 >--- a/opac/opac-messaging.pl >+++ b/opac/opac-messaging.pl >@@ -24,8 +24,6 @@ use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Context; > use C4::Output qw( output_html_with_http_headers ); >-use C4::Members::Messaging; >-use C4::Form::MessagingPreferences; > use Koha::Patrons; > use Koha::SMS::Providers; > use Koha::Token; >diff --git a/opac/opac-modrequest-suspend.pl b/opac/opac-modrequest-suspend.pl >index 4022bb92df6..9d18a0f5c6a 100755 >--- a/opac/opac-modrequest-suspend.pl >+++ b/opac/opac-modrequest-suspend.pl >@@ -18,7 +18,6 @@ > use Modern::Perl; > > use CGI qw ( -utf8 ); >-use C4::Output; > use C4::Reserves qw( CanReserveBeCanceledFromOpac ToggleSuspend SuspendAll ); > use C4::Auth qw( get_template_and_user ); > my $query = CGI->new; >diff --git a/opac/opac-modrequest.pl b/opac/opac-modrequest.pl >index 4eb805b3597..9a3edb9ef12 100755 >--- a/opac/opac-modrequest.pl >+++ b/opac/opac-modrequest.pl >@@ -25,7 +25,6 @@ > use Modern::Perl; > > use CGI qw ( -utf8 ); >-use C4::Output; > use C4::Auth qw( get_template_and_user ); > use Koha::Holds; > >diff --git a/opac/opac-mymessages.pl b/opac/opac-mymessages.pl >index 6acebadc4da..15e6b501306 100755 >--- a/opac/opac-mymessages.pl >+++ b/opac/opac-mymessages.pl >@@ -22,8 +22,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > > use C4::Auth qw( get_template_and_user ); >-use C4::Context; >-use C4::Letters; > use C4::Output qw( output_html_with_http_headers ); > > my $query = CGI->new(); >diff --git a/opac/opac-passwd.pl b/opac/opac-passwd.pl >index 6ae82f0a8ea..fbe1f1a2e6a 100755 >--- a/opac/opac-passwd.pl >+++ b/opac/opac-passwd.pl >@@ -23,7 +23,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > > use C4::Auth qw( get_template_and_user checkpw checkpw_hash ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use Koha::Patrons; > >diff --git a/opac/opac-patron-image.pl b/opac/opac-patron-image.pl >index dccba229eb2..318c6a535c5 100755 >--- a/opac/opac-patron-image.pl >+++ b/opac/opac-patron-image.pl >@@ -19,7 +19,6 @@ > # along with Koha; if not, see <http://www.gnu.org/licenses>. > > use Modern::Perl; >-use C4::Members; > use CGI qw ( -utf8 ); > use CGI::Cookie; # need to check cookies before having CGI parse the POST request > use C4::Auth qw( check_cookie_auth ); >diff --git a/opac/opac-readingrecord.pl b/opac/opac-readingrecord.pl >index 927c37b275b..76a63b39d1b 100755 >--- a/opac/opac-readingrecord.pl >+++ b/opac/opac-readingrecord.pl >@@ -26,7 +26,6 @@ use C4::Koha qw( > GetNormalizedISBN > GetNormalizedUPC > ); >-use C4::Biblio; > use C4::Members qw( GetAllIssues ); > use C4::External::BakerTaylor qw( image_url link_url ); > use MARC::Record; >diff --git a/opac/opac-registration-verify.pl b/opac/opac-registration-verify.pl >index 73ff55e6e5d..e68917895c1 100755 >--- a/opac/opac-registration-verify.pl >+++ b/opac/opac-registration-verify.pl >@@ -22,8 +22,6 @@ use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Letters qw( GetPreparedLetter EnqueueLetter SendQueuedMessages ); >-use C4::Members; >-use C4::Form::MessagingPreferences; > use Koha::AuthUtils; > use Koha::Patrons; > use Koha::Patron::Consent; >diff --git a/opac/opac-renew.pl b/opac/opac-renew.pl >index 46a205029e8..0552ac7bede 100755 >--- a/opac/opac-renew.pl >+++ b/opac/opac-renew.pl >@@ -27,7 +27,6 @@ use CGI qw ( -utf8 ); > use C4::Circulation qw( CanBookBeRenewed AddRenewal ); > use C4::Auth qw( get_template_and_user ); > use C4::Context; >-use C4::Members; > use Koha::Items; > use Koha::Patrons; > my $query = CGI->new; >@@ -70,4 +69,3 @@ else { > } > > print $query->redirect("/cgi-bin/koha/opac-user.pl?renew_error=$errorstring&renewed=$renewed"); >- >diff --git a/opac/opac-reportproblem.pl b/opac/opac-reportproblem.pl >index 2cb1ff340b0..17b2e24c197 100755 >--- a/opac/opac-reportproblem.pl >+++ b/opac/opac-reportproblem.pl >@@ -23,7 +23,6 @@ use Try::Tiny qw( catch try ); > > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Letters; > use Koha::ProblemReport; > use Koha::Libraries; > use Koha::Patrons; >diff --git a/opac/opac-reserve.pl b/opac/opac-reserve.pl >index e5c2753d6c9..060fb57a5f6 100755 >--- a/opac/opac-reserve.pl >+++ b/opac/opac-reserve.pl >@@ -29,8 +29,6 @@ use C4::Biblio qw( GetBiblioData GetFrameworkCode ); > use C4::Items qw( GetHostItemsInfo GetItemsInfo ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Context; >-use C4::Members; >-use C4::Overdues; > > use Koha::AuthorisedValues; > use Koha::Biblios; >diff --git a/opac/opac-reset-password.pl b/opac/opac-reset-password.pl >index 2090ddae93e..e3434166b65 100755 >--- a/opac/opac-reset-password.pl >+++ b/opac/opac-reset-password.pl >@@ -20,7 +20,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > > use C4::Auth qw( get_template_and_user checkpw checkpw_hash ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use Koha::Patrons; > >diff --git a/opac/opac-retrieve-file.pl b/opac/opac-retrieve-file.pl >index 3f6e6c8d3be..1146bd004fb 100755 >--- a/opac/opac-retrieve-file.pl >+++ b/opac/opac-retrieve-file.pl >@@ -22,7 +22,6 @@ use CGI; > use Encode; > > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use Koha::UploadedFiles; > >diff --git a/opac/opac-routing-lists.pl b/opac/opac-routing-lists.pl >index 299bb29e780..ff36608ca7b 100755 >--- a/opac/opac-routing-lists.pl >+++ b/opac/opac-routing-lists.pl >@@ -18,7 +18,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Members; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use Koha::Patrons; >diff --git a/opac/opac-search-history.pl b/opac/opac-search-history.pl >index 8ef23062e7f..a96f3129508 100755 >--- a/opac/opac-search-history.pl >+++ b/opac/opac-search-history.pl >@@ -23,7 +23,6 @@ use C4::Auth qw( get_template_and_user ); > use CGI qw ( -utf8 ); > use C4::Context; > use C4::Output qw( output_html_with_http_headers ); >-use C4::Search::History; > > > >diff --git a/opac/opac-search.pl b/opac/opac-search.pl >index c0f7ca5d8c2..ce9cfed2ea7 100755 >--- a/opac/opac-search.pl >+++ b/opac/opac-search.pl >@@ -47,12 +47,9 @@ use C4::Output qw( output_html_with_http_headers pagination_bar output_with_http > use C4::Auth qw( get_template_and_user get_session ); > use C4::Languages qw( getlanguage getLanguages ); > use C4::Search qw( searchResults ); >-use C4::Search::History; > use C4::Biblio qw( GetXmlBiblio CountItemsIssued ); > use C4::Koha qw( GetItemTypesCategorized getitemtypeimagelocation GetAuthorisedValues ); > use C4::Tags qw( get_tags get_tag ); >-use C4::SocialData; >-use C4::External::OverDrive; > use C4::External::BakerTaylor qw( image_url link_url ); > > use Koha::CirculationRules; >diff --git a/opac/opac-sendbasket.pl b/opac/opac-sendbasket.pl >index fcc49e0f7e6..e9b61a39359 100755 >--- a/opac/opac-sendbasket.pl >+++ b/opac/opac-sendbasket.pl >@@ -30,7 +30,6 @@ use C4::Biblio qw( > use C4::Items qw( GetItemsInfo ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Templates; > use Koha::Biblios; > use Koha::Email; > use Koha::Patrons; >diff --git a/opac/opac-shareshelf.pl b/opac/opac-shareshelf.pl >index 29edd822931..d68059058fe 100755 >--- a/opac/opac-shareshelf.pl >+++ b/opac/opac-shareshelf.pl >@@ -28,7 +28,6 @@ use CGI qw ( -utf8 ); > > use C4::Auth qw( get_template_and_user ); > use C4::Context; >-use C4::Letters; > use C4::Output qw( output_html_with_http_headers ); > > use Koha::Email; >diff --git a/opac/opac-shelves.pl b/opac/opac-shelves.pl >index e228b3dfb0b..602efa61e3e 100755 >--- a/opac/opac-shelves.pl >+++ b/opac/opac-shelves.pl >@@ -29,7 +29,6 @@ use C4::Koha qw( > GetNormalizedOCLCNumber > GetNormalizedUPC > ); >-use C4::Members; > use C4::Output qw( pagination_bar output_with_http_headers ); > use C4::Tags qw( get_tags ); > use C4::XSLT qw( XSLTParse4Display ); >diff --git a/opac/opac-showmarc.pl b/opac/opac-showmarc.pl >index 57c63fede10..205e0857008 100755 >--- a/opac/opac-showmarc.pl >+++ b/opac/opac-showmarc.pl >@@ -27,9 +27,6 @@ use Encode; > use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); >-use C4::ImportBatch; >-use C4::XSLT; >-use C4::Templates; > use Koha::RecordProcessor; > > my $input = CGI->new; >diff --git a/opac/opac-suggestions.pl b/opac/opac-suggestions.pl >index b2ab7609bc4..11359342553 100755 >--- a/opac/opac-suggestions.pl >+++ b/opac/opac-suggestions.pl >@@ -21,7 +21,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use Encode; > use C4::Auth qw( get_template_and_user ); >-use C4::Members; > use C4::Koha qw( GetAuthorisedValues ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Suggestions qw( >@@ -280,4 +279,3 @@ $template->param( > ); > > output_html_with_http_headers $input, $cookie, $template->output, undef, { force_no_caching => 1 }; >- >diff --git a/opac/opac-tags.pl b/opac/opac-tags.pl >index e75f86c5a3c..6ba2331dd9b 100755 >--- a/opac/opac-tags.pl >+++ b/opac/opac-tags.pl >@@ -375,4 +375,3 @@ response = { > }; > > =cut >- >diff --git a/opac/opac-topissues.pl b/opac/opac-topissues.pl >index 43830ccfd5f..7187c3150b1 100755 >--- a/opac/opac-topissues.pl >+++ b/opac/opac-topissues.pl >@@ -24,7 +24,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Context; >-use C4::Search; > use C4::Output qw( output_html_with_http_headers ); > use C4::Circulation qw( GetTopIssues ); > >diff --git a/opac/opac-user.pl b/opac/opac-user.pl >index ba45ddd2379..925873177de 100755 >--- a/opac/opac-user.pl >+++ b/opac/opac-user.pl >@@ -30,7 +30,6 @@ use C4::Koha qw( > use C4::Circulation qw( CanBookBeRenewed GetRenewCount GetIssuingCharges ); > use C4::External::BakerTaylor qw( image_url link_url ); > use C4::Reserves qw( GetReserveStatus ); >-use C4::Members; > use C4::Output qw( output_html_with_http_headers ); > use Koha::Account::Lines; > use Koha::Biblios; >diff --git a/opac/sco/help.pl b/opac/sco/help.pl >index e24bfa0ef81..bd915f25c46 100755 >--- a/opac/sco/help.pl >+++ b/opac/sco/help.pl >@@ -62,4 +62,3 @@ $template->param( > ); > > output_html_with_http_headers $query, $cookie, $template->output; >- >diff --git a/opac/sco/sco-main.pl b/opac/sco/sco-main.pl >index a89f2538d6e..9e67ede8268 100755 >--- a/opac/sco/sco-main.pl >+++ b/opac/sco/sco-main.pl >@@ -34,9 +34,7 @@ use CGI qw ( -utf8 ); > > use C4::Auth qw( in_iprange get_template_and_user checkpw ); > use C4::Circulation qw( barcodedecode AddReturn CanBookBeIssued AddIssue CanBookBeRenewed AddRenewal ); >-use C4::Reserves; > use C4::Output qw( output_html_with_http_headers ); >-use C4::Members; > use Koha::DateUtils qw( dt_from_string ); > use Koha::Acquisition::Currencies; > use Koha::Items; >diff --git a/opac/sco/sco-patron-image.pl b/opac/sco/sco-patron-image.pl >index 36e86b7d137..db537ee9745 100755 >--- a/opac/sco/sco-patron-image.pl >+++ b/opac/sco/sco-patron-image.pl >@@ -20,7 +20,6 @@ > use Modern::Perl; > use C4::Auth qw( in_iprange ); > use C4::Service; >-use C4::Members; > use Koha::Patron::Images; > use Koha::Patrons; > use Koha::Token; >diff --git a/opac/tracklinks.pl b/opac/tracklinks.pl >index 8f8e0ddb784..0a7699ae467 100755 >--- a/opac/tracklinks.pl >+++ b/opac/tracklinks.pl >@@ -21,7 +21,6 @@ > use Modern::Perl; > use C4::Context; > use C4::Auth qw( checkauth ); >-use C4::Biblio; > use C4::Output qw( output_error ); > use Koha::Biblios; > use Koha::Items; >diff --git a/patron_lists/delete.pl b/patron_lists/delete.pl >index 773ec3d1686..e05c613de10 100755 >--- a/patron_lists/delete.pl >+++ b/patron_lists/delete.pl >@@ -22,7 +22,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > > use C4::Auth qw( get_template_and_user ); >-use C4::Output; > use Koha::List::Patron qw( DelPatronList ); > > my $cgi = CGI->new; >diff --git a/patroncards/create-pdf.pl b/patroncards/create-pdf.pl >index e994ddbbb25..033188821c7 100755 >--- a/patroncards/create-pdf.pl >+++ b/patroncards/create-pdf.pl >@@ -27,8 +27,6 @@ use Storable qw( dclone ); > use autouse 'Data::Dumper' => qw(Dumper); > > use C4::Context; >-use C4::Creators; >-use C4::Patroncards; > use Koha::List::Patron qw( GetPatronLists ); > use Koha::Patrons; > use Koha::Patron::Images; >diff --git a/patroncards/edit-batch.pl b/patroncards/edit-batch.pl >index dbb3d9cc876..57de34a733b 100755 >--- a/patroncards/edit-batch.pl >+++ b/patroncards/edit-batch.pl >@@ -27,7 +27,6 @@ use autouse 'Data::Dumper' => qw(Dumper); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Creators qw( get_card_summary html_table ); >-use C4::Patroncards; > use Koha::Patrons; > > my $cgi = CGI->new; >diff --git a/patroncards/edit-layout.pl b/patroncards/edit-layout.pl >index 233bfac349b..494d5e30e48 100755 >--- a/patroncards/edit-layout.pl >+++ b/patroncards/edit-layout.pl >@@ -33,7 +33,6 @@ use C4::Creators qw( > get_text_justification_types > get_unit_values > ); >-use C4::Patroncards; > > my $cgi = CGI->new; > my ( $template, $loggedinuser, $cookie ) = get_template_and_user( >diff --git a/patroncards/edit-template.pl b/patroncards/edit-template.pl >index 1c7a2cd4113..6105fc4bfe6 100755 >--- a/patroncards/edit-template.pl >+++ b/patroncards/edit-template.pl >@@ -26,7 +26,6 @@ use autouse 'Data::Dumper' => qw(Dumper); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Creators qw( get_all_profiles get_unit_values ); >-use C4::Patroncards; > > my $cgi = CGI->new; > my ( $template, $loggedinuser, $cookie ) = get_template_and_user( >diff --git a/patroncards/manage.pl b/patroncards/manage.pl >index 4366955d87d..50d5a0df2ec 100755 >--- a/patroncards/manage.pl >+++ b/patroncards/manage.pl >@@ -32,7 +32,6 @@ use C4::Creators qw( > get_batch_summary > html_table > ); >-use C4::Labels; > use Koha::List::Patron qw( GetPatronLists ); > > my $cgi = CGI->new; >diff --git a/plugins/plugins-uninstall.pl b/plugins/plugins-uninstall.pl >index d6a85d39d32..c730b2979de 100755 >--- a/plugins/plugins-uninstall.pl >+++ b/plugins/plugins-uninstall.pl >@@ -22,8 +22,6 @@ use CGI qw ( -utf8 ); > > use C4::Context; > use C4::Auth qw( get_template_and_user ); >-use C4::Output; >-use C4::Members; > use Koha::Plugins::Handler; > > die("Koha plugins are disabled!") unless C4::Context->config("enable_plugins"); >diff --git a/plugins/plugins-upload.pl b/plugins/plugins-upload.pl >index 3e44f00b7e1..8442caa544b 100755 >--- a/plugins/plugins-upload.pl >+++ b/plugins/plugins-upload.pl >@@ -26,7 +26,6 @@ use File::Temp; > use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Members; > use Koha::Logger; > use Koha::Plugins; > >diff --git a/recalls/recall_pickup_slip.pl b/recalls/recall_pickup_slip.pl >index 20816db517f..57fb1fdc323 100755 >--- a/recalls/recall_pickup_slip.pl >+++ b/recalls/recall_pickup_slip.pl >@@ -19,7 +19,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); > >diff --git a/recalls/request.pl b/recalls/request.pl >index 222f7ab38b7..d105db72dbd 100755 >--- a/recalls/request.pl >+++ b/recalls/request.pl >@@ -20,7 +20,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Search; > use Koha::Recalls; > use Koha::Biblios; > >diff --git a/reports/acquisitions_stats.pl b/reports/acquisitions_stats.pl >index c804f72abe8..6c8bd1932de 100755 >--- a/reports/acquisitions_stats.pl >+++ b/reports/acquisitions_stats.pl >@@ -563,4 +563,3 @@ sub calculate { > } > > 1; >- >diff --git a/reports/catalogue_out.pl b/reports/catalogue_out.pl >index 51961790a86..8c1b814ccc8 100755 >--- a/reports/catalogue_out.pl >+++ b/reports/catalogue_out.pl >@@ -206,4 +206,3 @@ sub calculate { > > 1; > __END__ >- >diff --git a/reports/guided_reports.pl b/reports/guided_reports.pl >index c497dcc0a71..ab17c6ae03d 100755 >--- a/reports/guided_reports.pl >+++ b/reports/guided_reports.pl >@@ -1114,4 +1114,3 @@ sub create_non_existing_group_and_subgroup { > } > } > } >- >diff --git a/reports/reserves_stats.pl b/reports/reserves_stats.pl >index 94bd5dad8b7..a714f6aae23 100755 >--- a/reports/reserves_stats.pl >+++ b/reports/reserves_stats.pl >@@ -26,7 +26,6 @@ use C4::Context; > use C4::Koha qw( GetAuthorisedValues ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Reports qw( GetDelimiterChoices ); >-use C4::Members; > use Koha::AuthorisedValues; > use Koha::DateUtils qw( dt_from_string output_pref ); > use Koha::ItemTypes; >diff --git a/reserve/modrequest.pl b/reserve/modrequest.pl >index 8fa885dd233..4c320530e9b 100755 >--- a/reserve/modrequest.pl >+++ b/reserve/modrequest.pl >@@ -28,7 +28,6 @@ use URI; > use List::MoreUtils qw( uniq ); > use Try::Tiny; > >-use C4::Output; > use C4::Reserves qw( ModReserve ModReserveCancelAll ); > use C4::Auth qw( get_template_and_user ); > use Koha::DateUtils qw( dt_from_string ); >diff --git a/reserve/modrequest_suspendall.pl b/reserve/modrequest_suspendall.pl >index 0a802782b56..e0b25112790 100755 >--- a/reserve/modrequest_suspendall.pl >+++ b/reserve/modrequest_suspendall.pl >@@ -24,7 +24,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Output; > use C4::Reserves qw( SuspendAll ); > use C4::Auth qw( get_template_and_user ); > >diff --git a/rotating_collections/addItems.pl b/rotating_collections/addItems.pl >index 6cde9aebcee..0ee829a9567 100755 >--- a/rotating_collections/addItems.pl >+++ b/rotating_collections/addItems.pl >@@ -20,8 +20,6 @@ use Modern::Perl; > > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); >-use C4::Context; >-use C4::RotatingCollections; > > use Koha::Items; > >diff --git a/rotating_collections/editCollections.pl b/rotating_collections/editCollections.pl >index 28a23e58675..daf35be2d8c 100755 >--- a/rotating_collections/editCollections.pl >+++ b/rotating_collections/editCollections.pl >@@ -22,9 +22,7 @@ use CGI qw ( -utf8 ); > > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > >-use C4::RotatingCollections; > > my $query = CGI->new; > >diff --git a/rotating_collections/rotatingCollections.pl b/rotating_collections/rotatingCollections.pl >index b350861d1e3..f4ae163b510 100755 >--- a/rotating_collections/rotatingCollections.pl >+++ b/rotating_collections/rotatingCollections.pl >@@ -22,8 +22,6 @@ use CGI qw ( -utf8 ); > > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); >-use C4::Context; >-use C4::RotatingCollections; > > my $query = CGI->new; > >diff --git a/rotating_collections/transferCollection.pl b/rotating_collections/transferCollection.pl >index 1d5dcf8d581..5217fcdef8b 100755 >--- a/rotating_collections/transferCollection.pl >+++ b/rotating_collections/transferCollection.pl >@@ -20,8 +20,6 @@ use Modern::Perl; > > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); >-use C4::Context; >-use C4::RotatingCollections; > > use CGI qw ( -utf8 ); > >diff --git a/serials/lateissues-export.pl b/serials/lateissues-export.pl >index af83f2c6f64..88d2f7d7f03 100755 >--- a/serials/lateissues-export.pl >+++ b/serials/lateissues-export.pl >@@ -17,10 +17,7 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Auth; > use C4::Serials qw( GetLateOrMissingIssues updateClaim ); >-use C4::Output; >-use C4::Context; > > use Koha::CsvProfiles; > >diff --git a/serials/reorder_members.pl b/serials/reorder_members.pl >index 7edeb809093..98ca413c965 100755 >--- a/serials/reorder_members.pl >+++ b/serials/reorder_members.pl >@@ -34,4 +34,3 @@ reorder_members( $subscriptionid, $routingid, $rank ); > > print $query->redirect( > "/cgi-bin/koha/serials/routing.pl?subscriptionid=$subscriptionid"); >- >diff --git a/serials/routing-preview.pl b/serials/routing-preview.pl >index b33cb8dbcdf..1c059dedb70 100755 >--- a/serials/routing-preview.pl >+++ b/serials/routing-preview.pl >@@ -20,7 +20,6 @@ > # of reserves for the serial > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Koha; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Reserves qw( AddReserve ModReserve ); >diff --git a/serials/routing.pl b/serials/routing.pl >index 2e3122d3b5b..b56f6cdf634 100755 >--- a/serials/routing.pl >+++ b/serials/routing.pl >@@ -27,7 +27,6 @@ printed out > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Koha; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit output_html_with_http_headers ); > use C4::Context; >diff --git a/serials/serials-home.pl b/serials/serials-home.pl >index a0e4bc0185f..14d3c9fd181 100755 >--- a/serials/serials-home.pl >+++ b/serials/serials-home.pl >@@ -33,7 +33,6 @@ use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Context; > use C4::Output qw( output_html_with_http_headers ); >-use C4::Serials; > > my $query = CGI->new; > my $routing = $query->param('routing') || C4::Context->preference("RoutingSerials"); >diff --git a/serials/showpredictionpattern.pl b/serials/showpredictionpattern.pl >index 6420e50ce1a..1bd598d78a5 100755 >--- a/serials/showpredictionpattern.pl >+++ b/serials/showpredictionpattern.pl >@@ -35,7 +35,6 @@ use Date::Calc qw( Add_Delta_Days Add_Delta_YM Day_of_Week Delta_Days ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Serials qw( GetSubscription GetFictiveIssueNumber GetSeq GetSubscriptionIrregularities GetNextDate GetNextSeq ); >-use C4::Serials::Frequency; > use Koha::DateUtils qw( dt_from_string output_pref ); > > my $input = CGI->new; >diff --git a/serials/subscription-add.pl b/serials/subscription-add.pl >index c08142b8973..ee52e9f5630 100755 >--- a/serials/subscription-add.pl >+++ b/serials/subscription-add.pl >@@ -24,8 +24,6 @@ use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit output_html_with_http_headers ); > use C4::Context; > use C4::Serials qw( GetSubscription GetNextExpected GetSerials GetSubscriptionLength NewSubscription ModNextExpected ModSubscription ); >-use C4::Serials::Frequency; >-use C4::Serials::Numberpattern; > use C4::Letters qw( GetLetters ); > use Koha::AdditionalFields; > use Koha::Biblios; >diff --git a/serials/subscription-frequencies.pl b/serials/subscription-frequencies.pl >index 86d14fccd22..91b90bd4284 100755 >--- a/serials/subscription-frequencies.pl >+++ b/serials/subscription-frequencies.pl >@@ -34,7 +34,6 @@ use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Serials qw( GetSubscription ModSubscription DelSubscription ); >-use C4::Serials::Frequency; > > my $input = CGI->new; > my ($template, $loggedinuser, $cookie, $flags) = get_template_and_user( { >diff --git a/serials/subscription-frequency.pl b/serials/subscription-frequency.pl >index 4d5208e8981..97949f6b037 100755 >--- a/serials/subscription-frequency.pl >+++ b/serials/subscription-frequency.pl >@@ -19,7 +19,6 @@ > > use Modern::Perl; > use CGI qw ( -utf8 ); >-use C4::Context; > use C4::Serials::Frequency qw( GetSubscriptionFrequency ); > use C4::Auth qw( check_cookie_auth ); > use JSON qw( to_json ); >diff --git a/serials/subscription-renew.pl b/serials/subscription-renew.pl >index 5da15363c19..d7eaa210ae2 100755 >--- a/serials/subscription-renew.pl >+++ b/serials/subscription-renew.pl >@@ -47,7 +47,6 @@ use Modern::Perl; > > use CGI qw ( -utf8 ); > use Carp qw( carp ); >-use C4::Koha; > use C4::Auth qw( get_template_and_user ); > use C4::Context; > use C4::Auth qw( get_template_and_user ); >diff --git a/serials/viewalerts.pl b/serials/viewalerts.pl >index bb356c6331c..42dfd7fbf23 100755 >--- a/serials/viewalerts.pl >+++ b/serials/viewalerts.pl >@@ -21,7 +21,6 @@ > use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > > use Koha::Subscriptions; >diff --git a/suggestion/suggestion.pl b/suggestion/suggestion.pl >index c38367256f0..16662f3615e 100755 >--- a/suggestion/suggestion.pl >+++ b/suggestion/suggestion.pl >@@ -22,11 +22,9 @@ require Exporter; > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Suggestions; > use C4::Koha qw( GetAuthorisedValues ); > use C4::Budgets qw( GetBudget GetBudgets GetBudgetHierarchy CanUserUseBudget ); > use C4::Search qw( FindDuplicate GetDistinctValues ); >-use C4::Members; > use Koha::DateUtils qw( dt_from_string ); > use Koha::AuthorisedValues; > use Koha::Acquisition::Currencies; >diff --git a/svc/bib b/svc/bib >index d25d0710c6a..f13d171c4fb 100755 >--- a/svc/bib >+++ b/svc/bib >@@ -24,7 +24,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw( check_api_auth ); > use C4::Biblio qw( GetFrameworkCode ); >-use C4::Items; > use XML::Simple; > use Koha::Biblios; > >diff --git a/svc/bib_framework b/svc/bib_framework >index 711b8f7913a..e796820114a 100755 >--- a/svc/bib_framework >+++ b/svc/bib_framework >@@ -20,8 +20,6 @@ > use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw/check_api_auth/; >-use C4::Biblio; >-use C4::Items; > use XML::Simple; > > binmode STDOUT, ':encoding(UTF-8)'; >diff --git a/svc/bib_profile b/svc/bib_profile >index 46ebe379635..879f7ef5191 100755 >--- a/svc/bib_profile >+++ b/svc/bib_profile >@@ -23,7 +23,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw/check_api_auth/; > use C4::Context; >-use C4::Koha; > use Koha::ItemTypes; > use XML::Simple; > >diff --git a/svc/cataloguing/automatic_linker.pl b/svc/cataloguing/automatic_linker.pl >index 17159d96865..526237c376e 100755 >--- a/svc/cataloguing/automatic_linker.pl >+++ b/svc/cataloguing/automatic_linker.pl >@@ -22,7 +22,6 @@ use CGI; > use JSON qw( to_json ); > use C4::Auth qw( check_cookie_auth ); > use C4::Biblio qw( BiblioAutoLink TransformHtmlToMarc ); >-use C4::Context; > > my $input = CGI->new; > print $input->header('application/json'); >diff --git a/t/lib/Mocks/Zebra.pm b/t/lib/Mocks/Zebra.pm >index 62e8b9480b2..02665b6885d 100644 >--- a/t/lib/Mocks/Zebra.pm >+++ b/t/lib/Mocks/Zebra.pm >@@ -21,7 +21,6 @@ use File::Basename qw(dirname ); > use File::Temp qw( tempdir ); > use File::Path qw( rmtree ); > use JSON qw( decode_json ); >-use C4::ImportBatch; > > =head1 NAME > >diff --git a/tools/additional-contents.pl b/tools/additional-contents.pl >index 3d165216eac..afdba62fd84 100755 >--- a/tools/additional-contents.pl >+++ b/tools/additional-contents.pl >@@ -25,7 +25,6 @@ > use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw(get_template_and_user); >-use C4::Koha; > use C4::Context; > use C4::Log qw( logaction ); > use C4::Output qw(output_html_with_http_headers); >diff --git a/tools/automatic_item_modification_by_age.pl b/tools/automatic_item_modification_by_age.pl >index a3138091d31..4b2e162cc99 100755 >--- a/tools/automatic_item_modification_by_age.pl >+++ b/tools/automatic_item_modification_by_age.pl >@@ -38,7 +38,6 @@ use JSON qw( to_json ); > use C4::Auth qw( get_template_and_user ); > use C4::Context; > use C4::Output qw( output_html_with_http_headers ); >-use C4::Koha; > > use Koha::Items; > use Koha::Biblioitems; >diff --git a/tools/background-job-progress.pl b/tools/background-job-progress.pl >index ae6df95e863..e676541c61c 100755 >--- a/tools/background-job-progress.pl >+++ b/tools/background-job-progress.pl >@@ -22,7 +22,6 @@ use Modern::Perl; > # standard or CPAN modules used > use CGI qw ( -utf8 ); > use CGI::Session; >-use C4::Context; > use C4::Auth qw( check_cookie_auth ); > use C4::BackgroundJob; > use CGI::Cookie; # need to check cookies before >diff --git a/tools/batch_delete_records.pl b/tools/batch_delete_records.pl >index a1781802b82..c5427478c2a 100755 >--- a/tools/batch_delete_records.pl >+++ b/tools/batch_delete_records.pl >@@ -27,8 +27,6 @@ use Try::Tiny; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); >-use C4::Biblio; >-use C4::AuthoritiesMarc; > use Koha::Virtualshelves; > > use Koha::Authorities; >diff --git a/tools/batch_records_ajax.pl b/tools/batch_records_ajax.pl >index 3d706013ba4..e5e87b5df08 100755 >--- a/tools/batch_records_ajax.pl >+++ b/tools/batch_records_ajax.pl >@@ -34,7 +34,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use JSON qw( to_json ); > >-use C4::Context; > use C4::Auth qw( check_cookie_auth ); > use C4::ImportBatch qw( GetImportBatch GetImportRecordsRange GetImportRecordMatches ); > >diff --git a/tools/copy-holidays.pl b/tools/copy-holidays.pl >index 381f9e70a54..b237c5eb8c8 100755 >--- a/tools/copy-holidays.pl >+++ b/tools/copy-holidays.pl >@@ -22,7 +22,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > > use C4::Auth qw( checkauth ); >-use C4::Output; > > > use C4::Calendar; >diff --git a/tools/csv-profiles.pl b/tools/csv-profiles.pl >index 2883f71d49b..871c7a1006d 100755 >--- a/tools/csv-profiles.pl >+++ b/tools/csv-profiles.pl >@@ -38,7 +38,6 @@ use Modern::Perl; > use Encode; > > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use CGI qw ( -utf8 ); > use Koha::CsvProfiles; >diff --git a/tools/exceptionHolidays.pl b/tools/exceptionHolidays.pl >index a96b1d0ebb6..91148cd5c6d 100755 >--- a/tools/exceptionHolidays.pl >+++ b/tools/exceptionHolidays.pl >@@ -5,7 +5,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > > use C4::Auth qw( checkauth ); >-use C4::Output; > use DateTime; > > use C4::Calendar; >diff --git a/tools/import_borrowers.pl b/tools/import_borrowers.pl >index 8e4fb5f40f0..4cca4c4607f 100755 >--- a/tools/import_borrowers.pl >+++ b/tools/import_borrowers.pl >@@ -187,4 +187,3 @@ else { > } > > output_html_with_http_headers $input, $cookie, $template->output; >- >diff --git a/tools/manage-marc-import.pl b/tools/manage-marc-import.pl >index 9ee6917be48..beb2f2b17c2 100755 >--- a/tools/manage-marc-import.pl >+++ b/tools/manage-marc-import.pl >@@ -26,7 +26,6 @@ use MARC::File::USMARC; > > # Koha modules used > use C4::Context; >-use C4::Koha; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); > use C4::ImportBatch qw( CleanBatch DeleteBatch GetImportBatch GetImportBatchOverlayAction GetImportBatchNoMatchAction GetImportBatchItemAction SetImportBatchOverlayAction SetImportBatchNoMatchAction SetImportBatchItemAction BatchFindDuplicates SetImportBatchMatcher GetItemNumbersFromImportBatch GetImportBatchRangeDesc GetNumberOfNonZ3950ImportBatches BatchCommitRecords BatchRevertRecords ); >@@ -443,4 +442,3 @@ sub add_page_numbers { > } > $template->param(pages => \@pages); > } >- >diff --git a/tools/modborrowers.pl b/tools/modborrowers.pl >index bb35b8e1c03..e463296a281 100755 >--- a/tools/modborrowers.pl >+++ b/tools/modborrowers.pl >@@ -29,7 +29,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > use C4::Auth qw( get_template_and_user ); > use C4::Koha qw( GetAuthorisedValues ); >-use C4::Members; > use C4::Output qw( output_html_with_http_headers ); > use Koha::DateUtils qw( dt_from_string ); > use Koha::List::Patron qw( GetPatronLists ); >diff --git a/tools/newHolidays.pl b/tools/newHolidays.pl >index b07079d52b1..d5e53fb8973 100755 >--- a/tools/newHolidays.pl >+++ b/tools/newHolidays.pl >@@ -22,7 +22,6 @@ use Modern::Perl; > use CGI qw ( -utf8 ); > > use C4::Auth qw( checkauth ); >-use C4::Output; > > use C4::Calendar; > use DateTime; >diff --git a/tools/overduerules.pl b/tools/overduerules.pl >index 1e5d920a076..9d145af04db 100755 >--- a/tools/overduerules.pl >+++ b/tools/overduerules.pl >@@ -22,8 +22,6 @@ use CGI qw ( -utf8 ); > use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); >-use C4::Letters; >-use C4::Members; > use C4::Overdues qw( GetOverdueMessageTransportTypes ); > use Koha::Libraries; > >diff --git a/tools/picture-upload.pl b/tools/picture-upload.pl >index 839976890ce..2f54f8b4807 100755 >--- a/tools/picture-upload.pl >+++ b/tools/picture-upload.pl >@@ -28,7 +28,6 @@ use MIME::Base64; > use C4::Context; > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_and_exit output_html_with_http_headers ); >-use C4::Members; > > use Koha::Logger; > use Koha::Patrons; >diff --git a/tools/problem-reports.pl b/tools/problem-reports.pl >index 31a3671b688..f4fa10608ee 100755 >--- a/tools/problem-reports.pl >+++ b/tools/problem-reports.pl >@@ -20,7 +20,6 @@ > use Modern::Perl; > > use CGI qw ( -utf8 ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); > use Koha::ProblemReports; >diff --git a/tools/quotes-upload.pl b/tools/quotes-upload.pl >index 6efb6da313d..1639dff2b29 100755 >--- a/tools/quotes-upload.pl >+++ b/tools/quotes-upload.pl >@@ -23,7 +23,6 @@ use CGI qw ( -utf8 ); > use autouse 'Data::Dumper' => qw(Dumper); > > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > > my $cgi = CGI->new; >diff --git a/tools/quotes.pl b/tools/quotes.pl >index b45f55ea169..15243bd9a25 100755 >--- a/tools/quotes.pl >+++ b/tools/quotes.pl >@@ -21,7 +21,6 @@ use CGI qw ( -utf8 ); > use Try::Tiny qw( catch try ); > > use C4::Auth qw( get_template_and_user ); >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use Koha::Quotes; > >diff --git a/tools/showdiffmarc.pl b/tools/showdiffmarc.pl >index 54b33ddad97..3367852cbb1 100755 >--- a/tools/showdiffmarc.pl >+++ b/tools/showdiffmarc.pl >@@ -25,7 +25,6 @@ use Modern::Perl; > use CGI qw(:standard -utf8); > > # Koha modules used >-use C4::Context; > use C4::Output qw( output_html_with_http_headers ); > use C4::Auth qw( get_template_and_user ); > use C4::Auth qw( get_template_and_user ); >diff --git a/tools/upload-file.pl b/tools/upload-file.pl >index 125e7cb611f..6a6d2600509 100755 >--- a/tools/upload-file.pl >+++ b/tools/upload-file.pl >@@ -25,7 +25,6 @@ use Encode; > use JSON; > use URI::Escape qw( uri_unescape ); > >-use C4::Context; > use C4::Auth qw( check_cookie_auth get_session ); > use Koha::Uploader; > >diff --git a/virtualshelves/downloadshelf.pl b/virtualshelves/downloadshelf.pl >index 1138b530ce3..bb1e3f01e59 100755 >--- a/virtualshelves/downloadshelf.pl >+++ b/virtualshelves/downloadshelf.pl >@@ -23,7 +23,6 @@ use CGI qw ( -utf8 ); > > use C4::Auth qw( get_template_and_user ); > use C4::Output qw( output_html_with_http_headers ); >-use C4::Record; > use C4::Ris qw( marc2ris ); > > use Koha::Biblios; >diff --git a/virtualshelves/shelves.pl b/virtualshelves/shelves.pl >index eb5e77461f4..d6a8efa143c 100755 >--- a/virtualshelves/shelves.pl >+++ b/virtualshelves/shelves.pl >@@ -29,7 +29,6 @@ use C4::Koha qw( > GetNormalizedUPC > ); > use C4::Items qw( GetItemsLocationInfo ); >-use C4::Members; > use C4::Output qw( pagination_bar output_html_with_http_headers ); > use C4::XSLT qw( XSLTParse4Display ); > >-- >2.25.1
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
|
Splinter Review
Attachments on
bug 30926
:
135804
|
135805
|
135806
|
136250
|
136251
| 138795