diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,7 +1,4 @@
-# Change log
-
-geteventstore-store uses [Semantic Versioning][].
-The change log is available through the [releases on GitHub][].
+1.0.1
+=====
 
-[Semantic Versioning]: http://semver.org/spec/v2.0.0.html
-[releases on GitHub]: https://github.com/githubuser/geteventstore-store/releases
+* Support `linkEvent` in `SavedEvent`.
diff --git a/eventsource-geteventstore-store.cabal b/eventsource-geteventstore-store.cabal
--- a/eventsource-geteventstore-store.cabal
+++ b/eventsource-geteventstore-store.cabal
@@ -3,7 +3,7 @@
 -- see: https://github.com/sol/hpack
 
 name:           eventsource-geteventstore-store
-version:        1.0.0
+version:        1.0.1
 synopsis:       GetEventStore store implementation.
 description:    GetEventStore store implementation.
 category:       Eventsourcing
@@ -36,7 +36,7 @@
       base >=4.9 && <5
     , protolude >=0.1.10 && <0.2
     , eventstore ==0.14.*
-    , eventsource-api ==1.*
+    , eventsource-api >= 1.1
     , aeson
     , mtl
   exposed-modules:
diff --git a/library/EventSource/Store/GetEventStore.hs b/library/EventSource/Store/GetEventStore.hs
--- a/library/EventSource/Store/GetEventStore.hs
+++ b/library/EventSource/Store/GetEventStore.hs
@@ -73,21 +73,27 @@
 
 --------------------------------------------------------------------------------
 fromGesEvent :: GES.ResolvedEvent -> SavedEvent
-fromGesEvent e = saved
+fromGesEvent e@(GES.ResolvedEvent recEvt lnkEvt _) = saved
   where
-    re = GES.resolvedEventOriginal e
-    eid = EventId $ GES.recordedEventId re
-    etyp = EventType $ GES.recordedEventType re
-    num = GES.recordedEventNumber re
-    payload = GES.recordedEventData re
-    metaBytes = GES.recordedEventMetadata re
-    event = Event { eventType = etyp
-                  , eventId = eid
-                  , eventPayload = dataFromBytes payload
-                  , eventMetadata = decodeStrict =<< metaBytes
-                  }
-    saved = SavedEvent { eventNumber = EventNumber num
-                       , savedEvent = event
+    re =
+      case recEvt of
+        Just result -> result
+        _           -> GES.resolvedEventOriginal e
+
+    make evt =
+      let eid = EventId $ GES.recordedEventId evt
+          etyp = EventType $ GES.recordedEventType evt
+          payload = GES.recordedEventData evt
+          metaBytes = GES.recordedEventMetadata evt in
+      Event { eventType = etyp
+            , eventId = eid
+            , eventPayload = dataFromBytes payload
+            , eventMetadata = decodeStrict =<< metaBytes
+            }
+
+    saved = SavedEvent { eventNumber = EventNumber $ GES.recordedEventNumber re
+                       , savedEvent = make re
+                       , linkEvent = fmap make lnkEvt
                        }
 
 --------------------------------------------------------------------------------
diff --git a/package.yaml b/package.yaml
--- a/package.yaml
+++ b/package.yaml
@@ -18,7 +18,7 @@
   - base >=4.9 && <5
   - protolude >=0.1.10 && <0.2
   - eventstore ==0.14.*
-  - eventsource-api ==1.*
+  - eventsource-api >= 1.1
   - aeson
   - mtl
   source-dirs: library
@@ -45,4 +45,4 @@
     - -with-rtsopts=-N
     main: Main.hs
     source-dirs: test-suite
-version: '1.0.0'
+version: '1.0.1'