refactor buildSpec in CLI validation.

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
-            { originalPath = imgPath
+          savePath = newPath
-              savePath = newPath
+          colour = parseColour colour
-              colour = parseColour colour
+          penWidth = pWidth
-              penWidth = pWidth
+          rows = numRows
-              rows = numRows
+          columns = numColumns }
-              columns = numColumns }
-        spec