X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=bin%2Ffs-radius-add-check;h=4e4769e58db853a66bddd4c616d8c2dd86c64682;hp=ca0492f4c4a938aef231bff4df0bac759cbe7c47;hb=b0511ff939fe1622503ac8e53333fabb1ad9bd37;hpb=cf7ca698138c8708c68cb969cc843311e385a7a8

diff --git a/bin/fs-radius-add-check b/bin/fs-radius-add-check
index ca0492f4c..4e4769e58 100755
--- a/bin/fs-radius-add-check
+++ b/bin/fs-radius-add-check
@@ -39,12 +39,21 @@ my($char_d) = 80; #default maxlength for text fields
 ###
 
 foreach my $attribute ( @attributes ) {
+
   my $statement =
     "ALTER TABLE svc_acct ADD COLUMN rc_$attribute varchar($char_d) NULL";
   my $sth = $dbh->prepare( $statement )
    or warn "Error preparing $statement: ". $dbh->errstr;
   my $rc = $sth->execute
     or warn "Error executing $statement: ". $sth->errstr;
+
+  $statement =
+    "ALTER TABLE h_svc_acct ADD COLUMN rc_$attribute varchar($char_d) NULL";
+  $sth = $dbh->prepare( $statement )
+   or warn "Error preparing $statement: ". $dbh->errstr;
+  $rc = $sth->execute
+    or warn "Error executing $statement: ". $sth->errstr;
+
 }
 
 $dbh->commit or die $dbh->errstr;
@@ -54,6 +63,6 @@ $dbh->disconnect or die $dbh->errstr;
 print "\n\n", "Now you must run dbdef-create.\n\n";
 
 sub usage {
-  die "Usage:\n  fs-radius-add user\n"; 
+  die "Usage:\n  fs-radius-add-check user\n"; 
 }