diff options
Diffstat (limited to 'src/Plugin.hs')
| -rw-r--r-- | src/Plugin.hs | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/src/Plugin.hs b/src/Plugin.hs index 41b0296..da38943 100644 --- a/src/Plugin.hs +++ b/src/Plugin.hs @@ -7,6 +7,7 @@ module Plugin import Text.Regex.TDFA import Plugin.Base +import Plugin.GitHubCommit matchPlugin :: String -> Maybe Plugin matchPlugin message = firstPlugin $ matchPlugins message plugins @@ -20,14 +21,6 @@ matchPlugins message plugins = [p | p <- plugins, message =~ matchRegex p] performPlugin :: Plugin -> String -> String performPlugin p message = perform p $ message =~ matchRegex p -gitHubCommit = Plugin - { matchRegex = "^[0-9a-f]{40}$" - , perform = gitHubCommitAction - } - -gitHubCommitAction :: PluginAction -gitHubCommitAction match = "https://github.com/" ++ match - plugins :: [Plugin] plugins = [ gitHubCommit |