summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2004-03-19 12:34:04 +0000
committerivan <ivan>2004-03-19 12:34:04 +0000
commitb176140ad0f4dd63ac4a813f96eb5ab4fea3ea68 (patch)
tree090e9b977868b2aa99d89b1c980255df73680da2
parent4aa0f59d8e7bef2039dfca459bac1dc96b7c513e (diff)
use a domain in 1.4 also
-rw-r--r--FS/FS/ClientAPI/passwd.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/FS/FS/ClientAPI/passwd.pm b/FS/FS/ClientAPI/passwd.pm
index 4940def59..f6af3434b 100644
--- a/FS/FS/ClientAPI/passwd.pm
+++ b/FS/FS/ClientAPI/passwd.pm
@@ -3,7 +3,7 @@ package FS::ClientAPI::passwd;
use strict;
use FS::Record qw(qsearchs);
use FS::svc_acct;
-#use FS::svc_domain;
+use FS::svc_domain;
use FS::ClientAPI; #hmm
FS::ClientAPI->register_handlers(
@@ -15,8 +15,8 @@ FS::ClientAPI->register_handlers(
sub passwd {
my $packet = shift;
- #my $domain = qsearchs('svc_domain', { 'domain' => $packet->{'domain'} } )
- # or return { error => "Domain $domain not found" };
+ my $domain = qsearchs('svc_domain', { 'domain' => $packet->{'domain'} } )
+ or return { error => "Domain $domain not found" };
my $old_password = $packet->{'old_password'};
my $new_password = $packet->{'new_password'};