Lines 26-31
use C4::Context;
Link Here
|
26 |
use C4::Dates qw(format_date_in_iso); |
26 |
use C4::Dates qw(format_date_in_iso); |
27 |
use Digest::MD5 qw(md5_base64); |
27 |
use Digest::MD5 qw(md5_base64); |
28 |
use Date::Calc qw/Today Add_Delta_YM/; |
28 |
use Date::Calc qw/Today Add_Delta_YM/; |
|
|
29 |
use Text::Undiacritic qw(undiacritic); |
30 |
use Encode; |
29 |
use C4::Log; # logaction |
31 |
use C4::Log; # logaction |
30 |
use C4::Overdues; |
32 |
use C4::Overdues; |
31 |
use C4::Reserves; |
33 |
use C4::Reserves; |
Lines 821-826
sub Generate_Userid {
Link Here
|
821 |
|
823 |
|
822 |
} while (!Check_Userid($newuid,$borrowernumber)); |
824 |
} while (!Check_Userid($newuid,$borrowernumber)); |
823 |
|
825 |
|
|
|
826 |
$newuid = undiacritic( decode_utf8( $newuid ) ); |
824 |
return $newuid; |
827 |
return $newuid; |
825 |
} |
828 |
} |
826 |
|
829 |
|
827 |
- |
|
|