Browse Source

Bug 28591: Don't pass debug to get_template_and_user

There is a "debug" parameter we are passing from the controller scripts
to C4::Auth::get_template_and_user, but it's not actually used!

Test plan:
Confirm the assumption
Review the changes from this patch

Generated with:
perl -p -i -e 's#\s*debug\s*=\>\s*(0|1),?\s*##gms' **/*.pl

git checkout misc/devel/update_dbix_class_files.pl # Wrong catch
+ Manual fix in acqui/neworderempty.pl

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
21.11.x
Jonathan Druart 3 years ago
parent
commit
6f204fdf96
  1. 1
      about.pl
  2. 1
      acqui/acqui-home.pl
  3. 1
      acqui/addorder.pl
  4. 1
      acqui/addorderiso2709.pl
  5. 1
      acqui/basket.pl
  6. 1
      acqui/basketgroup.pl
  7. 1
      acqui/basketheader.pl
  8. 1
      acqui/booksellers.pl
  9. 1
      acqui/cancelorder.pl
  10. 2
      acqui/check_budget_total.pl
  11. 1
      acqui/edi_ean.pl
  12. 1
      acqui/edifactmsgs.pl
  13. 1
      acqui/edimsg.pl
  14. 1
      acqui/histsearch.pl
  15. 1
      acqui/invoice-files.pl
  16. 1
      acqui/invoice.pl
  17. 1
      acqui/invoices.pl
  18. 1
      acqui/lateorders.pl
  19. 1
      acqui/modordernotes.pl
  20. 2
      acqui/neworderempty.pl
  21. 1
      acqui/ordered.pl
  22. 1
      acqui/orderreceive.pl
  23. 1
      acqui/parcel.pl
  24. 1
      acqui/parcels.pl
  25. 1
      acqui/spent.pl
  26. 1
      acqui/supplier.pl
  27. 1
      acqui/uncertainprice.pl
  28. 1
      admin/additional-fields.pl
  29. 1
      admin/admin-home.pl
  30. 1
      admin/adveditorshortcuts.pl
  31. 1
      admin/aqbudgetperiods.pl
  32. 1
      admin/aqbudgets.pl
  33. 1
      admin/aqcontract.pl
  34. 1
      admin/aqplan.pl
  35. 1
      admin/audio_alerts.pl
  36. 1
      admin/auth_subfields_structure.pl
  37. 1
      admin/auth_tag_structure.pl
  38. 1
      admin/authorised_values.pl
  39. 1
      admin/authtypes.pl
  40. 1
      admin/background_jobs.pl
  41. 1
      admin/biblio_framework.pl
  42. 1
      admin/branch_transfer_limits.pl
  43. 1
      admin/branches.pl
  44. 1
      admin/categories.pl
  45. 1
      admin/check_budget_parent.pl
  46. 1
      admin/check_parent_total.pl
  47. 1
      admin/checkmarc.pl
  48. 1
      admin/cities.pl
  49. 1
      admin/classsources.pl
  50. 1
      admin/clone-rules.pl
  51. 1
      admin/columns_settings.pl
  52. 1
      admin/credit_types.pl
  53. 1
      admin/debit_types.pl
  54. 1
      admin/desks.pl
  55. 1
      admin/didyoumean.pl
  56. 1
      admin/itemtypes.pl
  57. 1
      admin/koha2marclinks.pl
  58. 1
      admin/library_groups.pl
  59. 1
      admin/localization.pl
  60. 1
      admin/marc_subfields_structure.pl
  61. 1
      admin/marctagstructure.pl
  62. 1
      admin/matching-rules.pl
  63. 1
      admin/oai_set_mappings.pl
  64. 1
      admin/oai_sets.pl
  65. 1
      admin/preferences.pl
  66. 1
      admin/share_content.pl
  67. 1
      admin/smart-rules.pl
  68. 1
      admin/sms_providers.pl
  69. 1
      admin/systempreferences.pl
  70. 1
      admin/transfer_limits.pl
  71. 1
      admin/transport-cost-matrix.pl
  72. 1
      admin/usage_statistics.pl
  73. 1
      admin/z3950servers.pl
  74. 3
      authorities/authorities-home.pl
  75. 1
      authorities/authorities.pl
  76. 1
      authorities/detail-biblio-search.pl
  77. 1
      authorities/detail.pl
  78. 1
      authorities/export.pl
  79. 1
      catalogue/MARCdetail.pl
  80. 1
      catalogue/export.pl
  81. 1
      catalogue/labeledMARCdetail.pl
  82. 1
      catalogue/showmarc.pl
  83. 1
      cataloguing/addbooks.pl
  84. 1
      cataloguing/additem.pl
  85. 1
      cataloguing/linkitem.pl
  86. 1
      cataloguing/moveitem.pl
  87. 1
      cataloguing/value_builder/callnumber-KU.pl
  88. 1
      cataloguing/value_builder/callnumber.pl
  89. 1
      cataloguing/value_builder/macles.pl
  90. 1
      cataloguing/value_builder/marc21_field_006.pl
  91. 1
      cataloguing/value_builder/marc21_field_007.pl
  92. 1
      cataloguing/value_builder/marc21_field_008.pl
  93. 1
      cataloguing/value_builder/marc21_field_008_authorities.pl
  94. 1
      cataloguing/value_builder/marc21_field_008_classifications.pl
  95. 1
      cataloguing/value_builder/marc21_leader.pl
  96. 1
      cataloguing/value_builder/marc21_leader_authorities.pl
  97. 2
      cataloguing/value_builder/marc21_linking_section.pl
  98. 1
      cataloguing/value_builder/normarc_field_007.pl
  99. 1
      cataloguing/value_builder/normarc_field_008.pl
  100. 1
      cataloguing/value_builder/normarc_leader.pl

1
about.pl

@ -68,7 +68,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $query, query => $query,
type => "intranet", type => "intranet",
flagsrequired => { catalogue => 1 }, flagsrequired => { catalogue => 1 },
debug => 1,
} }
); );

1
acqui/acqui-home.pl

@ -45,7 +45,6 @@ my ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
query => $query, query => $query,
type => 'intranet', type => 'intranet',
flagsrequired => { acquisition => '*' }, flagsrequired => { acquisition => '*' },
debug => 1,
} }
); );

1
acqui/addorder.pl

@ -219,7 +219,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => 'order_manage' }, flagsrequired => { acquisition => 'order_manage' },
debug => 1,
} }
); );

1
acqui/addorderiso2709.pl

@ -57,7 +57,6 @@ my ($template, $loggedinuser, $cookie, $userflags) = get_template_and_user({
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => 'order_manage' }, flagsrequired => { acquisition => 'order_manage' },
debug => 1,
}); });
my $cgiparams = $input->Vars; my $cgiparams = $input->Vars;

1
acqui/basket.pl

@ -86,7 +86,6 @@ our ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
query => $query, query => $query,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => 'order_manage' }, flagsrequired => { acquisition => 'order_manage' },
debug => 1,
} }
); );

1
acqui/basketgroup.pl

@ -66,7 +66,6 @@ our ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {acquisition => 'group_manage'}, flagsrequired => {acquisition => 'group_manage'},
debug => 1,
}); });
sub BasketTotal { sub BasketTotal {

1
acqui/basketheader.pl

@ -64,7 +64,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => 'order_manage' }, flagsrequired => { acquisition => 'order_manage' },
debug => 1,
} }
); );

1
acqui/booksellers.pl

@ -70,7 +70,6 @@ my ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
query => $query, query => $query,
type => 'intranet', type => 'intranet',
flagsrequired => { acquisition => '*' }, flagsrequired => { acquisition => '*' },
debug => 1,
} }
); );

1
acqui/cancelorder.pl

@ -43,7 +43,6 @@ my ($template, $loggedinuser, $cookie, $flags) = get_template_and_user( {
query => $input, query => $input,
type => 'intranet', type => 'intranet',
flagsrequired => { 'acquisition' => 'order_manage' }, flagsrequired => { 'acquisition' => 'order_manage' },
debug => 1,
} ); } );
my $action = $input->param('action'); my $action = $input->param('action');

2
acqui/check_budget_total.pl

@ -38,7 +38,7 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
{ template_name => "acqui/ajax.tt", { template_name => "acqui/ajax.tt",
query => $input, query => $input,
type => "intranet", type => "intranet",
debug => 1, } ); } );
my $budget = GetBudget($budget_id); my $budget = GetBudget($budget_id);

1
acqui/edi_ean.pl

@ -52,7 +52,6 @@ else {
query => $query, query => $query,
type => 'intranet', type => 'intranet',
flagsrequired => { acquisition => 'order_manage' }, flagsrequired => { acquisition => 'order_manage' },
debug => 1,
} }
); );
$template->param( eans => \@eans ); $template->param( eans => \@eans );

1
acqui/edifactmsgs.pl

@ -33,7 +33,6 @@ my ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
query => $q, query => $q,
type => 'intranet', type => 'intranet',
flagsrequired => { acquisition => 'edi_manage' }, flagsrequired => { acquisition => 'edi_manage' },
debug => 1,
} }
); );

1
acqui/edimsg.pl

@ -31,7 +31,6 @@ my ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
query => $q, query => $q,
type => 'intranet', type => 'intranet',
flagsrequired => { acquisition => 'edi_manage' }, flagsrequired => { acquisition => 'edi_manage' },
debug => 1,
} }
); );
my $msg_id = $q->param('id'); my $msg_id = $q->param('id');

1
acqui/histsearch.pl

@ -69,7 +69,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => '*' }, flagsrequired => { acquisition => '*' },
debug => 1,
} }
); );

1
acqui/invoice-files.pl

@ -42,7 +42,6 @@ my ( $template, $loggedinuser, $cookie, $flags ) = get_template_and_user(
query => $input, query => $input,
type => 'intranet', type => 'intranet',
flagsrequired => { 'acquisition' => '*' }, flagsrequired => { 'acquisition' => '*' },
debug => 1,
} }
); );

1
acqui/invoice.pl

@ -47,7 +47,6 @@ my ( $template, $loggedinuser, $cookie, $flags ) = get_template_and_user(
query => $input, query => $input,
type => 'intranet', type => 'intranet',
flagsrequired => { 'acquisition' => '*' }, flagsrequired => { 'acquisition' => '*' },
debug => 1,
} }
); );

1
acqui/invoices.pl

@ -44,7 +44,6 @@ my ( $template, $loggedinuser, $cookie, $flags ) = get_template_and_user(
query => $input, query => $input,
type => 'intranet', type => 'intranet',
flagsrequired => { 'acquisition' => '*' }, flagsrequired => { 'acquisition' => '*' },
debug => 1,
} }
); );

1
acqui/lateorders.pl

@ -62,7 +62,6 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => 'order_receive' }, flagsrequired => { acquisition => 'order_receive' },
debug => 1,
} }
); );

1
acqui/modordernotes.pl

@ -41,7 +41,6 @@ my ($template, $loggedinuser, $cookie, $flags) = get_template_and_user( {
query => $input, query => $input,
type => 'intranet', type => 'intranet',
flagsrequired => { 'acquisition' => '*' }, flagsrequired => { 'acquisition' => '*' },
debug => 1,
} ); } );
my $op = $input->param('op'); my $op = $input->param('op');

2
acqui/neworderempty.pl

@ -116,7 +116,6 @@ our ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => 'order_manage' }, flagsrequired => { acquisition => 'order_manage' },
debug => 1,
} }
); );
@ -591,7 +590,6 @@ sub Load_Duplicate {
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => 'order_manage' }, flagsrequired => { acquisition => 'order_manage' },
# debug => 1,
} }
); );

1
acqui/ordered.pl

@ -46,7 +46,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => '*' }, flagsrequired => { acquisition => '*' },
debug => 1,
} }
); );

1
acqui/orderreceive.pl

@ -97,7 +97,6 @@ my ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {acquisition => 'order_receive'}, flagsrequired => {acquisition => 'order_receive'},
debug => 1,
} }
); );

1
acqui/parcel.pl

@ -81,7 +81,6 @@ my ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {acquisition => 'order_receive'}, flagsrequired => {acquisition => 'order_receive'},
debug => 1,
}); });
my $op = $input->param('op') // ''; my $op = $input->param('op') // '';

1
acqui/parcels.pl

@ -93,7 +93,6 @@ our ( $template, $loggedinuser, $cookie, $flags ) = get_template_and_user(
query => $input, query => $input,
type => 'intranet', type => 'intranet',
flagsrequired => { acquisition => 'order_receive' }, flagsrequired => { acquisition => 'order_receive' },
debug => 1,
} }
); );

1
acqui/spent.pl

@ -48,7 +48,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => '*' }, flagsrequired => { acquisition => '*' },
debug => 1,
} }
); );

1
acqui/supplier.pl

@ -60,7 +60,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $query, query => $query,
type => 'intranet', type => 'intranet',
flagsrequired => { acquisition => '*' }, flagsrequired => { acquisition => '*' },
debug => 1,
} }
); );
my $booksellerid = $query->param('booksellerid'); my $booksellerid = $query->param('booksellerid');

1
acqui/uncertainprice.pl

@ -62,7 +62,6 @@ my ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => 'order_manage' }, flagsrequired => { acquisition => 'order_manage' },
debug => 1,
}); });
my $booksellerid = $input->param('booksellerid'); my $booksellerid = $input->param('booksellerid');

1
admin/additional-fields.pl

@ -42,7 +42,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => \%flagsrequired, flagsrequired => \%flagsrequired,
debug => 1,
} }
); );

1
admin/admin-home.pl

@ -33,7 +33,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $query, query => $query,
type => "intranet", type => "intranet",
flagsrequired => { parameters => '*' }, flagsrequired => { parameters => '*' },
debug => 1,
} }
); );

1
admin/adveditorshortcuts.pl

@ -51,7 +51,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_keyboard_shortcuts' }, flagsrequired => { parameters => 'manage_keyboard_shortcuts' },
debug => 1,
} }
); );

1
admin/aqbudgetperiods.pl

@ -83,7 +83,6 @@ my ($template, $borrowernumber, $cookie, $staff_flags ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => 'period_manage' }, flagsrequired => { acquisition => 'period_manage' },
debug => 1,
} }
); );

1
admin/aqbudgets.pl

@ -44,7 +44,6 @@ my ($template, $borrowernumber, $cookie, $staffflags ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => 'budget_manage' }, flagsrequired => { acquisition => 'budget_manage' },
debug => 0,
} }
); );

1
admin/aqcontract.pl

@ -42,7 +42,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => 'contracts_manage' }, flagsrequired => { acquisition => 'contracts_manage' },
debug => 1,
} }
); );

1
admin/aqplan.pl

@ -46,7 +46,6 @@ my ( $template, $borrowernumber, $cookie, $staff_flags ) = get_template_and_user
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { acquisition => 'planning_manage' }, flagsrequired => { acquisition => 'planning_manage' },
debug => 0,
} }
); );

1
admin/audio_alerts.pl

@ -40,7 +40,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $cgi, query => $cgi,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_audio_alerts' }, flagsrequired => { parameters => 'manage_audio_alerts' },
debug => 1,
} }
); );

1
admin/auth_subfields_structure.pl

@ -42,7 +42,6 @@ my ($template, $borrowernumber, $cookie) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_marc_frameworks' }, flagsrequired => { parameters => 'manage_marc_frameworks' },
debug => 1,
} }
); );
my $pagesize = 30; my $pagesize = 30;

1
admin/auth_tag_structure.pl

@ -50,7 +50,6 @@ my ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {parameters => 'manage_marc_frameworks'}, flagsrequired => {parameters => 'manage_marc_frameworks'},
debug => 1,
}); });
my $authority_types = Koha::Authority::Types->search( {}, { order_by => ['authtypecode'] } ); my $authority_types = Koha::Authority::Types->search( {}, { order_by => ['authtypecode'] } );

1
admin/authorised_values.pl

@ -44,7 +44,6 @@ our ($template, $borrowernumber, $cookie)= get_template_and_user({
flagsrequired => {parameters => 'manage_auth_values'}, flagsrequired => {parameters => 'manage_auth_values'},
query => $input, query => $input,
type => "intranet", type => "intranet",
debug => 1,
}); });
################## ADD_FORM ################################## ################## ADD_FORM ##################################

1
admin/authtypes.pl

@ -37,7 +37,6 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_marc_frameworks' }, flagsrequired => { parameters => 'manage_marc_frameworks' },
debug => 1,
} }
); );

1
admin/background_jobs.pl

@ -40,7 +40,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => $flags_required, flagsrequired => $flags_required,
debug => 1,
} }
); );

1
admin/biblio_framework.pl

@ -39,7 +39,6 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_marc_frameworks' }, flagsrequired => { parameters => 'manage_marc_frameworks' },
debug => 1,
} }
); );

1
admin/branch_transfer_limits.pl

@ -34,7 +34,6 @@ my ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {parameters => 'manage_transfers'}, flagsrequired => {parameters => 'manage_transfers'},
debug => 1,
}); });
my $dbh = C4::Context->dbh; my $dbh = C4::Context->dbh;

1
admin/branches.pl

@ -45,7 +45,6 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_libraries' }, flagsrequired => { parameters => 'manage_libraries' },
debug => 1,
} }
); );

1
admin/categories.pl

@ -43,7 +43,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_patron_categories' }, flagsrequired => { parameters => 'manage_patron_categories' },
debug => 1,
} }
); );

1
admin/check_budget_parent.pl

@ -40,7 +40,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
{ template_name => "acqui/ajax.tt", { template_name => "acqui/ajax.tt",
query => $input, query => $input,
type => "intranet", type => "intranet",
debug => 0,
} }
); );

1
admin/check_parent_total.pl

@ -46,7 +46,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
{ template_name => "acqui/ajax.tt", { template_name => "acqui/ajax.tt",
query => $input, query => $input,
type => "intranet", type => "intranet",
debug => 0,
} }
); );
my ($period, $parent , $budget); my ($period, $parent , $budget);

1
admin/checkmarc.pl

@ -33,7 +33,6 @@ my ($template, $borrowernumber, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_marc_frameworks' }, flagsrequired => { parameters => 'manage_marc_frameworks' },
debug => 1,
}); });
my $dbh = C4::Context->dbh; my $dbh = C4::Context->dbh;

1
admin/cities.pl

@ -37,7 +37,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_cities' }, flagsrequired => { parameters => 'manage_cities' },
debug => 1,
} }
); );

1
admin/classsources.pl

@ -50,7 +50,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_classifications' }, flagsrequired => { parameters => 'manage_classifications' },
debug => 1,
} }
); );

1
admin/clone-rules.pl

@ -41,7 +41,6 @@ my ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {parameters => 'manage_circ_rules'}, flagsrequired => {parameters => 'manage_circ_rules'},
debug => 1,
}); });
my $frombranch = $input->param("frombranch"); my $frombranch = $input->param("frombranch");

1
admin/columns_settings.pl

@ -14,7 +14,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_column_config' }, flagsrequired => { parameters => 'manage_column_config' },
debug => 1,
} }
); );

1
admin/credit_types.pl

@ -39,7 +39,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_accounts' }, flagsrequired => { parameters => 'manage_accounts' },
debug => 1,
} }
); );

1
admin/debit_types.pl

@ -39,7 +39,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_accounts' }, flagsrequired => { parameters => 'manage_accounts' },
debug => 1,
} }
); );

1
admin/desks.pl

@ -38,7 +38,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
type => "intranet", type => "intranet",
authnotrequired => 0, authnotrequired => 0,
flagsrequired => { parameters => 'manage_libraries' }, flagsrequired => { parameters => 'manage_libraries' },
debug => 1,
} }
); );

1
admin/didyoumean.pl

@ -16,7 +16,6 @@ my ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {parameters => 'manage_didyoumean'}, flagsrequired => {parameters => 'manage_didyoumean'},
debug => 1,
}); });
my $opacplugins = from_json(C4::Context->preference('OPACdidyoumean') || '[]'); my $opacplugins = from_json(C4::Context->preference('OPACdidyoumean') || '[]');

1
admin/itemtypes.pl

@ -46,7 +46,6 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_itemtypes' }, flagsrequired => { parameters => 'manage_itemtypes' },
debug => 1,
} }
); );

1
admin/koha2marclinks.pl

@ -37,7 +37,6 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user (
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_marc_frameworks' }, flagsrequired => { parameters => 'manage_marc_frameworks' },
debug => 1,
} }
); );

1
admin/library_groups.pl

@ -35,7 +35,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $cgi, query => $cgi,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_libraries' }, flagsrequired => { parameters => 'manage_libraries' },
debug => 1,
} }
); );

1
admin/localization.pl

@ -33,7 +33,6 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
flagsrequired => { parameters => 'manage_itemtypes' }, flagsrequired => { parameters => 'manage_itemtypes' },
query => $query, query => $query,
type => "intranet", type => "intranet",
debug => 1,
} }
); );

1
admin/marc_subfields_structure.pl

@ -44,7 +44,6 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_marc_frameworks' }, flagsrequired => { parameters => 'manage_marc_frameworks' },
debug => 1,
} }
); );
my $cache = Koha::Caches->get_instance(); my $cache = Koha::Caches->get_instance();

1
admin/marctagstructure.pl

@ -53,7 +53,6 @@ my ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_marc_frameworks' }, flagsrequired => { parameters => 'manage_marc_frameworks' },
debug => 1,
}); });
my $frameworks = Koha::BiblioFrameworks->search({}, { order_by => ['frameworktext'] }); my $frameworks = Koha::BiblioFrameworks->search({}, { order_by => ['frameworktext'] });

1
admin/matching-rules.pl

@ -38,7 +38,6 @@ my ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_matching_rules' }, flagsrequired => { parameters => 'manage_matching_rules' },
debug => 1,
}); });
$template->param(script_name => $script_name); $template->param(script_name => $script_name);

1
admin/oai_set_mappings.pl

@ -45,7 +45,6 @@ my ($template, $loggedinuser, $cookie, $flags) = get_template_and_user( {
query => $input, query => $input,
type => 'intranet', type => 'intranet',
flagsrequired => { 'parameters' => 'manage_oai_sets' }, flagsrequired => { 'parameters' => 'manage_oai_sets' },
debug => 1,
} ); } );
my $id = $input->param('id'); my $id = $input->param('id');

1
admin/oai_sets.pl

@ -41,7 +41,6 @@ my ($template, $loggedinuser, $cookie, $flags) = get_template_and_user( {
query => $input, query => $input,
type => 'intranet', type => 'intranet',
flagsrequired => { 'parameters' => 'manage_oai_sets' }, flagsrequired => { 'parameters' => 'manage_oai_sets' },
debug => 1,
} ); } );
my $op = $input->param('op'); my $op = $input->param('op');

1
admin/preferences.pl

@ -334,7 +334,6 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_sysprefs' }, flagsrequired => { parameters => 'manage_sysprefs' },
debug => 1,
} }
); );

1
admin/share_content.pl

@ -33,7 +33,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $query, query => $query,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_mana' }, flagsrequired => { parameters => 'manage_mana' },
debug => 1,
} }
); );

1
admin/smart-rules.pl

@ -43,7 +43,6 @@ my ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {parameters => 'manage_circ_rules'}, flagsrequired => {parameters => 'manage_circ_rules'},
debug => 1,
}); });
my $type=$input->param('type'); my $type=$input->param('type');

1
admin/sms_providers.pl

@ -36,7 +36,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $cgi, query => $cgi,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_sms_providers' }, flagsrequired => { parameters => 'manage_sms_providers' },
debug => 1,
} }
); );

1
admin/systempreferences.pl

@ -216,7 +216,6 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_sysprefs' }, flagsrequired => { parameters => 'manage_sysprefs' },
debug => 1,
} }
); );
my $pagesize = 100; my $pagesize = 100;

1
admin/transfer_limits.pl

@ -35,7 +35,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_transfers' }, flagsrequired => { parameters => 'manage_transfers' },
debug => 1,
} }
); );

1
admin/transport-cost-matrix.pl

@ -37,7 +37,6 @@ my ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_transfers' }, flagsrequired => { parameters => 'manage_transfers' },
debug => 1,
}); });
my $use_transport_cost_matrix = C4::Context->preference("UseTransportCostMatrix"); my $use_transport_cost_matrix = C4::Context->preference("UseTransportCostMatrix");

1
admin/usage_statistics.pl

@ -30,7 +30,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $query, query => $query,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_usage_stats' }, flagsrequired => { parameters => 'manage_usage_stats' },
debug => 1,
} }
); );

1
admin/z3950servers.pl

@ -45,7 +45,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user( {
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { parameters => 'manage_search_targets' }, flagsrequired => { parameters => 'manage_search_targets' },
debug => 1,
}); });
my $script_name = "/cgi-bin/koha/admin/z3950servers.pl"; my $script_name = "/cgi-bin/koha/admin/z3950servers.pl";
$template->param( script_name => $script_name ); $template->param( script_name => $script_name );

3
authorities/authorities-home.pl

@ -55,7 +55,6 @@ if ( $op eq "delete" ) {
query => $query, query => $query,
type => 'intranet', type => 'intranet',
flagsrequired => { catalogue => 1 }, flagsrequired => { catalogue => 1 },
debug => 1,
} }
); );
@ -105,7 +104,6 @@ if ( $op eq "do_search" ) {
query => $query, query => $query,
type => 'intranet', type => 'intranet',
flagsrequired => { catalogue => 1 }, flagsrequired => { catalogue => 1 },
debug => 1,
} }
); );
@ -203,7 +201,6 @@ if ( $op eq '' ) {
query => $query, query => $query,
type => 'intranet', type => 'intranet',
flagsrequired => { catalogue => 1 }, flagsrequired => { catalogue => 1 },
debug => 1,
} }
); );

1
authorities/authorities.pl

@ -581,7 +581,6 @@ my ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {editauthorities => 1}, flagsrequired => {editauthorities => 1},
debug => 1,
}); });
$template->param(nonav => $nonav,index=>$myindex,authtypecode=>$authtypecode,breedingid=>$breedingid); $template->param(nonav => $nonav,index=>$myindex,authtypecode=>$authtypecode,breedingid=>$breedingid);

1
authorities/detail-biblio-search.pl

@ -68,7 +68,6 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user(
query => $query, query => $query,
type => "intranet", type => "intranet",
flagsrequired => { catalogue => 1 }, flagsrequired => { catalogue => 1 },
debug => 1,
} }
); );

1
authorities/detail.pl

@ -175,7 +175,6 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user(
query => $query, query => $query,
type => "intranet", type => "intranet",
flagsrequired => { catalogue => 1 }, flagsrequired => { catalogue => 1 },
debug => 1,
} }
); );

1
authorities/export.pl

@ -14,7 +14,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $query, query => $query,
type => "intranet", type => "intranet",
flagsrequired => { catalogue => 1 }, flagsrequired => { catalogue => 1 },
debug => 1,
} }
); );

1
catalogue/MARCdetail.pl

@ -83,7 +83,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $query, query => $query,
type => "intranet", type => "intranet",
flagsrequired => { catalogue => 1 }, flagsrequired => { catalogue => 1 },
debug => 1,
} }
); );

1
catalogue/export.pl

@ -16,7 +16,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user({
query => $query, query => $query,
type => "intranet", type => "intranet",
flagsrequired => { catalogue => 1 }, flagsrequired => { catalogue => 1 },
debug => 1,
}); });
my $op=$query->param("op"); my $op=$query->param("op");

1
catalogue/labeledMARCdetail.pl

@ -50,7 +50,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $query, query => $query,
type => "intranet", type => "intranet",
flagsrequired => { catalogue => 1 }, flagsrequired => { catalogue => 1 },
debug => 1,
} }
); );

1
catalogue/showmarc.pl

@ -42,7 +42,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { catalogue => 1 }, flagsrequired => { catalogue => 1 },
debug => 1,
} }
); );

1
cataloguing/addbooks.pl

@ -57,7 +57,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { editcatalogue => '*' }, flagsrequired => { editcatalogue => '*' },
debug => 1,
} }
); );

1
cataloguing/additem.pl

@ -430,7 +430,6 @@ my ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {editcatalogue => $userflags}, flagsrequired => {editcatalogue => $userflags},
debug => 1,
}); });

1
cataloguing/linkitem.pl

@ -41,7 +41,6 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user(
query => $query, query => $query,
type => "intranet", type => "intranet",
flagsrequired => { editcatalogue => 'edit_catalogue' }, flagsrequired => { editcatalogue => 'edit_catalogue' },
debug => 1,
} }
); );

1
cataloguing/moveitem.pl

@ -53,7 +53,6 @@ my ($template, $loggedinuser, $cookie) = get_template_and_user(
query => $query, query => $query,
type => "intranet", type => "intranet",
flagsrequired => { editcatalogue => 'edit_items' }, flagsrequired => { editcatalogue => 'edit_items' },
debug => 1,
} }
); );

1
cataloguing/value_builder/callnumber-KU.pl

@ -71,7 +71,6 @@ my $launcher = sub {
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {editcatalogue => '*'}, flagsrequired => {editcatalogue => '*'},
debug => 1,
}); });
my $BASE_CALLNUMBER_RE = qr/^(\w+) (\w+)$/; my $BASE_CALLNUMBER_RE = qr/^(\w+) (\w+)$/;

1
cataloguing/value_builder/callnumber.pl

@ -69,7 +69,6 @@ my $launcher = sub {
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {editcatalogue => '*'}, flagsrequired => {editcatalogue => '*'},
debug => 1,
}); });
my $dbh = C4::Context->dbh; my $dbh = C4::Context->dbh;

1
cataloguing/value_builder/macles.pl

@ -161,7 +161,6 @@ my $launcher = sub {
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {editcatalogue => '*'}, flagsrequired => {editcatalogue => '*'},
debug => 1,
}); });
$template->param(BIGLOOP=>\@BIGLOOP); $template->param(BIGLOOP=>\@BIGLOOP);
$template->param("index"=>$index); $template->param("index"=>$index);

1
cataloguing/value_builder/marc21_field_006.pl

@ -59,7 +59,6 @@ my $launcher = sub {
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { editcatalogue => '*' }, flagsrequired => { editcatalogue => '*' },
debug => 1,
} }
); );
$result = "a|||||r|||| 00| 0 " unless $result; $result = "a|||||r|||| 00| 0 " unless $result;

1
cataloguing/value_builder/marc21_field_007.pl

@ -58,7 +58,6 @@ my $launcher = sub {
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { editcatalogue => '*' }, flagsrequired => { editcatalogue => '*' },
debug => 1,
} }
); );

1
cataloguing/value_builder/marc21_field_008.pl

@ -139,7 +139,6 @@ my $launcher = sub {
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { editcatalogue => '*' }, flagsrequired => { editcatalogue => '*' },
debug => 1,
} }
); );

1
cataloguing/value_builder/marc21_field_008_authorities.pl

@ -80,7 +80,6 @@ my $launcher = sub {
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {editcatalogue => '*'}, flagsrequired => {editcatalogue => '*'},
debug => 1,
}); });
my $dateentered = date_entered(); my $dateentered = date_entered();
$result = "$dateentered$defaultval" unless $result; $result = "$dateentered$defaultval" unless $result;

1
cataloguing/value_builder/marc21_field_008_classifications.pl

@ -69,7 +69,6 @@ my $launcher = sub {
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { editcatalogue => '*' }, flagsrequired => { editcatalogue => '*' },
debug => 1,
}); });
my $dateentered = date_entered(); my $dateentered = date_entered();
$result = "$dateentered$defaultval" unless $result; $result = "$dateentered$defaultval" unless $result;

1
cataloguing/value_builder/marc21_leader.pl

@ -62,7 +62,6 @@ my $launcher = sub {
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { editcatalogue => '*' }, flagsrequired => { editcatalogue => '*' },
debug => 1,
} }
); );
$result = " nam a22 7a 4500" unless $result; $result = " nam a22 7a 4500" unless $result;

1
cataloguing/value_builder/marc21_leader_authorities.pl

@ -65,7 +65,6 @@ my $launcher = sub {
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { editcatalogue => '*' }, flagsrequired => { editcatalogue => '*' },
debug => 1,
} }
); );
$result = " nz a22 n 4500" unless $result; $result = " nz a22 n 4500" unless $result;

2
cataloguing/value_builder/marc21_linking_section.pl

@ -79,7 +79,6 @@ my $launcher = sub {
query => $query, query => $query,
type => "intranet", type => "intranet",
flagsrequired => { editcatalogue => '*' }, flagsrequired => { editcatalogue => '*' },
debug => 1,
} }
); );
@ -191,7 +190,6 @@ my $launcher = sub {
{ template_name => "cataloguing/value_builder/marc21_linking_section.tt", { template_name => "cataloguing/value_builder/marc21_linking_section.tt",
query => $query, query => $query,
type => 'intranet', type => 'intranet',
debug => 1,
} }
); );

1
cataloguing/value_builder/normarc_field_007.pl

@ -54,7 +54,6 @@ my ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {editcatalogue => 1}, flagsrequired => {editcatalogue => 1},
debug => 1,
}); });
$result = "ta" unless $result; $result = "ta" unless $result;
my $f0 = substr($result,0,1); my $f0 = substr($result,0,1);

1
cataloguing/value_builder/normarc_field_008.pl

@ -78,7 +78,6 @@ sub plugin {
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => { editcatalogue => 1 }, flagsrequired => { editcatalogue => 1 },
debug => 1,
} }
); );

1
cataloguing/value_builder/normarc_leader.pl

@ -63,7 +63,6 @@ my ($template, $loggedinuser, $cookie)
query => $input, query => $input,
type => "intranet", type => "intranet",
flagsrequired => {editcatalogue => 1}, flagsrequired => {editcatalogue => 1},
debug => 1,
}); });
$result = " nam a22 1 4500" unless $result; $result = " nam a22 1 4500" unless $result;
my $f5 = substr($result,5,1); my $f5 = substr($result,5,1);

Some files were not shown because too many files changed in this diff

Loading…
Cancel
Save