From e7254223846dbec352628aa9d156e0fe323a4e93 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Fri, 27 May 2022 13:27:21 -0500 Subject: New post, asset moving, dir-locals, etc. --- src/.dir-locals.el | 4 +++ src/_head.htm | 2 +- src/_index.htm | 3 +- src/paper-airplane-day-and-two-fire-alarms.ht | 49 +++++++++++++++++++++++++++ src/static/casa.css | 32 ----------------- src/static/rss.xml | 27 --------------- src/twtxt.ht | 22 ++++++++++++ 7 files changed, 78 insertions(+), 61 deletions(-) create mode 100644 src/.dir-locals.el create mode 100644 src/paper-airplane-day-and-two-fire-alarms.ht delete mode 100644 src/static/casa.css delete mode 100644 src/static/rss.xml create mode 100644 src/twtxt.ht (limited to 'src') diff --git a/src/.dir-locals.el b/src/.dir-locals.el new file mode 100644 index 0000000..8e332c0 --- /dev/null +++ b/src/.dir-locals.el @@ -0,0 +1,4 @@ +;;; Directory Local Variables +;;; For more information see (info "(emacs) Directory Variables") + +((fundamental-mode . ((compile-command . "make build")))) diff --git a/src/_head.htm b/src/_head.htm index e8ec1cc..0eef7ac 100644 --- a/src/_head.htm +++ b/src/_head.htm @@ -8,7 +8,7 @@
Ahoy! This here is my little home-away-from-home on the interwebs.
I'm currently experimenting with a custom little SSG
I'm calling HAT TRICK.
- I should probably throw the source up somewhere, but I haven't yet.
+ I should probably throw the source up somewhere, but I haven't yet.
+ Download the source here!
nyan-mode
in my mode-line. Oh, I need to remember the
+actually-selected-window
package, which I wrote I belive
+for nyan-mode
! I'll do that when I'm done here.
+
+I also wrote a little function to make it easier to post on this blog. Here it
+is:
+
+```
+(defun blog-post (title &optional date)
+ "Make a new blog post, with TITLE on DATE."
+ (interactive (list (read-string "Title: ")
+ (format-time-string "%F")))
+ (let ((blog-directory (expand-file-name "~/src/hat-trick/src/"))
+ (metadata-format ";@@%s: %s@@\n")
+ (slug (string-trim (downcase (replace-regexp-in-string "[^[:alnum:]]"
+ "-" title))
+ "-" "-")))
+ (find-file (expand-file-name (concat slug ".ht") blog-directory))
+ (insert (format metadata-format "title" title))
+ (when date
+ (insert (format metadata-format "date" date)))
+ (insert "\n")))
+```
+
+I think the next thing I should do is make a major-mode ... or maybe I should
+just use web-mode
....
+
+And of course, I need to update the syntax of these .ht files. They're
+okay, but I think I could improve them in a few ways. Not that I've
+figured out what those ways are, lol.
+
+--delete
flag
+doesn't do anything with excluded files by default, so I can
+just throw it in the site root and have a grand ol' time.
+
+Still to do:
+
+- Finalize hat-trick markup
+- Figure out a way to cross-post to gemini and gopher too, why not
+- Write more content? I suppose?
+- ...
+- Profit!!!
--
cgit 1.4.1-21-gabe81