refactor buildSpec in CLI validation.

6 years ago · 8249d4a670
1 changed files with 6 additions and 8 deletions
--- 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
+        { originalPath = imgPath
+          savePath = newPath
+          colour = parseColour colour
+          penWidth = pWidth
+          rows = numRows
+          columns = numColumns }