configuration/local/bin/ladd

51 lines
1.2 KiB
Plaintext
Raw Normal View History

#!/bin/sh
2019-11-16 19:37:56 +01:00
# Copies a previous transaction to today.
#
# Select a previous transaction by fuzzy matching on the titles. This
# transaction is then copied to the end of the journal, uncleared and
2019-11-16 19:50:27 +01:00
# set to the current date. Finally, it opens the end of the file in
# $EDITOR.
2019-11-16 19:37:56 +01:00
#
# Bonus over `hledger add`: interactive matching it easier, and
# transaction formatting is retained because it's just a copy.
2019-11-16 19:50:27 +01:00
#
# Depends on:
# - fzf (https://github.com/junegunn/fzf)
# - ed
ledger="${1:-$LEDGER_FILE}"
2019-11-16 19:27:53 +01:00
# fuzzy select a transaction title
selection="$(sed -n 's/....-..-..\( [*!]\)\? //p' "$ledger" | sort | uniq | fzf)"
[ -z "$selection" ] && clear && exit 0 # quit if escaped
cat <<HERE | ed --silent "$ledger"
# append a newline for easier searching
\$a
.
# yank matching transaction (closed by empty line)
?^....-..-..\( [*!]\)\? ${selection}\$?;/^\$/y
# select line below last none-empty line
$
?^..*?
+
# put transaction
x
# replace date with today
?^\$?
2019-05-10 15:07:45 +02:00
+s/....-..-..\( [*!]\)\?/$(date +'%Y-%m-%d')/
# delete empty lines at end and quit
/^\$/,\$d
wq
HERE
2019-11-16 19:50:27 +01:00
# review change: open end of the file (if I know how)
case "$EDITOR" in
vi*) "$EDITOR" +\$ "$ledger" ;;
emacs) "$EDITOR" "$ledger" -f end-of-buffer ;;
*) "$EDITOR" "$ledger" ;;
esac
2019-11-16 19:27:53 +01:00
clear