diff --git a/Development/Shake/FilePattern.hs b/Development/Shake/FilePattern.hs
--- a/Development/Shake/FilePattern.hs
+++ b/Development/Shake/FilePattern.hs
@@ -37,7 +37,8 @@
 pattern = Concat Start . foldr Concat End . map f
     where
         f Star = Bracket $ Repeat $ Not pathSeparators
-        f SlashSlash = let s = Start `Or` End `Or` Lit pathSeparators in Bracket $ s `Concat` Repeat Any `Concat` s
+        f SlashSlash = let s = Start `Or` End `Or` Lit pathSeparators in Bracket $
+                       Or (s `Concat` Repeat Any `Concat` s) (Lit pathSeparators)
         f (Char x) = Lit $ if x == '/' then pathSeparators else [x]
 
 
diff --git a/Examples/Test/FilePattern.hs b/Examples/Test/FilePattern.hs
--- a/Examples/Test/FilePattern.hs
+++ b/Examples/Test/FilePattern.hs
@@ -18,6 +18,7 @@
     f False "foo//bar" "foobar"
     f False "foo//bar" "foobar/bar"
     f False "foo//bar" "foo/foobar"
+    f True "foo//bar" "foo/bar"
 
     assert (compatible []) "compatible"
     assert (compatible ["//*a.txt","foo//a*.txt"]) "compatible"
diff --git a/shake.cabal b/shake.cabal
--- a/shake.cabal
+++ b/shake.cabal
@@ -1,7 +1,7 @@
 cabal-version:      >= 1.8
 build-type:         Simple
 name:               shake
-version:            0.3.7
+version:            0.3.8
 license:            BSD3
 license-file:       LICENSE
 category:           Development