create a working "pen path" array for adding a border to the image.

SmoulderingBeachBall/ImageMaker.fs

@@ -50,11 +50,11 @@ module ImageMaker =
         }
 
     let private createBorderPath spec =
-        [|Point (10, 10);
-          Point (spec.width, 10);
-          Point (spec.width, spec.height);
-          Point (spec.height, 10);
-          Point (10, 10)|]
+        [|Point (5, 5);
+          Point ((spec.width - 5), 5);
+          Point ((spec.width - 5), (spec.height - 5));
+          Point (5, (spec.height - 5));
+          Point (5, 0)|]
 
     let private drawImageWithBorder (graphics: Graphics) (pen: Pen) spec =
         printfn "[INFO.] Adding border to image..."