diff --git a/nix-eval.cabal b/nix-eval.cabal
--- a/nix-eval.cabal
+++ b/nix-eval.cabal
@@ -2,7 +2,7 @@
 -- see http://haskell.org/cabal/users-guide/
 
 name:                nix-eval
-version:             0.1.0.1
+version:             0.1.0.2
 synopsis:            Evaluate Haskell expressions using Nix to get packages
 description:         Evaluate Haskell expressions using Nix to get packages
 homepage:            http://chriswarbo.net/git/nix-eval
diff --git a/src/Language/Eval/Internal.hs b/src/Language/Eval/Internal.hs
--- a/src/Language/Eval/Internal.hs
+++ b/src/Language/Eval/Internal.hs
@@ -97,6 +97,7 @@
 raw s = Expr ([], [], s)
 
 -- | Apply the first Expr to the second, eg. `f $$ x` ==> `f x`
+infixr 8 $$
 ($$) :: Expr -> Expr -> Expr
 (Expr (p1, m1, e1)) $$ (Expr (p2, m2, e2)) = Expr
   (nub (p1 ++ p2),
diff --git a/tests/Main.hs b/tests/Main.hs
--- a/tests/Main.hs
+++ b/tests/Main.hs
@@ -37,6 +37,7 @@
               , testProperty "Can eval sums"       sumEval
               , testProperty "Can import modules"  modulesImport
               , testProperty "Can import packages" packagesImport
+              , testProperty "$$ precedence"       precedence
               ]
             else []
 
@@ -57,6 +58,12 @@
   in checkIO (withPkgs ["text"] expr)
              (Just (show (length s)))
 
+precedence :: String -> Property
+precedence s =
+  checkIO (withPkgs ["text"] (qualified "Data.Text" "unpack" $$
+                              qualified "Data.Text" "pack"   $$
+                              asString s))
+          (Just (show s))
 
 -- Helpers