diff options
author | Teddy Wing | 2017-08-17 22:50:03 +0200 |
---|---|---|
committer | Teddy Wing | 2017-08-17 22:50:03 +0200 |
commit | aa6a9b8fdeca294ea11b06b85fcd6d77f131e4b0 (patch) | |
tree | 554998568ed1a1103d5bc93176081aa32445b280 /src/Plugin/GitRemoteSetOrigin.hs | |
parent | 46aa2c3887455d22ed75f17e499aa3a8907b24c6 (diff) | |
download | sorbot-aa6a9b8fdeca294ea11b06b85fcd6d77f131e4b0.tar.bz2 |
gitRemoteSetOriginAction: Make response more descriptive
Instead of just responding with the given URL, include a message in
English to let users know that the value was saved.
Diffstat (limited to 'src/Plugin/GitRemoteSetOrigin.hs')
-rw-r--r-- | src/Plugin/GitRemoteSetOrigin.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Plugin/GitRemoteSetOrigin.hs b/src/Plugin/GitRemoteSetOrigin.hs index c8a485e..208ab9f 100644 --- a/src/Plugin/GitRemoteSetOrigin.hs +++ b/src/Plugin/GitRemoteSetOrigin.hs @@ -49,4 +49,6 @@ gitRemoteSetOriginAction message = do params liftIO $ close dbConn - return $ Right $ T.pack url + return $ Right $ "I updated the channel's repo URL to '" + `T.append` T.pack url + `T.append` "'" |