From d972141607841a84216ba9662952fb65b695f99d Mon Sep 17 00:00:00 2001
From: Kaleb Murphy <perlmonkey2@webgui-svn>
Date: Wed, 30 Jul 2008 15:55:44 +0000
Subject: [PATCH] Fixed Address.pm POD to include firstName and lastName
 attributes.

---
 lib/WebGUI/Shop/Address.pm | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/lib/WebGUI/Shop/Address.pm b/lib/WebGUI/Shop/Address.pm
index d65adc449..b38bfe238 100644
--- a/lib/WebGUI/Shop/Address.pm
+++ b/lib/WebGUI/Shop/Address.pm
@@ -188,9 +188,13 @@ A hash reference that contains one or more of the following:
 
 A human readable label like "home" or "work".
 
-=head4 name
+=head4 firstName
 
-The name of the company or person to address this to.
+The first name of the company or person to address this to.
+
+=head4 lastName
+
+The last name of the company or person to address this to.
 
 =head4 address1
 
@@ -233,7 +237,6 @@ The address book that this address belongs to.
 sub update {
     my ($self, $newProperties) = @_;
     my $id = id $self;
-    #foreach my $field (qw(address1 address2 address3 state code city label name country phoneNumber)) {
     foreach my $field (qw(address1 address2 address3 state code city label firstName lastName country phoneNumber)) {
         $properties{$id}{$field} = (exists $newProperties->{$field}) ? $newProperties->{$field} : $properties{$id}{$field};
     }