X-Git-Url: https://glassweightruler.freedombox.rocks/gitweb/xdg-ninja.git/blobdiff_plain/d197193c2af2a81fbd4bfa10fcb17cc397429745..4f758de596c79f81bd3e8466478492102a6c9192:/src/xdgnj.hs

diff --git a/src/xdgnj.hs b/src/xdgnj.hs
index 3c4cea0..a379bf4 100644
--- a/src/xdgnj.hs
+++ b/src/xdgnj.hs
@@ -4,6 +4,7 @@ module Main where
 import qualified AddProgram          as PA
 import           Data.Semigroup      ((<>))
 import qualified EditProgram         as PE
+import qualified PreviewProgram         as PP
 import           Options.Applicative
 
 data Args = AddProgram
@@ -41,4 +42,5 @@ main = do
     case args of
         AddProgram           -> PA.saveProgram
         EditProgram filename -> PE.editProgram filename
+        PreviewProgram filename -> PP.previewProgramFile filename
         _                    -> print args