Bug 34478: op =~ ^cud- in pl/pm - Manual revert changes to sip_cli_emulator.pl
Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
This commit is contained in:
parent
7f25a1a131
commit
a1338de383
1 changed files with 3 additions and 3 deletions
|
@ -194,7 +194,7 @@ my $handlers = {
|
|||
'item_properties',
|
||||
'patron_password',
|
||||
'fee_acknowledged',
|
||||
'cud-cancel',
|
||||
'cancel',
|
||||
],
|
||||
},
|
||||
checkin => {
|
||||
|
@ -215,7 +215,7 @@ my $handlers = {
|
|||
'return_date', # defaults to transaction date
|
||||
'item_properties',
|
||||
'patron_password',
|
||||
'cud-cancel',
|
||||
'cancel',
|
||||
],
|
||||
},
|
||||
renew => {
|
||||
|
@ -301,7 +301,7 @@ my $handlers = {
|
|||
},
|
||||
};
|
||||
|
||||
my $data = run_command_message('cud-login');
|
||||
my $data = run_command_message('login');
|
||||
|
||||
if ( $data =~ '^941' ) { ## we are logged in
|
||||
foreach my $m (@messages) {
|
||||
|
|
Loading…
Reference in a new issue