Don't reject built in groups when changing permissions.

This commit is contained in:
Graham Knop 2007-05-08 17:38:23 +00:00
parent 688e3ac7b6
commit 69a7126787
2 changed files with 2 additions and 1 deletions

View file

@ -393,7 +393,7 @@ sub fixId {
my $self = shift;
my $id = shift;
my $field = shift;
if ($id =~ m/\Ad+\Z/xms || $id =~ m/\A[A-Za-z0-9\-\_]{22}\Z/xms) {
if ($id =~ m/\A \d+ \z/xms || $id =~ m/\A [A-Za-z0-9\-\_]{22} \z/xms) {
return $id;
}
return $self->getValue($field);