|
Lines 343-352
if ($op eq 'save' || $op eq 'insert'){
Link Here
|
| 343 |
} |
343 |
} |
| 344 |
} |
344 |
} |
| 345 |
|
345 |
|
| 346 |
if($newdata{surname} && C4::Context->preference('uppercasesurnames')) { |
|
|
| 347 |
$newdata{'surname'} = uc($newdata{'surname'}); |
| 348 |
} |
| 349 |
|
| 350 |
if (C4::Context->preference("IndependentBranches")) { |
346 |
if (C4::Context->preference("IndependentBranches")) { |
| 351 |
unless ( C4::Context->IsSuperLibrarian() ){ |
347 |
unless ( C4::Context->IsSuperLibrarian() ){ |
| 352 |
$debug and print STDERR " $newdata{'branchcode'} : ".$userenv->{flags}.":".$userenv->{branch}; |
348 |
$debug and print STDERR " $newdata{'branchcode'} : ".$userenv->{flags}.":".$userenv->{branch}; |
| 353 |
- |
|
|