summaryrefslogtreecommitdiffhomepage
path: root/Config.hs
diff options
context:
space:
mode:
authorAndrea Rossato <andrea.rossato@ing.unitn.it>2007-07-08 12:14:30 +0200
committerAndrea Rossato <andrea.rossato@ing.unitn.it>2007-07-08 12:14:30 +0200
commitf21e573cd3f73796f3e8a826cabb37269e97a111 (patch)
treeaf0ce6db8ae9df348d705d51d300f4cb090ecf2e /Config.hs
parenta1aed9cc40bd0a4752516b45fc65beded847c0f5 (diff)
downloadxmobar-f21e573cd3f73796f3e8a826cabb37269e97a111.tar.gz
xmobar-f21e573cd3f73796f3e8a826cabb37269e97a111.tar.bz2
updated configurations to reflect code changes
darcs-hash:20070708101430-d6583-f58cc8c24166a2619b7712229da8e8343a8a4ea5.gz
Diffstat (limited to 'Config.hs')
-rw-r--r--Config.hs18
1 files changed, 9 insertions, 9 deletions
diff --git a/Config.hs b/Config.hs
index 60ca3b0..1ab01c9 100644
--- a/Config.hs
+++ b/Config.hs
@@ -18,6 +18,7 @@ module Config ( -- * Configuration
, defaultConfig
) where
+import Commands
-- $config
-- Configuration data type and default configuration
@@ -32,12 +33,12 @@ data Config =
, height :: Int -- ^ Window height
, align :: String -- ^ text alignment
, refresh :: Int -- ^ Refresh rate in tenth of seconds
- , commands :: [(String, Int, [String])] -- ^ For setting the refresh rate and
- -- options for the programs to run (optional)
- , sepChar :: String -- ^ The character to be used for indicating
- -- commands in the output template (default '%')
- , template :: String -- ^ The output template
- } deriving (Eq, Show, Read, Ord)
+ , commands :: [(Command,Int)] -- ^ For setting the command, the command argujments
+ -- and refresh rate for the programs to run (optional)
+ , sepChar :: String -- ^ The character to be used for indicating
+ -- commands in the output template (default '%')
+ , template :: String -- ^ The output template
+ } deriving (Read)
-- | The default configuration values
defaultConfig :: Config
@@ -51,8 +52,7 @@ defaultConfig =
, height = 15
, align = "left"
, refresh = 10
- , commands = [("date", 10, [])]
+ , commands = [(Memory [],10)]
, sepChar = "%"
- , template = "Uptime: <fc=#00FF00>%uptime%</fc> ** <fc=#FF0000>%date%</fc>"
+ , template = "Uptime: <fc=#00FF00>%uptime%</fc> ** <fc=#FF0000>%date%</fc> %memory%"
}
-