From 13dd3f358cfaace9d61be9326384e4587d8ee502 Mon Sep 17 00:00:00 2001 From: Colin Kuskie Date: Wed, 2 Sep 2009 18:47:55 -0700 Subject: [PATCH] Finish updating AdSpace for reorganization. Remove groupToPurchase, update tests to follow suit. --- lib/WebGUI/AdSpace.pm | 5 ----- t/AdSpace.t | 3 --- 2 files changed, 8 deletions(-) diff --git a/lib/WebGUI/AdSpace.pm b/lib/WebGUI/AdSpace.pm index 5eae370c6..259f58b73 100644 --- a/lib/WebGUI/AdSpace.pm +++ b/lib/WebGUI/AdSpace.pm @@ -310,10 +310,6 @@ An integer indicating the minimum number of impressions an advertiser is allowed An integer indicating the minimum number of clicks an advertiser is allowed to purchase. -=head4 groupToPurchase - -A groupId representing the group allowed to purchase ads directly from the web site. - =head4 width The width, in pixels, of this ad space. @@ -338,7 +334,6 @@ sub set { $self->{_properties}{description} = exists $properties->{description} ? $properties->{description} : $self->{_properties}{description}; $self->{_properties}{minimumImpressions} = $properties->{minimumImpressions} || $self->{_properties}{minimumImpressions}; $self->{_properties}{minimumClicks} = $properties->{minimumClicks} || $self->{_properties}{minimumClicks}; - $self->{_properties}{groupToPurchase} = $properties->{groupToPurchase} || $self->{_properties}{groupToPurchase} || "3"; $self->{_properties}{width} = $properties->{width} || $self->{_properties}{width} || "468"; $self->{_properties}{height} = $properties->{height} || $self->{_properties}{height} || "60"; $self->session->db->setRow("adSpace","adSpaceId",$self->{_properties}); diff --git a/t/AdSpace.t b/t/AdSpace.t index 135196fdf..a15488659 100644 --- a/t/AdSpace.t +++ b/t/AdSpace.t @@ -22,11 +22,8 @@ my $newAdSpaceSettings = { name => "newAdSpaceName", title => "Ad Space", description => 'This is a space reserved for ads', - costPerImpression => '1.00', - costPerClick => '1.00', minimumImpressions => 100, minimumClicks => 200, - groupToPurchase => "7", width => "400", height => "300", };