MT#5741 Allow upperchase in subscriber username

12 years ago · e86a5d88f8
parent cbd0438c95
commit e86a5d88f8
1 changed files with 1 additions and 1 deletions
--- a/lib/NGCP/Panel/Field/Identifier.pm
+++ b/lib/NGCP/Panel/Field/Identifier.pm
@ -11,7 +11,7 @@ sub validate {
             $self->value =~ m/\.$/ or
             $self->value =~ m/\.\./ );
    return $self->add_error("Contains invalid symbols.")
-        unless ( $self->value =~ m/^[[:lower:][:digit:]=+,;_.~'()-]+$/ );
+        unless ( $self->value =~ m/^[[:lower:][:upper:][:digit:]=+,;_.~'()-]+$/ );
    return 0;
 }