diff --git a/Ariadne.hs b/Ariadne.hs
--- a/Ariadne.hs
+++ b/Ariadne.hs
@@ -59,7 +59,7 @@
       try (a >>= evaluate) >>= either (\e -> return $ Just $ ResolveError $ show (e::SomeException)) return
 
 main = do
-  t <- fromHostPort "" 39014
+  t <- tcpServer 39014
   serve t dispatch
   where
     -- dispatch _ _ args = do print args; return $ Success $ NilTerm
diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -3,6 +3,8 @@
 
 Ariadne provides a "go-to-definition" functionality for Haskell.
 
+[Video demonstration](http://youtu.be/-sbGijbhxAc)
+
 Usage
 -----
 
diff --git a/ariadne.cabal b/ariadne.cabal
--- a/ariadne.cabal
+++ b/ariadne.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                ariadne
-version:             0.1.2
+version:             0.1.2.1
 synopsis:            Go-to-definition for Haskell
 description:         See <https://github.com/feuerbach/ariadne#ariadne>
 homepage:            https://github.com/feuerbach/ariadne
@@ -33,7 +33,7 @@
     haskell-src-exts >=1.14,
     haskell-packages >=0.2,
     mtl >=2.1,
-    bert >=1.1,
+    bert >=1.2,
     utf8-string >=0.3,
     containers >=0.4,
     Cabal >=1.18