From 5daf3725b21f2d6ba92295a71f3f194f1d02620e Mon Sep 17 00:00:00 2001 From: Craig Oates Date: Sun, 16 Dec 2018 05:30:18 +0000 Subject: [PATCH] refactor add-grid command (applyImageToGrid). --- DeathSocketCLI/Commands.fs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/DeathSocketCLI/Commands.fs b/DeathSocketCLI/Commands.fs index 995776e..754728f 100644 --- a/DeathSocketCLI/Commands.fs +++ b/DeathSocketCLI/Commands.fs @@ -59,8 +59,9 @@ let ``add-grid`` imgPath numRows numColumns pWidth colour newPath = try printfn "[INFO.] Adding grid to image..." - buildSpec imgPath numRows numColumns pWidth colour newPath - |> applyBrushSpecGridAsync + Brush (buildSpec imgPath numRows numColumns pWidth colour newPath) + |> applyImageToGrid + //|> applyBrushSpecGridAsync |> Async.Start showEndOfCommandMessage with