summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--FS/FS/svc_acct.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm
index d6d132b41..afc983057 100644
--- a/FS/FS/svc_acct.pm
+++ b/FS/FS/svc_acct.pm
@@ -1408,7 +1408,7 @@ sub radius_reply {
my $is = $whatis{$what}.'bytes';
if ( $self->$is() =~ /\d/ ) {
my $big = new Math::BigInt $self->$is();
- $big = new Math::BigInto '0' if $big->is_neg();
+ $big = new Math::BigInt '0' if $big->is_neg();
my $att = "Chillispot-Max-\u$what";
$reply{"$att-Octets"} = $big->copy->band(0xffffffff)->bstr;
$reply{"$att-Gigawords"} = $big->copy->brsft(32)->bstr;