projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
4aa0f59
)
use a domain in 1.4 also
author
ivan
<ivan>
Fri, 19 Mar 2004 12:34:04 +0000
(12:34 +0000)
committer
ivan
<ivan>
Fri, 19 Mar 2004 12:34:04 +0000
(12:34 +0000)
FS/FS/ClientAPI/passwd.pm
patch
|
blob
|
history
diff --git
a/FS/FS/ClientAPI/passwd.pm
b/FS/FS/ClientAPI/passwd.pm
index
4940def
..
f6af343
100644
(file)
--- 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 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(
use FS::ClientAPI; #hmm
FS::ClientAPI->register_handlers(
@@
-15,8
+15,8
@@
FS::ClientAPI->register_handlers(
sub passwd {
my $packet = shift;
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'};
my $old_password = $packet->{'old_password'};
my $new_password = $packet->{'new_password'};