diff options
| author | Tony Morris <tmorris@tmorris.net> | 2014-08-29 08:44:17 +1000 |
|---|---|---|
| committer | Tony Morris <tmorris@tmorris.net> | 2014-08-29 08:44:17 +1000 |
| commit | 4fc5b8a1b5998dff4717478b6772878c1ed2de7f (patch) | |
| tree | 2b81c255e5f9e109a1e5bc937681659382c1d095 /src/Plugins/Monitors/Net.hs | |
| parent | bbaf4e5800e6f5dea7ff3e09f260a94b5d432091 (diff) | |
| download | xmobar-4fc5b8a1b5998dff4717478b6772878c1ed2de7f.tar.gz xmobar-4fc5b8a1b5998dff4717478b6772878c1ed2de7f.tar.bz2 | |
hlint improvements
Diffstat (limited to 'src/Plugins/Monitors/Net.hs')
| -rw-r--r-- | src/Plugins/Monitors/Net.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Plugins/Monitors/Net.hs b/src/Plugins/Monitors/Net.hs index 39bdd61..51c760c 100644 --- a/src/Plugins/Monitors/Net.hs +++ b/src/Plugins/Monitors/Net.hs @@ -51,8 +51,8 @@ instance Ord NetDev where compare NA _ = LT compare _ NA = GT compare (NI _) (NI _) = EQ - compare (NI _) (ND _ _ _) = LT - compare (ND _ _ _) (NI _) = GT + compare (NI _) (ND {}) = LT + compare (ND {}) (NI _) = GT compare (ND _ x1 y1) (ND _ x2 y2) = if downcmp /= EQ then downcmp |