diff --git a/Data/Object/Json.hs b/Data/Object/Json.hs
--- a/Data/Object/Json.hs
+++ b/Data/Object/Json.hs
@@ -36,6 +36,7 @@
 import Control.Arrow
 import Data.Data
 import Control.Exception
+import Data.String (IsString (fromString))
 
 import Text.JSONb.Simple as J
 import qualified Text.JSONb.Decode as Decode
@@ -58,6 +59,8 @@
     | JsonBoolean Bool
     | JsonNull
     deriving (Eq, Show, Read, Data, Typeable)
+instance IsString JsonScalar where
+    fromString = toJsonScalar
 
 jsToBS :: JsonScalar -> Data.ByteString.ByteString
 jsToBS (JsonString b) = b
diff --git a/data-object-json.cabal b/data-object-json.cabal
--- a/data-object-json.cabal
+++ b/data-object-json.cabal
@@ -1,5 +1,5 @@
 name:            data-object-json
-version:         0.3.1.5
+version:         0.3.1.6
 license:         BSD3
 license-file:    LICENSE
 author:          Michael Snoyman <michael@snoyman.com>