From 8249d4a670b14c5b7b2090366311ea8b97319496 Mon Sep 17 00:00:00 2001 From: Craig Oates Date: Thu, 13 Sep 2018 22:06:05 +0100 Subject: [PATCH] refactor buildSpec in CLI validation. --- DeathSocketCLI/Validation.fs | 14 ++++++-------- 1 file changed, 6 insertions(+), 8 deletions(-) diff --git a/DeathSocketCLI/Validation.fs b/DeathSocketCLI/Validation.fs index 7a55760..600ff99 100644 --- a/DeathSocketCLI/Validation.fs +++ b/DeathSocketCLI/Validation.fs @@ -31,11 +31,9 @@ "Please use the 'list-colours' command to see what you can use.")) let buildSpec imgPath numRows numColumns pWidth colour newPath = - let spec = - { originalPath = imgPath - savePath = newPath - colour = parseColour colour - penWidth = pWidth - rows = numRows - columns = numColumns } - spec \ No newline at end of file + { originalPath = imgPath + savePath = newPath + colour = parseColour colour + penWidth = pWidth + rows = numRows + columns = numColumns } \ No newline at end of file