summaryrefslogtreecommitdiff
path: root/site_perl/svc_acct_sm.pm
diff options
context:
space:
mode:
Diffstat (limited to 'site_perl/svc_acct_sm.pm')
-rw-r--r--site_perl/svc_acct_sm.pm12
1 files changed, 7 insertions, 5 deletions
diff --git a/site_perl/svc_acct_sm.pm b/site_perl/svc_acct_sm.pm
index c87ed2c54..4293e0365 100644
--- a/site_perl/svc_acct_sm.pm
+++ b/site_perl/svc_acct_sm.pm
@@ -11,11 +11,13 @@ use FS::Conf;
@ISA = qw(FS::Record Exporter);
@EXPORT_OK = qw(fields);
-$conf = new FS::Conf;
-
-$shellmachine = $conf->exists('qmailmachines')
- ? $conf->config('shellmachine')
- : '';
+#ask FS::UID to run this stuff for us later
+$FS::UID::callback{'FS::svc_acct_sm'} = sub {
+ $conf = new FS::Conf;
+ $shellmachine = $conf->exists('qmailmachines')
+ ? $conf->config('shellmachine')
+ : '';
+};
=head1 NAME