From 812ac77d63ee55e28daa155946c84c41ce6deed8 Mon Sep 17 00:00:00 2001
From: "HOT-ROD\\craig" <craig@craigoates.net>
Date: Wed, 30 May 2018 18:19:09 +0100
Subject: [PATCH] Added attributes to the command-methods using F#'s back-tick,
 triple quote Etc. syntax. Left notes about how they react to
 Console.Waterworks.

---
 BrittleFish/ConsoleCommands.fs | 34 ++++++++++++++++++++++++++++------
 1 file changed, 28 insertions(+), 6 deletions(-)

diff --git a/BrittleFish/ConsoleCommands.fs b/BrittleFish/ConsoleCommands.fs
index 7fcd7ff..db6a562 100644
--- a/BrittleFish/ConsoleCommands.fs
+++ b/BrittleFish/ConsoleCommands.fs
@@ -44,12 +44,34 @@
         [<Usage "> libtest3 \"Craig Oates\"">]
         let libtest3 name = String.Format("Result: {0}", LibraryTest3 name)
 
-        // this is fine AND SWEET!
-        let ``test 4`` = "Hi there"
+        [<ListCommand>]
+        [<Description "Displays a message in the console, signfying the command-method is working.">]
+        [<Parameters "none">]
+        [<Usage "> test 1">]
+        let ``test 1``() = "Result: Test 1 working"
+
+        [<ListCommand>]
+        [<Description "Displays a message in the console, signfying the command-method is working. The command uses F#'s double back-tick notation -- hence the command name and usage example not matching up.">]
+        [<Parameters "none">]
+        [<Usage "> test 2">]
+        let ``test-2``() = "Result: Test 2 working"
+        // This only works when you type "test 2" not ideal but better then nothing
 
-        // this only works when you type "test 5" not ideal but better then nothing
-        let ``test-5`` = "Hi there"
+        [<ListCommand>]
+        [<Description "Displays a message in the console, signfying the command-method is working.">]
+        [<Parameters "none">]
+        [<Usage "> test 3">]
+        let """test 3""" = "Result: Test 3 working"
+        (*This is not displayed in the help section, regardless of the attributes.
+        It still works if you enter the command into the console, though.*)
+
+        [<ListCommand>]
+        [<Description "Displays a message in the console, signfying the command-method is working.">]
+        [<Parameters "none">]
+        [<Usage "> test 4">]
+        let """test-4""" = "Result: Test 4 working"
+        (* This only works when you type "test 4" not ideal but better then nothing.
+        This is not displayed in the help section, regardless of the attributes.
+        It still works if you enter the command in the console, though.*)
 
-        // This also works...
-        let """test 6""" = "Hi there"