#!/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"