From 5d68d556eaa107fc01a67c661f600812a4a64e40 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Wed, 5 Dec 2018 00:03:34 +0000
Subject: Minor tweaks

---
 src/Top.hs | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

(limited to 'src/Top.hs')

diff --git a/src/Top.hs b/src/Top.hs
index c14b56a..8a74ad5 100644
--- a/src/Top.hs
+++ b/src/Top.hs
@@ -21,18 +21,16 @@ dynNetwork p = DynNetwork (p <~> ["-t", "↑ <tx> ↓ <rx>"
                                  , "-L", "20", "-H", "1024000"
                                  , "-m", "5", "-W", "10", "-S", "Off"]) 10
 
-network p = Network "tun0" ["-t", "<dev>:", "-x", ""] 20
-
 config p = (baseConfig p) {
-  position = Static {xpos=1, ypos=1, width=1920, height=24}
+  position = TopSize C 100 defaultHeight
   , textOffset = 16
   , commands = [ Run (topProc p)
                , Run (wireless p)
                , Run (multiCPU p)
                , Run (cpuFreq p)
                , Run (dynNetwork p)
-               , Run (network p)
                , Run XMonadLog
+               , Run (Network "tun0" ["-t", "<dev>:", "-x", ""] 20)
                , Run (DateZone "%H" "en_US" "US/Pacific" "laTime" 10)
                , Run (Date "%R" "datetime" 10)
                ]
-- 
cgit v1.2.3