diff --git a/ghc-pandoc-types.changes b/ghc-pandoc-types.changes
index e4aaadf..23f72ae 100644
--- a/ghc-pandoc-types.changes
+++ b/ghc-pandoc-types.changes
@@ -1,3 +1,9 @@
+-------------------------------------------------------------------
+Thu Oct  7 07:57:36 UTC 2021 - psimons@suse.com
+
+- Update pandoc-types to version 1.22 revision 1.
+  Upstream has revised the Cabal build instructions on Hackage.
+
 -------------------------------------------------------------------
 Thu Dec 17 12:20:00 UTC 2020 - Ondřej Súkup <mimi.vx@gmail.com>
  
diff --git a/ghc-pandoc-types.spec b/ghc-pandoc-types.spec
index 03ef989..acba353 100644
--- a/ghc-pandoc-types.spec
+++ b/ghc-pandoc-types.spec
@@ -1,7 +1,7 @@
 #
 # spec file for package ghc-pandoc-types
 #
-# Copyright (c) 2020 SUSE LLC
+# Copyright (c) 2021 SUSE LLC
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -25,6 +25,7 @@ Summary:        Types for representing a structured document
 License:        GPL-2.0-only
 URL:            https://hackage.haskell.org/package/%{pkg_name}
 Source0:        https://hackage.haskell.org/package/%{pkg_name}-%{version}/%{pkg_name}-%{version}.tar.gz
+Source1:        https://hackage.haskell.org/package/%{pkg_name}-%{version}/revision/1.cabal#/%{pkg_name}.cabal
 BuildRequires:  ghc-Cabal-devel
 BuildRequires:  ghc-QuickCheck-devel
 BuildRequires:  ghc-aeson-devel
@@ -75,6 +76,7 @@ This package provides the Haskell %{pkg_name} library development files.
 
 %prep
 %autosetup -n %{pkg_name}-%{version}
+cp -p %{SOURCE1} %{pkg_name}.cabal
 
 %build
 %ghc_lib_build
diff --git a/pandoc-types.cabal b/pandoc-types.cabal
new file mode 100644
index 0000000..1bf9b79
--- /dev/null
+++ b/pandoc-types.cabal
@@ -0,0 +1,97 @@
+cabal-version:       2.2
+Name:                pandoc-types
+version:             1.22
+x-revision: 1
+Synopsis:            Types for representing a structured document
+Description:         @Text.Pandoc.Definition@ defines the 'Pandoc' data
+                     structure, which is used by pandoc to represent
+                     structured documents.  This module used to live
+                     in the pandoc package, but starting with pandoc 1.7, it
+                     has been split off, so that other packages can use it
+                     without drawing in all of pandoc's dependencies, and
+                     pandoc itself can depend on packages (like citeproc-hs)
+                     that use them.
+                     .
+                     @Text.Pandoc.Builder@ provides functions for building
+                     up @Pandoc@ structures programmatically.
+                     .
+                     @Text.Pandoc.Generic@ provides generic functions for
+                     manipulating Pandoc documents.
+                     .
+                     @Text.Pandoc.Walk@ provides faster, nongeneric functions
+                     for manipulating Pandoc documents.
+                     .
+                     @Text.Pandoc.JSON@ provides functions for serializing
+                     and deserializing a @Pandoc@ structure to and from JSON.
+
+Homepage:            https://pandoc.org/
+License:             BSD-3-Clause
+License-file:        LICENSE
+Author:              John MacFarlane
+Maintainer:          jgm@berkeley.edu
+Bug-Reports:         https://github.com/jgm/pandoc-types/issues
+Copyright:           (c) 2006-2019 John MacFarlane
+Category:            Text
+Build-type:          Simple
+Tested-With:         GHC == 8.0.2, GHC == 8.2.2, GHC == 8.4.2,
+                     GHC == 8.6.5, GHC == 8.8.1
+Extra-Source-Files:  changelog
+Source-repository    head
+  type:              git
+  location:          git://github.com/jgm/pandoc-types.git
+
+Library
+  hs-source-dirs:    src
+  Exposed-modules:   Text.Pandoc.Definition
+                     Text.Pandoc.Generic
+                     Text.Pandoc.Walk
+                     Text.Pandoc.Builder
+                     Text.Pandoc.JSON
+                     Text.Pandoc.Arbitrary
+  Other-modules:     Paths_pandoc_types
+  Autogen-modules:   Paths_pandoc_types
+  Build-depends:     base >= 4.5 && < 5,
+                     containers >= 0.3,
+                     text,
+                     deepseq >= 1.4.1 && < 1.5,
+                     syb >= 0.1 && < 0.8,
+                     ghc-prim >= 0.2,
+                     bytestring >= 0.9 && < 0.12,
+                     aeson >= 0.6.2 && < 1.6,
+                     transformers >= 0.2 && < 0.6,
+                     QuickCheck >= 2.10 && < 2.15
+  if !impl(ghc >= 8.0)
+    Build-depends:   semigroups == 0.18.*
+  ghc-options:       -Wall
+  default-language:  Haskell2010
+
+test-suite test-pandoc-types
+  type:                exitcode-stdio-1.0
+  hs-source-dirs:      test
+  main-is:             test-pandoc-types.hs
+  build-depends:       base,
+                       pandoc-types,
+                       syb,
+                       aeson >= 0.6.2 && < 1.6,
+                       containers >= 0.3,
+                       text,
+                       bytestring >= 0.9 && < 0.12,
+                       test-framework >= 0.3 && < 0.9,
+                       test-framework-hunit >= 0.2 && < 0.4,
+                       test-framework-quickcheck2 >= 0.2.9 && < 0.4,
+                       QuickCheck >= 2.10 && < 2.15,
+                       HUnit >= 1.2 && < 1.7,
+                       string-qq >= 0.0.2 && < 0.1
+  ghc-options:         -threaded -rtsopts -with-rtsopts=-N -Wall -O2
+  default-language:  Haskell2010
+
+benchmark benchmark-pandoc-types
+  type:            exitcode-stdio-1.0
+  main-is:         bench.hs
+  hs-source-dirs:  benchmark
+  build-depends:   pandoc-types,
+                   base >= 4.5 && < 5,
+                   text,
+                   criterion >= 1.0 && < 1.6
+  ghc-options:   -rtsopts -Wall -fno-warn-unused-do-bind -O2
+  default-language:  Haskell2010