oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Exposed user and url fields to shop vendors.

Browse source
This commit is contained in:
JT Smith 2008-08-07 17:18:59 +00:00
parent ab1c20fa8f
commit 93a6dc0568
5 changed files with 38 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/WebGUI/Shop/Vendor.pm
View file

@ -200,7 +200,7 @@ The name of the vendor.
sub update {
my ($self, $newProperties) = @_;
my $id = id $self;
my @fields = (qw(name));
my @fields = (qw(name userId url));
foreach my $field (@fields) {
$properties{$id}{$field} = (exists $newProperties->{$field}) ? $newProperties->{$field} : $properties{$id}{$field};
}
@ -253,7 +253,9 @@ sub www_edit {
$f->hidden(name=>'method',value=>'editSave');
$f->hidden(name=>'vendorId',value=>$properties->{vendorId});
$f->readOnly(label=>$i18n->get('date created'),value=>$properties->{dateCreated});
$f->text(name=>'name', label=>$i18n->get('name'),defaultValue=>$properties->{name});
$f->text(name=>'name', label=>$i18n->get('name'),value=>$properties->{name});
$f->user(name=>'userId',label=>$i18n->get('username'),value=>$properties->{userId},defaultValue=>3);
$f->url(name=>'url', label=>$i18n->get('company url'),value=>$properties->{url});
$f->submit();
# Wrap in admin console
@ -276,6 +278,8 @@ sub www_editSave {
my $form = $session->form;
my $properties = {
name => $form->get("name","text"),
userId => $form->get("userId","user",'3'),
url => $form->get("url","url"),
};
my $self = eval{$class->new($session, $form->get("vendorId"))};
if (!WebGUI::Error->caught && defined $self) {