From b0174268129580cb11ec997727b47a31b30ef616 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Sat, 18 Jun 2016 08:53:59 -0700
Subject: [PATCH] ui: use same filter style for depth limit

---
 hledger-ui/Hledger/UI/UIUtils.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/hledger-ui/Hledger/UI/UIUtils.hs b/hledger-ui/Hledger/UI/UIUtils.hs
index 0ad2b1012..324ba0948 100644
--- a/hledger-ui/Hledger/UI/UIUtils.hs
+++ b/hledger-ui/Hledger/UI/UIUtils.hs
@@ -91,7 +91,7 @@ borderQueryStr qry = str " matching " <+> withAttr (borderAttr <> "query") (str
 
 borderDepthStr :: Maybe Int -> Widget
 borderDepthStr Nothing  = str ""
-borderDepthStr (Just d) = str " to " <+> withAttr (borderAttr <> "depth") (str $ "depth "++show d)
+borderDepthStr (Just d) = str " to " <+> withAttr (borderAttr <> "query") (str $ "depth "++show d)
 
 borderKeysStr :: [(String,String)] -> Widget
 borderKeysStr keydescs =