diff options
author | ivan <ivan> | 2002-10-13 00:51:17 +0000 |
---|---|---|
committer | ivan <ivan> | 2002-10-13 00:51:17 +0000 |
commit | c2d273fd77c5b07e5a01b5c756a4b8273a16d239 (patch) | |
tree | ca7f5b29f43a28ba19e53807f5a14a55e4d15f15 | |
parent | 13fd37866b4aa471daef35c5188e75e571a6d5e7 (diff) |
ut_ip fix from 1.5
-rw-r--r-- | FS/FS/Record.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm index e6126a13b..c247ed2db 100644 --- a/FS/FS/Record.pm +++ b/FS/FS/Record.pm @@ -930,7 +930,7 @@ sub ut_ip { $self->getfield($field) =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/ or return "Illegal (IP address) $field: ". $self->getfield($field); for ( $1, $2, $3, $4 ) { return "Illegal (IP address) $field" if $_ > 255; } - $self->setfield($field, "$1.$2.$3.$3"); + $self->setfield($field, "$1.$2.$3.$4"); ''; } |