svc_acct.dir should be editable with ACL (#1730)

2 files changed, 14 insertions, 1 deletions

diff --git a/FS/FS/AccessRight.pm b/FS/FS/AccessRight.pm
index 7a8bfc2c4..de3423a49 100644
--- a/FS/FS/AccessRight.pm
+++ b/FS/FS/AccessRight.pm
@@ -117,6 +117,7 @@ assigned to users and/or groups.
 # customer service rights
 ###
   'Edit usage', #NEW
+  'Edit home dir', #NEW
   'Edit www config', #NEW
   'View customer services', #NEW
   'Provision customer service',
diff --git a/httemplate/edit/svc_acct.cgi b/httemplate/edit/svc_acct.cgi
index e0610b22f..d4adbc9e5 100755
--- a/httemplate/edit/svc_acct.cgi
+++ b/httemplate/edit/svc_acct.cgi
@@ -326,10 +326,22 @@ Service # <% $svcnum ? "<B>$svcnum</B>" : " (NEW)" %><BR>
     </TD>
   </TR>
 % } 
-
+%
+%#dir
+%if ( $part_svc->part_svc_column('dir')->columnflag eq 'F'
+%     || !$curuser->access_right('Edit home dir')
+%   ) { 
 
 
 <INPUT TYPE="hidden" NAME="dir" VALUE="<% $svc_acct->dir %>">
+% } else {
+
+
+  <TR>
+    <TD ALIGN="right">Home directory</TD>
+    <TD><INPUT TYPE="text" NAME="dir" VALUE="<% $svc_acct->dir %>"></TD>
+  </TR>
+% } 
 %
 %#shell
 %my $shell = $svc_acct->shell;