aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/components/Disclaimer.tsx12
-rw-r--r--src/components/Modal.tsx5
2 files changed, 14 insertions, 3 deletions
diff --git a/src/components/Disclaimer.tsx b/src/components/Disclaimer.tsx
index 5ffcc3f..d6537cf 100644
--- a/src/components/Disclaimer.tsx
+++ b/src/components/Disclaimer.tsx
@@ -13,8 +13,16 @@ export default function Disclaimer() {
>
<p>
The NeoHaskell project is a work-in-progress effort in it's early
- days. Mostly everything is missing. If you're curious about the
- project:
+ days. Mostly everything is missing (
+ <a
+ className="underline"
+ href="https://github.com/neohaskell/NeoHaskell/milestones"
+ target="_blank"
+ onClick={() => setDisclaimerOpen(!disclaimerOpen)}
+ >
+ click here for a status report
+ </a>
+ ). But, if you really want to know more about the project:
</p>
<a
className="text-lightsecondary hover:underline hover:decoration-wavy underline-offset-4 py-4 block"
diff --git a/src/components/Modal.tsx b/src/components/Modal.tsx
index 55ad174..80d482e 100644
--- a/src/components/Modal.tsx
+++ b/src/components/Modal.tsx
@@ -22,7 +22,10 @@ export default function Modal({
}: ModalProps) {
return (
open && (
- <div className="z-999 fixed left-0 top-0 flex h-full w-full items-center justify-center bg-black bg-opacity-50 py-10">
+ <div
+ className="z-999 fixed left-0 top-0 flex h-full w-full items-center justify-center bg-black bg-opacity-50 py-10"
+ onClick={() => onOk()}
+ >
<div className="max-h-full w-full max-w-xl overflow-y-auto sm:rounded-2xl bg-white">
<div className="w-full">
<div className="mx-auto my-20 max-w-[400px] flex flex-col gap-5">