Koha-community/Koha
15
7
Fork 0
Code Issues Releases Wiki Activity

Bug 28591: Don't pass debug to get_template_and_user

Browse source 
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>
This commit is contained in:
Jonathan Druart 2021-06-18 11:34:54 +02:00
parent 512c7ba7e4
commit 6f204fdf96
328 changed files with 1 additions and 340 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
about.pl
View file

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

1
acqui/acqui-home.pl
View file

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

1
acqui/addorder.pl
View file

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

1
acqui/addorderiso2709.pl
View file

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

1
acqui/basket.pl
View file

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

1
acqui/basketgroup.pl
View file

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

1
acqui/basketheader.pl
View file

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

1
acqui/booksellers.pl
View file

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

1
acqui/cancelorder.pl
View file

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

2
acqui/check_budget_total.pl
View file

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

1
acqui/edi_ean.pl
View file

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

1
acqui/edifactmsgs.pl
View file

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

1
acqui/edimsg.pl
View file

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

1
acqui/histsearch.pl
View file

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

1
acqui/invoice-files.pl
View file

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

1
acqui/invoice.pl
View file

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

1
acqui/invoices.pl
View file

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

1
acqui/lateorders.pl
View file

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

1
acqui/modordernotes.pl
View file

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

2
acqui/neworderempty.pl
View file

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

1
acqui/ordered.pl
View file

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

1
acqui/orderreceive.pl
View file

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

1
acqui/parcel.pl
View file

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

1
acqui/parcels.pl
View file

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

1
acqui/spent.pl
View file

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

1
acqui/supplier.pl
View file

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

1
acqui/uncertainprice.pl
View file

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

1
admin/additional-fields.pl
View file

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

1
admin/admin-home.pl
View file

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

1
admin/adveditorshortcuts.pl
View file

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

1
admin/aqbudgetperiods.pl
View file

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

1
admin/aqbudgets.pl
View file

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

1
admin/aqcontract.pl
View file

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

1
admin/aqplan.pl
View file

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

1
admin/audio_alerts.pl
View file

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

1
admin/auth_subfields_structure.pl
View file

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

1
admin/auth_tag_structure.pl
View file

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

1
admin/authorised_values.pl
View file

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

1
admin/authtypes.pl
View file

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

1
admin/background_jobs.pl
View file

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

1
admin/biblio_framework.pl
View file

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

1
admin/branch_transfer_limits.pl
View file

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

1
admin/branches.pl
View file

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

1
admin/categories.pl
View file

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

1
admin/check_budget_parent.pl
View file

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

1
admin/check_parent_total.pl
View file

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

1
admin/checkmarc.pl
View file

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

1
admin/cities.pl
View file

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

1
admin/classsources.pl
View file

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

1
admin/clone-rules.pl
View file

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

1
admin/columns_settings.pl
View file

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

1
admin/credit_types.pl
View file

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

1
admin/debit_types.pl
View file

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

1
admin/desks.pl
View file

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

1
admin/didyoumean.pl
View file

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

1
admin/itemtypes.pl
View file

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

1
admin/koha2marclinks.pl
View file

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

1
admin/library_groups.pl
View file

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

1
admin/localization.pl
View file

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

1
admin/marc_subfields_structure.pl
View file

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

1
admin/marctagstructure.pl
View file

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

1
admin/matching-rules.pl
View file

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

1
admin/oai_set_mappings.pl
View file

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

1
admin/oai_sets.pl
View file

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

1
admin/preferences.pl
View file

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

1
admin/share_content.pl
View file

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

1
admin/smart-rules.pl
View file

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

1
admin/sms_providers.pl
View file

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

1
admin/systempreferences.pl
View file

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

1
admin/transfer_limits.pl
View file

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

1
admin/transport-cost-matrix.pl
View file

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

1
admin/usage_statistics.pl
View file

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

1
admin/z3950servers.pl
View file

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

3
authorities/authorities-home.pl
View file

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

1
authorities/authorities.pl
View file

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

1
authorities/detail-biblio-search.pl
View file

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

1
authorities/detail.pl
View file

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

1
authorities/export.pl
View file

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

1
catalogue/MARCdetail.pl
View file

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

1
catalogue/export.pl
View file

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

1
catalogue/labeledMARCdetail.pl
View file

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

1
catalogue/showmarc.pl
View file

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

1
cataloguing/addbooks.pl
View file

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

1
cataloguing/additem.pl
View file

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

1
cataloguing/linkitem.pl
View file

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

1
cataloguing/moveitem.pl
View file

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

1
cataloguing/value_builder/callnumber-KU.pl
View file

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

1
cataloguing/value_builder/callnumber.pl
View file

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

1
cataloguing/value_builder/macles.pl
View file

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

1
cataloguing/value_builder/marc21_field_006.pl
View file

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

1
cataloguing/value_builder/marc21_field_007.pl
View file

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

1
cataloguing/value_builder/marc21_field_008.pl
View file

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

1
cataloguing/value_builder/marc21_field_008_authorities.pl
View file

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

1
cataloguing/value_builder/marc21_field_008_classifications.pl
View file

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

1
cataloguing/value_builder/marc21_leader.pl
View file

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

1
cataloguing/value_builder/marc21_leader_authorities.pl
View file

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

2
cataloguing/value_builder/marc21_linking_section.pl
View file

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

1
cataloguing/value_builder/normarc_field_007.pl
View file

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

1
cataloguing/value_builder/normarc_field_008.pl
View file

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

1
cataloguing/value_builder/normarc_leader.pl
View file

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

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