diff --git a/.gitignore b/.gitignore
index 4cf7aec..4f19501 100644
--- a/.gitignore
+++ b/.gitignore
@@ -3,4 +3,3 @@ _build
_tmp
.directory
*~
-.sass-cache
diff --git a/Makefile b/Makefile
index 21957d6..05d26f8 100644
--- a/Makefile
+++ b/Makefile
@@ -19,17 +19,16 @@ OUTPUTPOSTS = \
$(BUILDDIR)/index.html $(BUILDDIR)/rss.xml
STYLE != find style -type f
-OUTPUTSTYLE = $(patsubst %.scss,%.css,$(patsubst %,$(BUILDDIR)/%,$(STYLE)))
+OUTPUTSTYLE = $(patsubst %,$(BUILDDIR)/%,$(STYLE))
-SCRIPT != find script -type f
-OUTPUTSCRIPT = $(patsubst %.ts,%.js,$(patsubst %,$(BUILDDIR)/%,$(SCRIPT)))
-
-OUTPUT = $(OUTPUTPOSTS) $(OUTPUTSTYLE) $(OUTPUTSCRIPT)
+OUTPUT = $(OUTPUTPOSTS) $(OUTPUTSTYLE)
ALL_TAGS = $(TMPDIR)/all-tags
POST_LISTS = $(TMPDIR)/post-lists
COMBO_FILTER = $(TMPDIR)/combo-filter
-EXECS = $(ALL_TAGS) $(POST_LISTS) $(COMBO_FILTER)
+EXECS = \
+ $(LAANTAS_SCRIPT) \
+ $(ALL_TAGS) $(POST_LISTS) $(COMBO_FILTER)
CABAL_FLAGS ?= -O
@@ -59,17 +58,8 @@ $(BUILDDIR)/%.html: $(TMPDIR)/%.md $(POSTDEPS) ; $(call pandoc-simple,meta.htm
$(BUILDDIR)/rss.xml: $(TMPDIR)/index.md $(POSTDEPS)
$(call pandoc,rss.xml,--metadata-file rss.yaml --write html)
-$(BUILDDIR)/%.css: %.scss
- @echo "[sass]" $@
- mkdir -p $(dir $@)
- sass --no-source-map -I style $< $@
-
-$(BUILDDIR)/%.js: %.ts
- @echo "[tsc]" $@
- mkdir -p $(dir $@)
- tsc --strict --noUncheckedIndexedAccess --noEmitOnError \
- --lib dom,es2021 --target es2015 \
- --outDir $(dir $@) $^
+.PHONY: langfilter laantas-script
+langfilter laantas-script: %: ; cabal build $@
# $(1): template file
# $(2): extra flags
diff --git a/blog-meta/all-tags.hs b/blog-meta/all-tags.hs
index e2e7c02..9bbc6ec 100644
--- a/blog-meta/all-tags.hs
+++ b/blog-meta/all-tags.hs
@@ -61,8 +61,8 @@ getTags file = do
makeYAML :: [Set Text] -> LazyBS.ByteString
makeYAML tags = "---\n" <> yaml <> "\n...\n" where
yaml = YAML.encode1 $ YAML.obj
- ["title" ##= YAML.str "all tags", "meta" ##= True,
- "all-tags" ##= collate tags]
+ [("title" ##= YAML.str "all tags"),
+ ("all-tags" ##= collate tags)]
-- | generates a makefile to include that generates the index and individual
-- tag pages. example:
@@ -112,7 +112,7 @@ data Tag =
instance YAML.ToYAML Tag where
toYAML (Tag {name, slug, count}) = YAML.obj $
- ["name" ##= name, "slug" ##= slug, "count" ##= count]
+ [("name" ##= name), ("slug" ##= slug), ("count" ##= count)]
-- | counts occurrences of each tag, and checks they all have distinct slugs
collate :: [Set Text] -> [Tag]
diff --git a/blog-meta/lib/NiceDate.hs b/blog-meta/lib/NiceDate.hs
index a90305e..50ee795 100644
--- a/blog-meta/lib/NiceDate.hs
+++ b/blog-meta/lib/NiceDate.hs
@@ -1,10 +1,10 @@
module NiceDate (niceDate) where
-import Control.Monad.Writer
-import Data.Map.Strict qualified as Map
-import Data.Monoid
-import Misc
import Text.Pandoc.Definition
+import qualified Data.Map.Strict as Map
+import Misc
+import Control.Monad.Writer
+import Data.Monoid
niceDate :: Meta -> Meta
niceDate (Meta m) =
diff --git a/blog-meta/lib/SlugTags.hs b/blog-meta/lib/SlugTags.hs
index 599f4ba..a614d1f 100644
--- a/blog-meta/lib/SlugTags.hs
+++ b/blog-meta/lib/SlugTags.hs
@@ -1,9 +1,10 @@
module SlugTags (slugTags) where
-import Data.Map.Strict qualified as Map
+import Text.Pandoc.Definition
+import qualified Data.Map.Strict as Map
+-- import Text.Pandoc.JSON
import Data.Text (Text)
import Misc
-import Text.Pandoc.Definition
slugTags :: Meta -> Meta
slugTags (Meta m) = Meta $ Map.adjust addSlugs "tags" m
diff --git a/blog-meta/lib/YAML.hs b/blog-meta/lib/YAML.hs
index 19200c3..4a68d43 100644
--- a/blog-meta/lib/YAML.hs
+++ b/blog-meta/lib/YAML.hs
@@ -1,15 +1,15 @@
{-# OPTIONS_GHC -Wno-orphans #-}
module YAML (module YAML, module Data.YAML, untagged) where
-import Data.ByteString (ByteString)
-import Data.ByteString.Char8 qualified as BS8
-import Data.ByteString.Lazy qualified as LazyBS
-import Data.Text (Text)
-import Data.Text qualified as Text
import Data.YAML
import Data.YAML.Event (untagged)
+import Data.Text (Text)
+import qualified Data.Text as Text
import Misc
-import System.IO qualified as IO
+import Data.ByteString (ByteString)
+import qualified Data.ByteString.Char8 as BS8
+import qualified Data.ByteString.Lazy as LazyBS
+import qualified System.IO as IO
str' :: String -> Node ()
diff --git a/blog-meta/post-lists.hs b/blog-meta/post-lists.hs
index 01d61f9..cbdbe9a 100644
--- a/blog-meta/post-lists.hs
+++ b/blog-meta/post-lists.hs
@@ -64,7 +64,7 @@ makeTagInfo infos title basename outdir = do
makeContent :: Text -> [PostInfo] -> LazyBS.ByteString
makeContent title is' = "---\n" <> YAML.encode1 val <> "...\n" where
is = sortBy (flip $ comparing date) is'
- val = YAML.obj ["title" ##= title, "posts" ##= is, "meta" ##= True]
+ val = YAML.obj [("title" ##= title), ("posts" ##= is)]
allTags :: Foldable t => t PostInfo -> Set Text
allTags = foldMap (Set.fromList . tags)
diff --git a/cabal.project b/cabal.project
index 15865bd..485c837 100644
--- a/cabal.project
+++ b/cabal.project
@@ -4,13 +4,13 @@ packages:
source-repository-package
type: git
location: https://git.rhiannon.website/rhi/lang.git
- tag: c4a430facbeaa55a9de8edd69145243475c94087
+ tag: ed54ec4c5af5b2b8ea25f0274e11c2f8c87714c3
subdir: langfilter
source-repository-package
type: git
location: https://git.rhiannon.website/rhi/lang.git
- tag: c4a430facbeaa55a9de8edd69145243475c94087
+ tag: ed54ec4c5af5b2b8ea25f0274e11c2f8c87714c3
subdir: laantas-script
source-repository-package
diff --git a/posts/new-new-theme.md b/posts/new-new-theme.md
deleted file mode 100644
index 8ef62b9..0000000
--- a/posts/new-new-theme.md
+++ /dev/null
@@ -1,14 +0,0 @@
----
-title: new new theme
-date: 2024-12-05
-summary: for real this time. probably
-tags: [december adventure]
-...
-
-yeah i redid it.
-
-it's more _on brand_ now, i think. and the actual css is nice and organised now. i am grudgingly using [sass] now because i really want those mixins. and functions.
-
-so yeah! honestly i don't think there is much to talk about with something like this. you can see the results.
-
-bye
diff --git a/posts/new-theme.md b/posts/new-theme.md
deleted file mode 100644
index f003eb5..0000000
--- a/posts/new-theme.md
+++ /dev/null
@@ -1,18 +0,0 @@
----
-title: new theme
-date: 2024-12-04
-tags: [december adventure]
-summary: wow!
-...
-
-hi today's `@december adventure@` was…
-
-:::banner
-redesigning this page
-:::
-
-maybe you noticed when you opened it. i know it's pretty subtle.
-
-:::aside
-**note to readers from the future**: it was not subtle.
-:::
diff --git a/posts/quorientation.md b/posts/quorientation.md
index 9c06c34..d40f526 100644
--- a/posts/quorientation.md
+++ b/posts/quorientation.md
@@ -29,8 +29,6 @@ so. one sentence at a time.
# one
-you know! the thing! from the game!
-
:::glosses
- suatł pattalal šilbari gulaigúšḿ fulla
- [ˌsuətɫ̩ ˈpatːɐləlʲ ˈʃilʲbɐɾɪ ɡɔˈlaɪɣɔːʃm̩ fʊɫːɑ]
@@ -39,13 +37,18 @@ you know! the thing! from the game!
- use your warps to skip some floors
:::
-{.floating .right .pixel}
+you know! the thing! from the game!
+
+
+ well. from the fan translation
+
+
- out of context, `{!patta}` means door. i suppose a portal would be a magic
door, an `{!ustaitł patta}`. but in the context of someone making one right
in front of you, it is clear what kind of door we're talking about.
- :::aside
+ :::{.aside .no-line}
the word `{!ustail}` also means "songs". did you know there's an old english
word for magic, `{ġealdor}`, that comes from the proto-germanic `{galdr}`,
meaning both "song" and "incantation"? i thought it was cute.
@@ -85,7 +88,7 @@ babylon no longer exists, so it doesn't need protecting. go have fun
mean something like "is possible/necessary".
"{flowers grow here} is possible".
- :::aside
+ :::{.aside .no-line}
the similarity of `{!fulla}` and `{!bulla}` is just a weird accident, in case
you're wondering. i made the words at different times. no etymology puzzle
here, sorry
@@ -109,7 +112,7 @@ babylon no longer exists, so it doesn't need protecting. go have fun
# abbreviation list
-:::{.abbr-list}
+:::{.twocol .abbr-list}
DEF
: [definite](https://lang.niss.website/laantas/nouns.html#definiteness)
["the"]{.note}
diff --git a/posts/rainbow-quox.md b/posts/rainbow-quox.md
index 17c51f3..e71b0bc 100644
--- a/posts/rainbow-quox.md
+++ b/posts/rainbow-quox.md
@@ -6,18 +6,17 @@ summary: q.t. colour scheme generator
header-includes: |