diff --git a/src/Data/List/Extra.hs b/src/Data/List/Extra.hs
new file mode 100644
--- /dev/null
+++ b/src/Data/List/Extra.hs
@@ -0,0 +1,8 @@
+module Data.List.Extra where
+                  
+import Data.List
+import Data.Char
+import Data.Maybe
+
+trim :: String -> String
+trim = reverse . dropWhile isSpace . reverse . dropWhile isSpace
diff --git a/src/Paths.hs b/src/Paths.hs
new file mode 100644
--- /dev/null
+++ b/src/Paths.hs
@@ -0,0 +1,20 @@
+{-# LANGUAGE CPP#-}
+module Paths (getStaticDir) where
+
+import Control.Monad
+import System.FilePath
+
+#if CABAL
+-- using cabal
+import qualified Paths_threepenny_gui (getDataDir)
+
+getStaticDir :: IO FilePath
+getStaticDir = (</> "wwwroot") `liftM` Paths_threepenny_gui.getDataDir
+
+#else
+-- using GHCi
+
+getStaticDir :: IO FilePath
+getStaticDir = return "../wwwroot/"
+
+#endif
diff --git a/threepenny-gui.cabal b/threepenny-gui.cabal
--- a/threepenny-gui.cabal
+++ b/threepenny-gui.cabal
@@ -1,5 +1,5 @@
 Name:                threepenny-gui
-Version:             0.1.0.0
+Version:             0.1.0.1
 Synopsis:            Small GUI framework that uses the web browser as a display.
 Description:
     Threepenny-GUI is a small GUI framework that uses the web browser as a display.
@@ -91,7 +91,7 @@
     else
         buildable: False
     main-is:           BarTab.hs
-    other-modules:     Paths_threepenny_gui
+    other-modules:     Paths_threepenny_gui, Paths
     hs-source-dirs:    src
 
 Executable threepenny-examples-buttons
@@ -103,7 +103,7 @@
     else
         buildable: False
     main-is:           Buttons.hs
-    other-modules:     Paths_threepenny_gui
+    other-modules:     Paths_threepenny_gui, Paths
     hs-source-dirs:    src
 
 Executable threepenny-examples-dragndropexample
@@ -115,7 +115,7 @@
     else
         buildable: False
     main-is:           DragNDropExample.hs
-    other-modules:     Paths_threepenny_gui
+    other-modules:     Paths_threepenny_gui, Paths
     hs-source-dirs:    src
 
 
@@ -129,7 +129,7 @@
     else
         buildable: False
     main-is:           MissingDollars.hs
-    other-modules:     Paths_threepenny_gui
+    other-modules:     Paths_threepenny_gui, Paths
     hs-source-dirs:    src
 
 Executable threepenny-examples-use-words
@@ -142,7 +142,7 @@
     else
         buildable: False
     main-is:           UseWords.hs
-    other-modules:     Paths_threepenny_gui
+    other-modules:     Paths_threepenny_gui, Paths
     hs-source-dirs:    src
 
 Executable threepenny-examples-chat
@@ -156,5 +156,5 @@
     else
         buildable: False
     main-is:           Chat.hs
-    other-modules:     Paths_threepenny_gui
+    other-modules:     Paths_threepenny_gui, Paths, Data.List.Extra
     hs-source-dirs:    src
