#!/bin/sh
. "$_EXEC/cgilite/storage.sh"
_DATE="$(date +%s)"
mkdir -p "$_DATA"/tags
printf '
\n'
for tag in "$@"; do
tag="$(printf %s "$tag" |awk '{ sub(/^#/, ""); gsub(/[^[:alnum:]]/, "_"); print toupper($0); }')"
DBM "${_DATA}/tags/${tag}" set "$PATH_INFO" "$_DATE"
printf '- #%s
\n' "$tag"
done
printf '
\n'