diff --git a/android.cabal b/android.cabal
--- a/android.cabal
+++ b/android.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                android
-version:             0.0.1
+version:             0.0.2
 synopsis:            Android methods exposed to Haskell
 description:         Haskell bindings to the Android ecosystem
 homepage:            https://github.com/keera-studios/android-haskell
@@ -17,10 +17,11 @@
 cabal-version:       >=1.10
 
 library
-  exposed-modules:     Android.Log
+  exposed-modules:     Android.Log,
+                       Android.OpenURL
   -- other-modules:       
   other-extensions:    ForeignFunctionInterface
-  build-depends:       base >=4.6 && <4.9
+  build-depends:       base >=4.6 && <4.9, process
   hs-source-dirs:      src
   default-language:    Haskell2010
   
@@ -31,4 +32,4 @@
 source-repository this
   type:     git
   location: https://github.com/keera-studios/android-haskell.git
-  tag:      v0.0.1
+  tag:      v0.0.2
diff --git a/src/Android/Log.hs b/src/Android/Log.hs
--- a/src/Android/Log.hs
+++ b/src/Android/Log.hs
@@ -34,16 +34,16 @@
 
 data AndroidLogPriority =
     AndroidLogPrioAssert
-  | AndroidLogPrioDebug
   | AndroidLogPrioError
+  | AndroidLogPrioWarn
   | AndroidLogPrioInfo
+  | AndroidLogPrioDebug
   | AndroidLogPrioVerbose
-  | AndroidLogPrioWarn
 
 prioToCInt :: AndroidLogPriority -> CInt
 prioToCInt AndroidLogPrioAssert  = 7
-prioToCInt AndroidLogPrioDebug   = 3
 prioToCInt AndroidLogPrioError   = 6
+prioToCInt AndroidLogPrioWarn    = 5
 prioToCInt AndroidLogPrioInfo    = 4
+prioToCInt AndroidLogPrioDebug   = 3
 prioToCInt AndroidLogPrioVerbose = 2
-prioToCInt AndroidLogPrioWarn    = 5
diff --git a/src/Android/OpenURL.hs b/src/Android/OpenURL.hs
new file mode 100644
--- /dev/null
+++ b/src/Android/OpenURL.hs
@@ -0,0 +1,14 @@
+module Android.OpenURL where
+
+import Android.Log
+import Control.Concurrent (forkIO)
+import Control.Monad      (void)
+import System.Process     (rawSystem)
+
+-- | Throw an Android intent to visit a URL
+openURL :: String -> IO ()
+openURL url = void $ forkIO $ do
+  e <- rawSystem "am" ["start", "-a", "android.intent.action.VIEW", "-d", url]
+  void $ androidLogPrint AndroidLogPrioDebug
+                         "uk.co.keera.android.openurl"
+                         ("Opening URL " ++ url ++ ", received a " ++ show e)