From 1e90419f5b23ab4b4fe17b5861958d75ac285c4d Mon Sep 17 00:00:00 2001
From: Alex Brelsfoard <alex@Alexs-MacBook-Pro.local>
Date: Mon, 9 Feb 2015 11:58:10 -0500
Subject: Getting code ready for CPAN and debian relase.

---
 t/lib/test_account.pl | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100644 t/lib/test_account.pl

(limited to 't/lib')

diff --git a/t/lib/test_account.pl b/t/lib/test_account.pl
new file mode 100644
index 0000000..69f8c89
--- /dev/null
+++ b/t/lib/test_account.pl
@@ -0,0 +1,29 @@
+
+sub test_account {
+    # fill all these fields in to test out transactions
+    my %opts = (
+        server =>'', # be sure to leave out the 'https://'
+        platform => '',
+        gid => '',
+        tid => '',
+        userid=> 'name@server.com',
+        port => 443,
+        env => 'test',
+        appid => ''
+    );
+
+    return %opts;
+}
+
+sub expiration_date {
+    my($month, $year) = (localtime)[4,5];
+    $month += 1;
+    $year++;       # So we expire next year.
+    $year %= 100;
+
+    return sprintf("%02d/%02d", $month, $year);
+}
+
+
+1;
+
-- 
cgit v1.2.1