projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
f41a78f
)
tyop
author
ivan
<ivan>
Fri, 18 May 2001 14:08:55 +0000
(14:08 +0000)
committer
ivan
<ivan>
Fri, 18 May 2001 14:08:55 +0000
(14:08 +0000)
FS/FS/domain_record.pm
patch
|
blob
|
history
diff --git
a/FS/FS/domain_record.pm
b/FS/FS/domain_record.pm
index
9b7081b
..
743f43c
100644
(file)
--- a/
FS/FS/domain_record.pm
+++ b/
FS/FS/domain_record.pm
@@
-123,7
+123,7
@@
sub check {
my $recdata = $self->recdata;
$recdata =~ s/\s+/ /g;
$recdata =~ /^([a-z0-9\.\-]+ [\w\-\+]+\.[a-z0-9\.\-]+ \( (\d+ ){5}\))$/
my $recdata = $self->recdata;
$recdata =~ s/\s+/ /g;
$recdata =~ /^([a-z0-9\.\-]+ [\w\-\+]+\.[a-z0-9\.\-]+ \( (\d+ ){5}\))$/
- or return "Illegal data for SOA re
oc
rd: $recdata";
+ or return "Illegal data for SOA re
co
rd: $recdata";
$self->recdata($1);
} elsif ( $self->rectype eq 'NS' ) {
$self->recdata =~ /^([a-z0-9\.\-]+)$/
$self->recdata($1);
} elsif ( $self->rectype eq 'NS' ) {
$self->recdata =~ /^([a-z0-9\.\-]+)$/
@@
-156,7
+156,7
@@
sub check {
=head1 VERSION
=head1 VERSION
-$Id: domain_record.pm,v 1.
1 2000-02-03 05:16:52
ivan Exp $
+$Id: domain_record.pm,v 1.
2 2001-05-18 14:08:55
ivan Exp $
=head1 BUGS
=head1 BUGS
@@
-172,7
+172,10
@@
L<FS::Record>, schema.html from the base documentation.
=head1 HISTORY
$Log: domain_record.pm,v $
=head1 HISTORY
$Log: domain_record.pm,v $
-Revision 1.1 2000-02-03 05:16:52 ivan
+Revision 1.2 2001-05-18 14:08:55 ivan
+tyop
+
+Revision 1.1 2000/02/03 05:16:52 ivan
beginning of DNS and Apache support
beginning of DNS and Apache support