From: ivan <ivan>
Date: Wed, 23 Jul 2003 17:05:58 +0000 (+0000)
Subject: bugfix for non-catchall domains
X-Git-Tag: freeside_1_5_0pre4^4~4
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=ebc86db916baf888acf7472c6ec781a678608481;p=freeside.git

bugfix for non-catchall domains
---

diff --git a/FS/FS/part_export/domain_shellcommands.pm b/FS/FS/part_export/domain_shellcommands.pm
index 0edbab0dd..cf5603394 100644
--- a/FS/FS/part_export/domain_shellcommands.pm
+++ b/FS/FS/part_export/domain_shellcommands.pm
@@ -35,6 +35,7 @@ sub _export_command {
     my $svc_acct = $svc_domain->catchall_svc_acct;
     ${$_} = $svc_acct->getfield($_) foreach qw(uid gid dir);
   } else {
+    no strict 'refs';
     ${$_} = '' foreach qw(uid gid dir);
   }