From 9418967343d7b5a32915e8c261f22843906f2684 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Sun, 27 Apr 2014 23:34:27 -0700
Subject: [PATCH] cli: a fix for add-on options after -- (don't pass the --
 through)

---
 hledger/Hledger/Cli/Main.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/hledger/Hledger/Cli/Main.hs b/hledger/Hledger/Cli/Main.hs
index 75327ce25..f3896eac4 100644
--- a/hledger/Hledger/Cli/Main.hs
+++ b/hledger/Hledger/Cli/Main.hs
@@ -265,7 +265,7 @@ main = do
 
       -- an external command
       | isExternalCommand = do
-          let shellcmd = printf "%s-%s %s" progname cmd (unwords' argsaftercmd) :: String
+          let shellcmd = printf "%s-%s %s" progname cmd (unwords' $ filter (not.(=="--")) argsaftercmd) :: String
           dbgM "external command selected" cmd
           dbgM "external command arguments" (map quoteIfNeeded argsaftercmd)
           dbgM "running shell command" shellcmd