@@ -, +, @@ C4::Context --- C4/Context.pm | 7 ++++--- t/Circulation_barcodedecode.t | 2 +- 2 files changed, 5 insertions(+), 4 deletions(-) --- a/C4/Context.pm +++ a/C4/Context.pm @@ -1099,9 +1099,10 @@ sub userenv { =head2 set_userenv - C4::Context->set_userenv($usernum, $userid, $usercnum, $userfirstname, - $usersurname, $userbranch, $userflags, $emailaddress, $branchprinter, - $persona); + C4::Context->set_userenv($usernum, $userid, $usercnum, + $userfirstname, $usersurname, + $userbranch, $branchname, $userflags, + $emailaddress, $branchprinter, $persona); Establish a hash of user environment variables. --- a/t/Circulation_barcodedecode.t +++ a/t/Circulation_barcodedecode.t @@ -6,7 +6,7 @@ use warnings; use Test::More tests => 26; C4::Context->_new_userenv(123456); -C4::Context->set_userenv(1,'kmkale' , 1, 'kk1' , 'IMS', 0, 'kmkale@anantcorp.com'); +C4::Context->set_userenv(1,'kmkale' , 1, 'km', 'kale' , 'IMS', 'IMS Branch DEscription', 0, 'kmkale@anantcorp.com'); BEGIN { use_ok('C4::Circulation'); --