diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,3 +1,7 @@
+1.1.1
+=====
+    * Fix aggregate specifications.
+
 1.1.0
 =====
     * Add Aggregate API specifications.
diff --git a/eventsource-store-specs.cabal b/eventsource-store-specs.cabal
--- a/eventsource-store-specs.cabal
+++ b/eventsource-store-specs.cabal
@@ -2,10 +2,10 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: a73245d0b01b4f489e3877e705b0ec44226d71819dfeb9e1e05bf013a17152ea
+-- hash: d777dc8703aa877ee92bbe9d587eb15fc8c2b4e7e2a858fca62afb9305f35b67
 
 name:           eventsource-store-specs
-version:        1.1.0
+version:        1.1.1
 synopsis:       Provides common test specification for Store implementation.
 description:    Provides common test specification for Store implementation.
 category:       Eventsourcing, Testing
diff --git a/library/Test/EventSource/Store/Specification.hs b/library/Test/EventSource/Store/Specification.hs
--- a/library/Test/EventSource/Store/Specification.hs
+++ b/library/Test/EventSource/Store/Specification.hs
@@ -221,7 +221,8 @@
     got `shouldBe` events
 
   specify "API/Aggregate - submit event" $ do
-    agg <- Simple.newAgg (toStore store) (TestId "submit:event") (Test 0)
+    StreamName name <- freshStreamName
+    agg <- Simple.newAgg (toStore store) (TestId name) (Test 0)
     let events = replicate 10 (TestEvent 1)
 
     traverse_ (Simple.submitEvt agg) events
@@ -230,7 +231,8 @@
     got `shouldBe` Test 10
 
   specify "API/Aggregate - submit commands" $ do
-    agg <- Simple.newAgg (toStore store) (TestId "submit:command") (Test 0)
+    StreamName name <- freshStreamName
+    agg <- Simple.newAgg (toStore store) (TestId name) (Test 0)
 
     res1 <- Simple.submitCmd agg (TestIncr 1)
     let go1 (Right evt) = evt == TestEvent 1
@@ -246,7 +248,8 @@
     res2 `shouldSatisfy` go2
 
   specify "API/Aggregate - loading" $ do
-    agg1 <- Simple.newAgg (toStore store) (TestId "submit:load") (Test 0)
+    StreamName name <- freshStreamName
+    agg1 <- Simple.newAgg (toStore store) (TestId name) (Test 0)
 
     let commands = replicate 10 (TestIncr 1)
 
@@ -255,7 +258,7 @@
     res1 <- Simple.snapshot agg1
     res1 `shouldBe` Test 10
 
-    outcome <- Simple.loadAgg (toStore store) (TestId "submit:load") (Test 0)
+    outcome <- Simple.loadAgg (toStore store) (TestId name) (Test 0)
 
     case outcome of
       Left{}     -> error "We should be able to load an aggregate."
diff --git a/package.yaml b/package.yaml
--- a/package.yaml
+++ b/package.yaml
@@ -29,4 +29,4 @@
 maintainer: yo.eight@gmail.com
 name: eventsource-store-specs
 synopsis: Provides common test specification for Store implementation.
-version: '1.1.0'
+version: '1.1.1'