From 95a0e9f26dc5bc1841fe30749edd7f59efb383e5 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Mon, 19 Apr 2010 07:09:18 +0000
Subject: communigate (phase 2), Account:Settings PasswordRecovery.  also fix
 modification of svc_acct booleans in export.  RT#7514

---
 httemplate/edit/svc_acct.cgi | 14 ++++++++++++--
 1 file changed, 12 insertions(+), 2 deletions(-)

(limited to 'httemplate/edit')

diff --git a/httemplate/edit/svc_acct.cgi b/httemplate/edit/svc_acct.cgi
index 04c442a30..35c9006f6 100755
--- a/httemplate/edit/svc_acct.cgi
+++ b/httemplate/edit/svc_acct.cgi
@@ -335,6 +335,14 @@ Service # <% $svcnum ? "<B>$svcnum</B>" : " (NEW)" %><BR>
 
 %  #preferences
 
+  <% include('/elements/tr-checkbox.html',
+               'label'      => 'Password recovery',
+               'field'      => 'password_recover',
+               'curr_value' => $svc_acct->password_recover,
+               'value'      => 'Y',
+            )
+  %>
+
   <% include('/elements/tr-select.html',
                'label'      => 'Allowed mail rules',
                'field'      => 'cgp_rulesallowed',
@@ -517,9 +525,11 @@ if ( $cgi->param('error') ) {
   $part_svc=qsearchs('part_svc',{'svcpart'=>$svcpart});
   die "No part_svc entry!" unless $part_svc;
 
-    $svc_acct = new FS::svc_acct({svcpart => $svcpart}); 
+  $svc_acct = new FS::svc_acct({svcpart => $svcpart}); 
+
+  $svcnum='';
 
-    $svcnum='';
+  $svc_acct->password_recover('Y'); #default. hmm.
 
 } else { #editing
 
-- 
cgit v1.2.1