From 580fa382ee63010171e72483cc4644a5b99e79b2 Mon Sep 17 00:00:00 2001
From: "OPTIMUS-PRIME\\craig" <craig@craigoates.net>
Date: Mon, 23 Jul 2018 21:51:45 +0100
Subject: [PATCH] Updated RequestText -- console-waterwork. Now "ends with
 end-token".

---
 TestCentre/PropertyTests.fs | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/TestCentre/PropertyTests.fs b/TestCentre/PropertyTests.fs
index c7044f6..61c0d82 100644
--- a/TestCentre/PropertyTests.fs
+++ b/TestCentre/PropertyTests.fs
@@ -112,11 +112,12 @@
             Check.Quick results
 
         [<Property>]
-        let ``RequestTextFromFile returns a string which ends with a full stop when using console-waterwork-announcement`` () =
+        let ``RequestTextFromFile returns a string which ends with with the correct end-token when using console-waterwork-announcement`` () =
             let test () =
                 Pancake.RequestTextFromFileAsync (ValidGibberishLevelInput()) (ValidSentencesInput()) ConsoleWaterworks
                 |> Async.RunSynchronously
-            let results = Assert.EndsWith(".", test())
+                |> EndsAsIntended
+            let results = Assert.True(test())
             Check.Quick results
 
         [<Property>]