From 94cfb1c7969515a863d7b0e09f00b6ced5f4fc5c Mon Sep 17 00:00:00 2001
From: Jon Robertson <jonrober@stanford.edu>
Date: Thu, 9 Oct 2014 09:55:21 -0700
Subject: Created tests for new Duo object types

Change-Id: I818be125f3195316b44e650ba6e05b8e0b831ea6
---
 perl/t/object/duo.t | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

(limited to 'perl/t/object/duo.t')

diff --git a/perl/t/object/duo.t b/perl/t/object/duo.t
index f73fe7e..a975597 100755
--- a/perl/t/object/duo.t
+++ b/perl/t/object/duo.t
@@ -108,10 +108,9 @@ $mock->expect (
 my $data = $object->get (@trace);
 ok (defined ($data), 'Retrieval succeeds');
 $expected = <<'EOO';
-[duo]
-ikey = DIRWIH0ZZPV4G88B37VQ
-skey = QO4ZLqQVRIOZYkHfdPDORfcNf8LeXIbCWwHazY7o
-host = example-admin.duosecurity.com
+Integration key: DIRWIH0ZZPV4G88B37VQ
+Secret key:      QO4ZLqQVRIOZYkHfdPDORfcNf8LeXIbCWwHazY7o
+Host:            example-admin.duosecurity.com
 EOO
 is ($data, $expected, '...and integration data is correct');
 
-- 
cgit v1.2.3