summaryrefslogtreecommitdiff
path: root/htdocs/search
diff options
context:
space:
mode:
Diffstat (limited to 'htdocs/search')
-rwxr-xr-xhtdocs/search/svc_acct_sm.cgi11
1 files changed, 4 insertions, 7 deletions
diff --git a/htdocs/search/svc_acct_sm.cgi b/htdocs/search/svc_acct_sm.cgi
index 3b1a4cf4e..38656ea53 100755
--- a/htdocs/search/svc_acct_sm.cgi
+++ b/htdocs/search/svc_acct_sm.cgi
@@ -19,18 +19,15 @@
# bmccane@maxbaud.net 98-apr-3
use strict;
+use vars qw($conf);
use CGI::Request;
use CGI::Carp qw(fatalsToBrowser);
use FS::UID qw(cgisuidsetup);
use FS::Record qw(qsearch qsearchs);
+use FS::Conf;
-my($conf_domain)="/var/spool/freeside/conf/domain";
-open(DOMAIN,$conf_domain) or die "Can't open $conf_domain: $!";
-my($mydomain)=map {
- /^(.*)$/ or die "Illegal line in $conf_domain!"; #yes, we trust the file
- $1
-} grep $_ !~ /^(#|$)/, <DOMAIN>;
-close DOMAIN;
+$conf = new FS::Conf;
+my $mydomain = $conf->config('domain');
my($req)=new CGI::Request; # create form object
&cgisuidsetup($req->cgi);