diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,3 +1,6 @@
+- 0.3.3.1.22.2
+    - Add `swaggerSchemaUIServer'`
+
 - 0.3.2.1.22.2
     - Update to ReDoc-1.22.2
     - Add GHC-8.6 support
diff --git a/servant-swagger-ui-redoc.cabal b/servant-swagger-ui-redoc.cabal
--- a/servant-swagger-ui-redoc.cabal
+++ b/servant-swagger-ui-redoc.cabal
@@ -1,48 +1,46 @@
-cabal-version:  1.12
-name:           servant-swagger-ui-redoc
-version:        0.3.2.1.22.2
-
-synopsis:       Servant swagger ui: ReDoc theme
-category:       Web, Servant, Swagger
+cabal-version:      1.12
+name:               servant-swagger-ui-redoc
+version:            0.3.3.1.22.2
+synopsis:           Servant swagger ui: ReDoc theme
+category:           Web, Servant, Swagger
 description:
   Provide embedded swagger UI for servant and swagger (i.e. servant-swagger)
   .
   ReDoc theme: https://github.com/Rebilly/ReDoc
 
-homepage:       https://github.com/haskell-servant/servant-swagger-ui
-bug-reports:    https://github.com/haskell-servant/servant-swagger-ui/issues
-author:         Oleg Grenrus <oleg.grenrus@iki.fi>
-maintainer:     haskell-servant-maintainers@googlegroups.com
-license:        BSD3
-license-file:   LICENSE
-build-type:     Simple
-tested-with:    GHC ==7.8.4 || ==7.10.3 || ==8.0.2 ||  ==8.2.2 || ==8.4.4 || ==8.6.1
+homepage:           https://github.com/haskell-servant/servant-swagger-ui
+bug-reports:
+  https://github.com/haskell-servant/servant-swagger-ui/issues
 
+author:             Oleg Grenrus <oleg.grenrus@iki.fi>
+maintainer:         haskell-servant-maintainers@googlegroups.com
+license:            BSD3
+license-file:       LICENSE
+build-type:         Simple
+tested-with:
+  GHC ==7.8.4 || ==7.10.3 || ==8.0.2 || ==8.2.2 || ==8.4.4 || ==8.6.5
+
 extra-source-files:
-    redoc-dist-1.22.2/redoc.min.js
-    redoc.index.html.tmpl
-    CHANGELOG.md
+  redoc-dist-1.22.2/redoc.min.js
+  redoc.index.html.tmpl
+  CHANGELOG.md
 
 source-repository head
-  type: git
+  type:     git
   location: https://github.com/haskell-servant/servant-swagger-ui
 
 library
-  hs-source-dirs:
-      src
-  ghc-options: -Wall
-
+  hs-source-dirs:   src
+  ghc-options:      -Wall
+  build-depends:    servant-swagger-ui-core >=0.3.3 && <0.4
   build-depends:
-    servant-swagger-ui-core >=0.3.2 && <0.4
+      base             >=4.7      && <4.13
+    , bytestring       >=0.10.4.0 && <0.11
+    , file-embed-lzma  >=0        && <0.1
+    , servant          >=0.14     && <0.17
+    , servant-server   >=0.14     && <0.17
+    , swagger2         >=2.3.0.1  && <2.5
+    , text             >=1.2.3.0  && <1.3
 
-  build-depends:
-      base              >=4.7      && <4.13
-    , bytestring        >=0.10.4.0 && <0.11
-    , file-embed-lzma   >=0        && <0.1
-    , servant           >=0.14     && <0.15
-    , servant-server    >=0.14     && <0.15
-    , swagger2          >=2.3.0.1  && <2.4
-    , text              >=1.2.3.0  && <1.3
-  exposed-modules:
-      Servant.Swagger.UI.ReDoc
+  exposed-modules:  Servant.Swagger.UI.ReDoc
   default-language: Haskell2010
diff --git a/src/Servant/Swagger/UI/ReDoc.hs b/src/Servant/Swagger/UI/ReDoc.hs
--- a/src/Servant/Swagger/UI/ReDoc.hs
+++ b/src/Servant/Swagger/UI/ReDoc.hs
@@ -46,6 +46,7 @@
     SwaggerSchemaUI,
     SwaggerSchemaUI',
     redocSchemaUIServer,
+    redocSchemaUIServer',
 
     -- ** ReDoc theme
     redocIndexTemplate,
@@ -68,6 +69,13 @@
     => Swagger -> Server (SwaggerSchemaUI' dir api)
 redocSchemaUIServer =
     swaggerSchemaUIServerImpl redocIndexTemplate redocFiles
+
+-- | Use a custom server to serve the Swagger spec source.
+redocSchemaUIServer'
+    :: Server api -> Server (SwaggerSchemaUI' dir api)
+redocSchemaUIServer' =
+    swaggerSchemaUIServerImpl' redocIndexTemplate redocFiles
+
 
 redocIndexTemplate :: Text
 redocIndexTemplate = $(embedText "redoc.index.html.tmpl")
