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

diff --git a/lib/EditProgram.hs b/lib/EditProgram.hs
index a1a6728..353344c 100644
--- a/lib/EditProgram.hs
+++ b/lib/EditProgram.hs
@@ -61,11 +61,6 @@ editFile f = do
     help <- getHelp (help f)
     return File {path = path f, supportLevel = supportLevel, help = help}
 
-readProgram :: String -> IO ( Maybe Program )
-readProgram filename = do
-    json_data <- B.readFile filename
-    return (decode json_data)
-
 editProgram :: String -> IO ()
 editProgram filename = do
   program <- readProgram filename