projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
6f7d448
)
fix "Useless use of a variable in void context at /usr/local/share/perl/5.8.8/FS...
author
ivan
<ivan>
Wed, 12 Sep 2007 03:39:15 +0000
(
03:39
+0000)
committer
ivan
<ivan>
Wed, 12 Sep 2007 03:39:15 +0000
(
03:39
+0000)
FS/FS/svc_domain.pm
patch
|
blob
|
history
diff --git
a/FS/FS/svc_domain.pm
b/FS/FS/svc_domain.pm
index
7ae9961
..
37128a0
100644
(file)
--- a/
FS/FS/svc_domain.pm
+++ b/
FS/FS/svc_domain.pm
@@
-364,7
+364,7
@@
sub check {
# need to match a list of suffixes - no guarantee they're top-level..
# http://wiki.mozilla.org/TLD_List
# but this will have to do for now...
# need to match a list of suffixes - no guarantee they're top-level..
# http://wiki.mozilla.org/TLD_List
# but this will have to do for now...
- $recref->{suffix} || $2;
+ $recref->{suffix} ||
=
$2;
} else {
return "Illegal domain ". $recref->{domain}.
" (or unknown registry - try \$whois_hack)";
} else {
return "Illegal domain ". $recref->{domain}.
" (or unknown registry - try \$whois_hack)";