[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