From 82abadcecc7534b4847238ee2a977f33256b0439 Mon Sep 17 00:00:00 2001
From: George Abbott <george@gabbott.dev>
Date: Sun, 26 Jan 2025 11:37:22 +0000
Subject: sh

---
 scripts/sh/wp | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100755 scripts/sh/wp

(limited to 'scripts/sh/wp')

diff --git a/scripts/sh/wp b/scripts/sh/wp
new file mode 100755
index 0000000..3ef5aa4
--- /dev/null
+++ b/scripts/sh/wp
@@ -0,0 +1,18 @@
+#!/bin/sh
+# Write Poem
+# Format of the poem is in the same way as wv. 
+
+list() {
+    out="file	date	title\n"
+    for f in $(find $WWW_DEFAULT_PATH/src/poetry -type f | sort -k 3) ; do
+	out="$out$(basename "$f")	$(sed -n 2p $f)	$(sed -n 1p $f)\n"
+    done
+
+    printf "$(printf "$out" | column -ts '	')\n"
+}
+
+[ -z "$WWW_DEFAULT_PATH" ] && echo "WWW_DEFAULT_PATH not set" && exit 1
+[ -z "$1" ]                && echo "You must provide a name" && exit 2
+[ "$1" = "ls" ]            && list && exit 0
+
+nvim "$WWW_DEFAULT_PATH/src/poetry/$1"
-- 
cgit v1.2.1