X-Git-Url: https://glassweightruler.freedombox.rocks/gitweb/xdg-ninja.git/blobdiff_plain/423726fc992211893ed74e63a3ccd907b7163280..2b4cb1a46249a4e36a93883c3229319d5f4d1fb3:/lib/AddProgram.hs?ds=inline

diff --git a/lib/AddProgram.hs b/lib/AddProgram.hs
index 5a145ad..13f7304 100644
--- a/lib/AddProgram.hs
+++ b/lib/AddProgram.hs
@@ -88,5 +88,5 @@ saveProgram = do
   program <- getProgram
   do_save <- promptBool (green "Save? (y/n) ") (red "Please provide a valid answer.") ""
   if do_save
-  then save program
+  then save (makeFilename (name program)) program
   else return ()