From abae9138e9b7746a23d66d56673e10343a9cec11 Mon Sep 17 00:00:00 2001
From: John Wiegley <johnw@newartisans.com>
Date: Thu, 29 Jul 2004 17:25:28 -0400
Subject: added missing files

---
 scripts/bal | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100755 scripts/bal

(limited to 'scripts/bal')

diff --git a/scripts/bal b/scripts/bal
new file mode 100755
index 00000000..a6d97ab9
--- /dev/null
+++ b/scripts/bal
@@ -0,0 +1,26 @@
+#!/bin/sh
+
+switch=""
+current="-c"
+limit="-l \$50"
+
+if [ "$1" = "-C" -o "$1" = "-U" -o "$1" = "-P" ]; then
+  switch="$1"
+  shift
+elif [ "$1" = "-b" -o "$1" = "-e" ]; then
+  current="$1 $2"
+  shift 2
+fi
+
+accts="$@"
+if [ -z "$accts" ]; then
+  accts="-Equity -Income -Expenses"
+  if [ ! "$switch" = "-P" ]; then
+    accts="$accts -Savings -Retirement"
+  fi
+else
+  limit=""
+  negonly=""
+fi
+
+ledger $current $limit $negonly -s $switch balance $accts
-- 
cgit v1.2.3