From d228e8c984d1e6a85dfc5304d248353e46cb6638 Mon Sep 17 00:00:00 2001
From: Mahdi Dibaiee <mdibaiee@aol.com>
Date: Tue, 25 Apr 2017 11:36:02 +0430
Subject: [PATCH] fix: ignore empty strings in semicolon

---
 src/System/Serverman/Utils.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/System/Serverman/Utils.hs b/src/System/Serverman/Utils.hs
index a39cbf5..9bd2dd7 100644
--- a/src/System/Serverman/Utils.hs
+++ b/src/System/Serverman/Utils.hs
@@ -181,6 +181,7 @@ module System.Serverman.Utils ( App (..)
 
   -- add a semicolon to end of each line in string
   semicolon :: String -> String
+  semicolon [] = []
   semicolon text = unlines $ map (++ ";") (lines text)
 
   -- create a block with the following format: `<name> {\n<content>\n}`