From bc4c38e8394df0350dd6f923fc74734339ffd73d Mon Sep 17 00:00:00 2001
From: Tom McLaughlin <tom@codedown.io>
Date: Thu, 19 Dec 2024 19:46:27 -0700
Subject: [PATCH 1/2] site: get rid of landing page

---
 .../context-libraries/sandwich-contexts.md    |   2 +
 sandwich-site/docs/intro.md                   |  41 ++++-
 sandwich-site/docusaurus.config.ts            |   1 +
 sandwich-site/src/pages/index.tsx             | 148 +-----------------
 sandwich-site/src/pages/styles.module.css     |   6 +-
 5 files changed, 44 insertions(+), 154 deletions(-)

diff --git a/sandwich-site/docs/context-libraries/sandwich-contexts.md b/sandwich-site/docs/context-libraries/sandwich-contexts.md
index 0fecc7a2..18704081 100644
--- a/sandwich-site/docs/context-libraries/sandwich-contexts.md
+++ b/sandwich-site/docs/context-libraries/sandwich-contexts.md
@@ -27,3 +27,5 @@ This test will log the various binaries that are available, such as `emacs`, `em
 ## File contexts
 
 The [Test.Sandwich.Contexts.Files](https://hackage.haskell.org/package/sandwich-contexts/docs/Test-Sandwich-Contexts-Files.html) module allows you to introduce named files as contexts.
+
+## PostgreSQL contexts
diff --git a/sandwich-site/docs/intro.md b/sandwich-site/docs/intro.md
index df4553e9..8f7947a2 100644
--- a/sandwich-site/docs/intro.md
+++ b/sandwich-site/docs/intro.md
@@ -5,9 +5,44 @@ sidebar_label: Introduction
 slug: /
 ---
 
-import useBaseUrl from '@docusaurus/useBaseUrl';
-
-Sandwich is a test framework for Haskell, inspired by and (almost) a drop-in replacement for [Hspec](http://hspec.github.io/). This section will show some of its features.
+import useBaseUrl from "@docusaurus/useBaseUrl";
+import "react-responsive-carousel/lib/styles/carousel.min.css";
+import { Carousel } from "react-responsive-carousel";
+
+import styles from "../src/pages/styles.module.css";
+
+Sandwich is a test framework for Haskell, inspired by and (almost) a drop-in replacement for [Hspec](http://hspec.github.io/).
+
+Sandwich has a number of powerful features and integrations, such as:
+* Interactive terminal UI interface for viewing test progress and results.
+* Built-in [profiling](/docs/profiling) support.
+* Integrations such as [Hedgehog](/docs/extensions/sandwich-hedgehog), [QuickCheck](/docs/extensions/sandwich-quickcheck), and [Selenium](/docs/extensions/sandwich-webdriver).
+* Context libraries that allow you to introduce things like [databases](/docs/context-libraries/sandwich-contexts#postgresql-contexts), [Docker containers](#TODO), or even full [Kubernetes clusters](/docs/context-libraries/sandwich-contexts-kubernetes).
+
+<div className={styles.carouselContainer}>
+  <Carousel showThumbs={false}
+            dynamicHeight={true}
+            statusFormatter={(current, total) => `${current} of ${total}`}>
+    <div>
+      <div className={styles.carouselHeading}>Terminal UI interface</div>
+      <img src={useBaseUrl("/img/basic.gif")}
+           style={{ paddingBottom: "2.05em" }} />
+    </div>
+    <div>
+      <div className={styles.carouselHeading}>Jump to failure in editor</div>
+      <img src={useBaseUrl("/img/jump_to_error.gif")}
+           style={{ paddingBottom: "2.05em" }} />
+    </div>
+    <div>
+      <div className={styles.carouselHeading}>Slack integration</div>
+      <img src={useBaseUrl("/img/slack.gif")} />
+    </div>
+    <div>
+      <div className={styles.carouselHeading}>Timing and flamegraphs</div>
+      <img src={useBaseUrl("/img/timing_landing.gif")} />
+    </div>
+  </Carousel>
+</div>
 
 ## Basic tests
 
diff --git a/sandwich-site/docusaurus.config.ts b/sandwich-site/docusaurus.config.ts
index b078afee..3a496e88 100644
--- a/sandwich-site/docusaurus.config.ts
+++ b/sandwich-site/docusaurus.config.ts
@@ -90,6 +90,7 @@ const config: Config = {
       '@docusaurus/preset-classic',
       {
         docs: {
+          // routeBasePath: "sandwich",
           sidebarPath: require.resolve('./sidebars.js'),
           // Please change this to your repo.
           editUrl: 'https://github.com/facebook/docusaurus/edit/master/website/',
diff --git a/sandwich-site/src/pages/index.tsx b/sandwich-site/src/pages/index.tsx
index 5a638cc3..d43dd66b 100644
--- a/sandwich-site/src/pages/index.tsx
+++ b/sandwich-site/src/pages/index.tsx
@@ -1,159 +1,15 @@
 
 import React from "react";
-import clsx from "clsx";
-import Layout from "@theme/Layout";
-import Link from "@docusaurus/Link";
+import { Redirect } from "@docusaurus/router";
 import useDocusaurusContext from "@docusaurus/useDocusaurusContext";
-import useBaseUrl from "@docusaurus/useBaseUrl";
-import Typist from "react-typist";
-
-import styles from "./styles.module.css";
 
 import "react-responsive-carousel/lib/styles/carousel.min.css";
-import { Carousel } from "react-responsive-carousel";
-
 
-const features = [
-  {
-    title: "Powerful formatters",
-    imageUrl: "img/print_formatter.png",
-    description: (
-      <>
-          Use the terminal UI formatter to inspect test results, re-run selected tests, or jump straight to test sources in your editor. Or, choose one of the more traditional formatters.
-      </>
-    ),
-  }, {
-    title: "Easy profiling",
-    imageUrl: "img/speedscope.png",
-    description: (
-      <>
-          Automatically record timing data for every test suite and visualize it as a flamegraph.
-      </>
-    ),
-  }, {
-    title: "Zero-config Selenium tests",
-    imageUrl: "img/selenium_logo.png",
-    description: (
-      <>
-          Automatically obtain Selenium driver binaries to match your Chrome or Firefox version, run tests in graphical or headless mode, and even record videos.
-      </>
-    ),
-  },
-];
-
-function Feature({imageUrl, title, description}) {
-  const imgUrl = useBaseUrl(imageUrl);
-  return (
-    <div className={clsx("col col--4", styles.feature)}>
-        {imgUrl && (
-          <div className="text--center">
-              <img className={styles.featureImage} src={imgUrl} alt={title} />
-          </div>
-        )}
-        <h3>{title}</h3>
-        <p>{description}</p>
-    </div>
-  );
-}
 
 function Home() {
   const {siteConfig} = useDocusaurusContext();
-  return (
-    <Layout title={`Hello from ${siteConfig.title}`}
-            description="Yet another test framework for Haskell.">
-        <header className={styles.heroBanner}>
-            <div className="container">
-                <h1 className="hero__title">{siteConfig.title}</h1>
-                <p className="hero__subtitle">{siteConfig.tagline}</p>
-
-                <div className={styles.carouselContainer}>
-                    <Carousel showThumbs={false}
-                              dynamicHeight={true}>
-                        <div>
-                            <div className={styles.carouselHeading}>Terminal UI interface</div>
-                            <img src={useBaseUrl("/img/basic.gif")}
-                                 style={{
-                                   paddingBottom: "2.05em"
-                                 }} />
-                        </div>
-                        <div>
-                            <div className={styles.carouselHeading}>Jump to failure in editor</div>
-                            <img src={useBaseUrl("/img/jump_to_error.gif")}
-                                 style={{
-                                   paddingBottom: "2.05em"
-                                 }} />
-                        </div>
-                        <div>
-                            <div className={styles.carouselHeading}>Slack integration</div>
-                            <img src={useBaseUrl("/img/slack.gif")} />
-                        </div>
-                        <div>
-                            <div className={styles.carouselHeading}>Timing and flamegraphs</div>
-                            <img src={useBaseUrl("/img/timing_landing.gif")} />
-                        </div>
-                    </Carousel>
-                </div>
-
-                <div className={styles.buttons}>
-                    <Link
-                      className={clsx(
-                        "button button--outline button--secondary button--lg",
-                        styles.getStarted,
-                      )}
-                      to={useBaseUrl("docs/")}>
-                        Read the docs
-                    </Link>
-
-                    <span className={styles.indexCtasGitHubButtonWrapper}>
-                        <iframe className={styles.indexCtasGitHubButton}
-                                src="https://ghbtns.com/github-btn.html?user=codedownio&amp;repo=sandwich&amp;type=star&amp;count=true&amp;size=large"
-                                width={160}
-                                height={30}
-                                title="GitHub Stars" />
-                    </span>
-                </div>
-            </div>
-        </header>
-
-        <div className={"section " + styles.section}>
-            <div className={styles.container}>
-                <span className={styles.heading}>
-                    Run the demo from the landing page:
-                </span>
-
-                <div className={styles.code}>
-                    <Typist avgTypingDelay={20}
-                            hideWhenDone={true}>
-                        git clone git@github.com:codedownio/sandwich.git
-                        <br />
-                        cd sandwich
-                        <br />
-                        stack run demo-landing -- --tui
-                    </Typist>
-                </div>
-
-                <span className={styles.heading}>
-                    Or, try one of the other <a className={styles.sectionLink}
-                                                href="https://github.com/codedownio/sandwich/tree/master/demos">demos</a> with <code className={styles.codeInline}>stack run demo-[demoname]</code>.
-                </span>
-            </div>
-        </div>
 
-        <main>
-            {features && features.length > 0 && (
-              <section className={styles.features}>
-                  <div className="container">
-                      <div className="row">
-                          {features.map((props, idx) => (
-                            <Feature key={idx} {...props} />
-                          ))}
-                      </div>
-                  </div>
-              </section>
-            )}
-        </main>
-    </Layout>
-  );
+  return <Redirect to={siteConfig.baseUrl + "docs"} />;
 }
 
 export default Home;
diff --git a/sandwich-site/src/pages/styles.module.css b/sandwich-site/src/pages/styles.module.css
index 9e332e00..00d9863c 100644
--- a/sandwich-site/src/pages/styles.module.css
+++ b/sandwich-site/src/pages/styles.module.css
@@ -19,10 +19,7 @@
 }
 
 .carouselContainer {
-  width: 80%;
-  margin-left: auto;
-  margin-right: auto;
-  margin-bottom: 2em;
+
 }
 
 .buttons {
@@ -46,7 +43,6 @@
 .carouselHeading {
   font-size: 1.2em;
   font-weight: bold;
-  color: white;
 }
 
 .section {

From 20cd44c824fbac16f1d0820903cb0a7d4b1ce679 Mon Sep 17 00:00:00 2001
From: Tom McLaughlin <tom@codedown.io>
Date: Thu, 19 Dec 2024 19:46:39 -0700
Subject: [PATCH 2/2] Get on latest resolver

---
 stack.yaml      | 2 +-
 stack.yaml.lock | 8 ++++----
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/stack.yaml b/stack.yaml
index b8212a21..340d09aa 100644
--- a/stack.yaml
+++ b/stack.yaml
@@ -1,5 +1,5 @@
 
-resolver: lts-22.27
+resolver: lts-22.43
 
 # ghc-options:
 #   "$locals": >-
diff --git a/stack.yaml.lock b/stack.yaml.lock
index 02d1e839..f01fe430 100644
--- a/stack.yaml.lock
+++ b/stack.yaml.lock
@@ -87,7 +87,7 @@ packages:
     subdir: x509-validation
 snapshots:
 - completed:
-    sha256: bc144ddf301a5c99f2cf51c7de50279ba144fd4486cb3c66f87ed761d6bbf6e9
-    size: 719131
-    url: https://raw.githubusercontent.com/commercialhaskell/stackage-snapshots/master/lts/22/27.yaml
-  original: lts-22.27
+    sha256: 08bd13ce621b41a8f5e51456b38d5b46d7783ce114a50ab604d6bbab0d002146
+    size: 720271
+    url: https://raw.githubusercontent.com/commercialhaskell/stackage-snapshots/master/lts/22/43.yaml
+  original: lts-22.43