From e802abcfc55d928fb96d5272548133e1cab56fad Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Wed, 23 Jul 2003 17:06:00 +0000
Subject: bugfix for non-catchall domains

---
 FS/FS/part_export/domain_shellcommands.pm | 1 +
 1 file changed, 1 insertion(+)

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);
   }
 
-- 
cgit v1.2.1