From 99285c97f6d643e078428c0542c9d736d25d990b Mon Sep 17 00:00:00 2001
From: krasimir <krasimir@chalmers.se>
Date: Thu, 14 May 2009 20:12:41 +0000
Subject: [PATCH] added command rgl-none in Setup.hs

---
 Setup.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Setup.hs b/Setup.hs
index e08ce7479..512a245c5 100644
--- a/Setup.hs
+++ b/Setup.hs
@@ -68,6 +68,8 @@ rglCommands =
        return ()
   , RGLCommand "parse"   False $ \mode args pkg lbi -> do
        mapM_ (gfc mode pkg lbi . parse) (optl langsParse args)
+  , RGLCommand "none"    False $ \mode args pkg lbi -> do
+       return ()
   ]
   where
     optl ls args = fromMaybe ls $ getOptLangs args