From 4d4213405d3a3fcfc1a84920cba9fe5a2b2b1d2a Mon Sep 17 00:00:00 2001
From: Adam Vogt <vogt.adam@gmail.com>
Date: Sat, 28 Apr 2012 21:40:48 +0200
Subject: Remove trailing whitespace.

Ignore-this: d61584110954e84d3611ef3497a29725

darcs-hash:20120428194048-1499c-b4fab8db7cd56d5ca8496e1d3c9c2147a985cf55.gz
---
 XMonad/Layout/OnHost.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'XMonad/Layout')

diff --git a/XMonad/Layout/OnHost.hs b/XMonad/Layout/OnHost.hs
index e14a24c..f69bbb3 100644
--- a/XMonad/Layout/OnHost.hs
+++ b/XMonad/Layout/OnHost.hs
@@ -116,7 +116,7 @@ data OnHost l1 l2 a = OnHost [String]
 instance (LayoutClass l1 a, LayoutClass l2 a, Show a) => LayoutClass (OnHost l1 l2) a where
     runLayout (W.Workspace i p@(OnHost hosts _ lt lf) ms) r = do
       h <- io $ getEnv "HOST"
-      if maybe False (`elemFQDN` hosts) h 
+      if maybe False (`elemFQDN` hosts) h
         then do (wrs, mlt') <- runLayout (W.Workspace i lt ms) r
                 return (wrs, Just $ mkNewOnHostT p mlt')
         else do (wrs, mlt') <- runLayout (W.Workspace i lf ms) r
-- 
cgit v1.2.3