diff --git a/gen-windows-release.sh b/gen-windows-release.sh
index c8c391b7..6dd23328 100755
--- a/gen-windows-release.sh
+++ b/gen-windows-release.sh
@@ -1,7 +1,7 @@
 #!/bin/bash
 
 set -e
-wine cabal install --distdir=dist-win --bindir=.
+wine-development cabal install --distdir=dist-win --bindir=.
 (cd Audio/digits/; ./build.sh)
 
 rev=$(git describe --tags)
diff --git a/src/tttool.hs b/src/tttool.hs
index 6015b632..d9c55fa1 100644
--- a/src/tttool.hs
+++ b/src/tttool.hs
@@ -73,6 +73,7 @@ optionParser =
             [(x,'x':rest)] -> case reads rest of
                 [(y,[])] -> return (x,y)
                 _        -> Left $ "Cannot parse dimensions " ++ input
+            _        -> Left $ "Cannot parse dimensions " ++ input
 
     cmd = hsubparser $ mconcat
         [ cmdSep "GME creation commands:"