From 6bf329d68df4c9d734c3f8d7924cb85b8b96ab5a Mon Sep 17 00:00:00 2001
From: Drake <drake@plainblack.com>
Date: Tue, 7 Nov 2006 23:08:30 +0000
Subject: [PATCH] Possible fix for dates being messed up on subscriptions.

---
 docs/changelog/7.x.x.txt   | 1 +
 lib/WebGUI/Subscription.pm | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt
index 6640c76c1..c7f0535a6 100644
--- a/docs/changelog/7.x.x.txt
+++ b/docs/changelog/7.x.x.txt
@@ -42,6 +42,7 @@
  - fix: Phishing Bug... take that spammers!
  - fix: Default PM Dashboard Template extra form element not implemented yet
  - refactor: move Dashboard, Folder, and HttpProxy getEditForm overrides into definition clauses
+ - possible fix: Dates messed up on subscriptions
 
 7.1.4
  - Template variables in the main Survey Template were out of date in the
diff --git a/lib/WebGUI/Subscription.pm b/lib/WebGUI/Subscription.pm
index 9fefd6c80..77ce4e49d 100644
--- a/lib/WebGUI/Subscription.pm
+++ b/lib/WebGUI/Subscription.pm
@@ -59,7 +59,7 @@ sub apply {
 	$groupId = $self->{_properties}{subscriptionGroup};
 	my $group = WebGUI::Group->new($self->session,$groupId);
 	# Make user part of the right group
-	$group->addUsers([$userId], $self->_getDuration($self->{_properties}{duration}));
+	$group->addUsers([$userId], $self->session->datetime->time + $self->_getDuration($self->{_properties}{duration}));
 
 	# Add karma
 	WebGUI::User->new($self->session,$userId)->karma($self->{_properties}{karma}, 'Subscription', 'Added for purchasing subscription '.$self->{_properties}{name});