1 files changed, 6 insertions, 5 deletions
diff --git a/test/TestUtils.hs b/test/TestUtils.hs
index 478d923..bcb147c 100644
--- a/test/TestUtils.hs
+++ b/test/TestUtils.hs
@@ -12,8 +12,9 @@ initialConfig = Config {
     configShowHelp = False
 }
 
-runLContext :: LContext a -> IO a
-runLContext lc = do res <- runExceptT $ runReaderT lc initialConfig
-                    case res of
-                        Left (LException err) -> error err
-                        Right val -> return val
+runL :: LContext a -> IO a
+runL lc = do res <- runExceptT $ runReaderT lc initialConfig
+             case res of
+                Left (LException err) -> error err
+                Right val -> return val
+