From 92dc86ebae30bac121ace294dc02e77ed7b55119 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Tue, 18 Mar 2014 13:47:13 -0700
Subject: [PATCH] restore reg & bal aliases, even if not advertised

---
 hledger/Hledger/Cli/Options.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/hledger/Hledger/Cli/Options.hs b/hledger/Hledger/Cli/Options.hs
index 15ef84956..0d5490107 100644
--- a/hledger/Hledger/Cli/Options.hs
+++ b/hledger/Hledger/Cli/Options.hs
@@ -292,7 +292,7 @@ addmode = (defCommandMode ["add"]) {
     }
  }
 
-balancemode = (defCommandMode $ ["balance"] ++ aliases) {
+balancemode = (defCommandMode $ ["balance"] ++ aliases ++ ["bal"]) { -- also accept but don't show the common bal alias
   modeHelp = "show accounts and balances" `withAliases` aliases
  ,modeGroupFlags = Group {
      groupUnnamed = [
@@ -320,7 +320,7 @@ printmode = (defCommandMode $ ["print"] ++ aliases) {
  }
   where aliases = ["p"]
 
-registermode = (defCommandMode $ ["register"] ++ aliases) {
+registermode = (defCommandMode $ ["register"] ++ aliases ++ ["reg"]) {
   modeHelp = "show postings and running total" `withAliases` aliases
  ,modeGroupFlags = Group {
      groupUnnamed = [