[Rt-commit] r6590 - in rt/branches/3.6-RELEASE: .

jesse at bestpractical.com jesse at bestpractical.com
Wed Dec 6 14:18:35 EST 2006


Author: jesse
Date: Wed Dec  6 14:18:35 2006
New Revision: 6590

Modified:
   rt/branches/3.6-RELEASE/   (props changed)
   rt/branches/3.6-RELEASE/html/Admin/Users/Modify.html

Log:
 r45869 at 114:  jesse | 2006-12-06 14:16:40 -0500
 * Allow admins to set custom field values on user create.


Modified: rt/branches/3.6-RELEASE/html/Admin/Users/Modify.html
==============================================================================
--- rt/branches/3.6-RELEASE/html/Admin/Users/Modify.html	(original)
+++ rt/branches/3.6-RELEASE/html/Admin/Users/Modify.html	Wed Dec  6 14:18:35 2006
@@ -209,7 +209,11 @@
 <tr valign="top"><td align="right">
 <% $CF->Name %>:
 </td><td>
+% if ($UserObj->id) {
 <& /Elements/EditCustomField, %ARGS, Object => $UserObj, CustomField => $CF &>
+% } else {
+<& /Elements/EditCustomField, %ARGS, NamePrefix => 'Object-RT::User-new-CustomField-', CustomField => $CF &>
+% }
 </td></tr>
 % }
 <tr>
@@ -286,12 +290,19 @@
 
 	if ($val) {
 		push @results, $msg;
+        foreach my $key ( keys %ARGS) {
+            # Convert custom fields on the "new" object to custom fields on the one we've just created
+            if ($key =~ /^Object-RT::User-new-CustomField-(.*)$/) {
+            $ARGS{'Object-RT::User-'.$val.'-CustomField-'.$1} = delete $ARGS{$key};
+            }
+        }
+        push @results, ProcessObjectCustomFieldUpdates( ARGSRef => \%ARGS, Object => $UserObj );
 	} else {
 		push @results, loc('User could not be created: [_1]', $msg);
 	}
     } else {
-	$UserObj->Load($id) || $UserObj->Load($Name) || Abort("Couldn't load user '$Name'");
-	$val = $UserObj->Id();
+	    $UserObj->Load($id) || $UserObj->Load($Name) || Abort("Couldn't load user '$Name'");
+        $val = $UserObj->Id();
     }
 
     if ($val) {


More information about the Rt-commit mailing list