|
Lines 99-105
sub maybe_add {
Link Here
|
| 99 |
return q{} if first { $_ eq $fid } @fields; |
99 |
return q{} if first { $_ eq $fid } @fields; |
| 100 |
} |
100 |
} |
| 101 |
|
101 |
|
| 102 |
if ( $fid eq FID_SCREEN_MSG && $server->{account}->{screen_msg_regex} ) { |
102 |
if ( $fid eq FID_SCREEN_MSG && $server->{account}->{screen_msg_regex} && defined($value)) { |
| 103 |
foreach my $regex ( |
103 |
foreach my $regex ( |
| 104 |
ref $server->{account}->{screen_msg_regex} eq "ARRAY" |
104 |
ref $server->{account}->{screen_msg_regex} eq "ARRAY" |
| 105 |
? @{ $server->{account}->{screen_msg_regex} } |
105 |
? @{ $server->{account}->{screen_msg_regex} } |
| 106 |
- |
|
|