From 3f2abb21e5b30f15558e953dfcba73de544d71ba Mon Sep 17 00:00:00 2001 From: JT Smith Date: Sun, 26 May 2002 16:59:44 +0000 Subject: [PATCH] Fixed a bug where editing a user's profile through the admin interface would use your profile's data. --- lib/WebGUI/Operation/User.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lib/WebGUI/Operation/User.pm b/lib/WebGUI/Operation/User.pm index 5fa56b617..18f96dde3 100644 --- a/lib/WebGUI/Operation/User.pm +++ b/lib/WebGUI/Operation/User.pm @@ -301,12 +301,13 @@ sub www_editUserGroupSave { #------------------------------------------------------------------- sub www_editUserProfile { - my ($output, $f, $a, %data, $method, $values, $category, $label, $default, $previousCategory); + my ($output, $f, $a, %user, %data, $method, $values, $category, $label, $default, $previousCategory); if (WebGUI::Privilege::isInGroup(3)) { $output .= '

'.WebGUI::International::get(455).'

'; $f = WebGUI::HTMLForm->new; $f->hidden("op","editUserProfileSave"); $f->hidden("uid",$session{form}{uid}); + %user = WebGUI::SQL->buildHash("select fieldName,fieldData from userProfileData where userId=$session{form}{uid}"); $a = WebGUI::SQL->read("select * from userProfileField,userProfileCategory where userProfileField.profileCategoryId=userProfileCategory.profileCategoryId order by userProfileCategory.sequenceNumber,userProfileField.sequenceNumber"); @@ -331,7 +332,7 @@ sub www_editUserProfile { $f->select($data{fieldName},$values,$label,$default); } else { $default = $session{form}{$data{fieldName}} - || $session{user}{$data{fieldName}} + || $user{$data{fieldName}} || eval $data{dataDefault}; $f->$method($data{fieldName},$label,$default); }