From fa7e391246c4165b01f4d38e74495016aba44f5e Mon Sep 17 00:00:00 2001
From: "Yann Esposito (Yogsototh)" <yann.esposito@gmail.com>
Date: Wed, 29 Aug 2018 18:23:09 +0200
Subject: [PATCH] updated

---
 gpm.hs | 5 +++++
 1 file changed, 5 insertions(+)
 mode change 100755 => 100644 gpm.hs

diff --git a/gpm.hs b/gpm.hs
old mode 100755
new mode 100644
index 54dc8d2..6a50136
--- a/gpm.hs
+++ b/gpm.hs
@@ -13,6 +13,8 @@ main = do
   mkNewEmptyBranch "gpm"
   initIssues
   initDocs
+  debug "git commit -m 'gpm initialized'"
+  debug "git checkout master"
 
 mkNewEmptyBranch :: Text -> IO ()
 mkNewEmptyBranch br = do
@@ -31,12 +33,14 @@ initIssues = do
   echo "* issue.org"
   input ("templates" </> "issues.org")
     & output "issues.org"
+  debug "git add issues.org"
 
 initDocs :: IO ()
 initDocs = do
   echo "* wiki.org"
   input ("templates" </> "wiki.org")
     & output "wiki.org"
+  debug "git add wiki.org"
 
 initReview :: IO ()
 initReview = do
@@ -45,3 +49,4 @@ initReview = do
   putText $ format ("* "%fp) fic
   input ("templates" </> "review.org")
     & output fic
+  debug "git add reviews"