You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
20 lines
746 B
20 lines
746 B
--- Net-Server-0.85/lib/Net/Server.pm.dist Tue Apr 22 14:38:13 2003 |
|
+++ Net-Server-0.85/lib/Net/Server.pm Tue Apr 22 14:39:16 2003 |
|
@@ -402,7 +402,7 @@ |
|
$self->log(1,"Group Not Defined. Defaulting to EGID '$)'\n"); |
|
$prop->{group} = $); |
|
}else{ |
|
- if( $prop->{group} =~ /^(\w+( \w+)*)$/ ){ |
|
+ if( $prop->{group} =~ /^([\w\-]+( [\w\-]+)*)$/ ){ |
|
$prop->{group} = eval{ get_gid( $1 ) }; |
|
$self->fatal( $@ ) if $@; |
|
}else{ |
|
@@ -416,7 +416,7 @@ |
|
$self->log(1,"User Not Defined. Defaulting to EUID '$>'\n"); |
|
$prop->{user} = $>; |
|
}else{ |
|
- if( $prop->{user} =~ /^(\w+)$/ ){ |
|
+ if( $prop->{user} =~ /^([\w\-]+)$/ ){ |
|
$prop->{user} = eval{ get_uid( $1 ) }; |
|
$self->fatal( $@ ) if $@; |
|
}else{
|
|
|