From a18809a83479b1348d5705e0c01d56091017d291 Mon Sep 17 00:00:00 2001
From: Anton Bobov <abobov@gmail.com>
Date: Fri, 2 Dec 2016 09:09:12 +0500
Subject: [zsh] Update aliases.

- Add quick ledger xact function "lx".
---
 files/.zsh/rc/S51_ledger | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

(limited to 'files/.zsh/rc/S51_ledger')

diff --git a/files/.zsh/rc/S51_ledger b/files/.zsh/rc/S51_ledger
index dfc6ee9..7d632cf 100644
--- a/files/.zsh/rc/S51_ledger
+++ b/files/.zsh/rc/S51_ledger
@@ -1,6 +1,9 @@
 # Ledger
 
 alias ledger='noglob ledger'
+alias ltoday='noglob ledger register --period today'
+alias ldays='noglob ledger register --begin "last day"'
+alias lweek='noglob ledger register --begin "last 7 days"'
 alias balc='bal --current --aux-date'
 
 bal() {
@@ -12,4 +15,18 @@ ele() {
     vim "$(eval "echo $fn")"
 }
 
+lx() {
+    entry=$(ledger xact $*)
+    fn=$(sed -En 's/^--file (.*)/\1/p' ~/.ledgerrc)
+    fn=${fn/#\~/$HOME}
+
+    echo "$entry"
+    read -q reply?"Is it ok? (Y/n) "
+    echo
+    case "$reply" in
+        [yY])
+            echo "$entry\n" >> "$fn";;
+    esac
+}
+
 # vim: et ft=zsh :
-- 
cgit v1.2.3