createStore :: String -> IO Store
createStore repo = do
    let store = Store { storeLatestIssue = 0
                      , storeIssues = []
                      }
    writeStore repo store
    return store
createStore :: String -> IO Store
createStore repo = do
    let store = Store { storeLatestIssue = 0
                      , storeIssues = []
                      }
    writeStore repo store
    return store
createStore repo = do
    let store = Store { storeLatestIssue = 0
                      , storeIssues = []
                      }
    writeStore repo store
    return store