first step

gpm

@@ -1,10 +1,56 @@
 #! /usr/bin/env nix-shell
 #! nix-shell -i runghc
-#! nix-shell -p "ghc.withPackages (ps: [ ps.protolude ])"
+#! nix-shell -p "ghc.withPackages (ps: [ ps.protolude ps.turtle ])"
 #! nix-shell -I nixpkgs="https://github.com/NixOS/nixpkgs/archive/16d475334409f7fa632929b2838421b4ffe34927.tar.gz"
 {-# LANGUAGE NoImplicitPrelude #-}
 {-# LANGUAGE OverloadedStrings #-}
-import Protolude
+import Protolude hiding (stdout)
+import Turtle
+
 main :: IO ()
 main = do
-  putText "Git Project Manager"
+  echo "Git Project Manager"
+  debug "git branch gpm"
+  debug "git checkout gpm"
+  initIssues
+  initDocs
+
+debug cmd = do
+  putText cmd
+  stdout $ inshell cmd empty
+
+initIssues :: IO ()
+initIssues = output "issues.org" issuesOrg
+
+issuesOrg :: Shell Line
+issuesOrg = select
+  [ "#+Title: Git Project Management Issues"
+  , "#+Author: Your Name <your email>"
+  , "#+TODO: TODO IN-PROGRESS | DONE CANCELED"
+  , "#+COLUMNS: %TODO %3PRIORITY %40ITEM(Task) %17Effort(Estimated Effort){:} %CLOCKSUM %8TAGS(TAG)"
+  , ""
+  , "* TODO Issues"
+  , "** DONE Write README file :doc:"
+  , "The goal is to write a text file with all informations about the project"
+  , ""
+  , "Dave: @Alex should I write a subtitle?"
+  , "Alex: @Dave I think you can"
+  , ""
+  , "** IN-PROGRESS Write Install section in README :doc:ops:"
+  , "Explain how to install the project"
+  , ""
+  , "** TODO Write Tutorial section in README :doc:"
+  , "Should contains a complete tutorial"
+  ]
+
+initDocs = output "wiki.org" wikiOrg
+
+wikiOrg :: Shell Line
+wikiOrg = select
+  [ "#+Title: Git Project Management Wiki"
+  , "#+Author: Your Name <your email>"
+  , ""
+  , "* Wiki"
+  , ""
+  , "Write your documentation for dev only here"
+  ]