X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=bin%2Ffs-setup;h=e7dda8ed709f149603e69700b7c3ebf61b871b49;hb=04ac51dff5dd29a1c674168f5d3396acbb158dbc;hp=9534eb23f4ca34a9eb5e347f833b74ba39ea6579;hpb=85e59606c0b5eed9780534ffaf554aa32bcf9baf;p=freeside.git diff --git a/bin/fs-setup b/bin/fs-setup index 9534eb23f..e7dda8ed7 100755 --- a/bin/fs-setup +++ b/bin/fs-setup @@ -1,6 +1,6 @@ #!/usr/bin/perl -Tw # -# $Id: fs-setup,v 1.57 2001-09-11 00:07:30 ivan Exp $ +# $Id: fs-setup,v 1.58 2001-09-11 22:20:28 ivan Exp $ #to delay loading dbdef until we're ready BEGIN { $FS::Record::setup_hack = 1; } @@ -20,7 +20,7 @@ use FS::raddb; die "Not running uid freeside!" unless checkeuid(); my %attrib2db = - map { $FS::raddb::attrib{lc($_)} => $_ } keys %FS::raddb::attrib; + map { lc($FS::raddb::attrib{$_}) => $_ } keys %FS::raddb::attrib; my $user = shift or die &usage; getsecrets($user);