diff options
| -rw-r--r-- | src/Plugin/GitHubCommit.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Plugin/GitHubCommit.hs b/src/Plugin/GitHubCommit.hs index 73b617c..33b26df 100644 --- a/src/Plugin/GitHubCommit.hs +++ b/src/Plugin/GitHubCommit.hs @@ -28,7 +28,7 @@ gitHubCommitAction message dbConn = do where respond [] = Left "I couldn't find a repo URL for this channel. \ \Try `git remote set origin REPO_URL`" - respond ((RepoUrlRow r):rs) = + respond ((RepoUrlRow r):_) = Right $ r ++ "/commits/" ++ M.text message =~ matchRegex gitHubCommit type Id = Int |