Use consistent directory for cloning repositories

... with submodules.

1 files changed, 6 insertions, 1 deletions

diff --git a/src/SlackBuilder/LatestVersionCheck.hs b/src/SlackBuilder/LatestVersionCheck.hs
index a66d2c7..233ea3c 100644
--- a/src/SlackBuilder/LatestVersionCheck.hs
+++ b/src/SlackBuilder/LatestVersionCheck.hs
@@ -46,6 +46,7 @@ import qualified Data.Aeson.KeyMap as KeyMap
 import GHC.Records (HasField(..))
 import Control.Monad.Trans.Reader (asks)
 import Control.Monad.IO.Class (MonadIO(..))
+import Control.Monad ((>=>))
 
 data PackageOwner = PackageOwner
     { owner :: Text
@@ -55,7 +56,11 @@ data PackageOwner = PackageOwner
 -- | Removes the leading "v" from the version string and returns the result if
 -- it looks like a version.
 stableTagTransform :: Text -> Maybe Text
-stableTagTransform = Text.stripPrefix "v"
+stableTagTransform = Text.stripPrefix "v" >=> checkForStable
+  where
+    checkForStable tag
+        | '-' `Text.elem` tag = Nothing
+        | otherwise = Just tag
 
 -- * Packagist