Add two periods at the end of info messages.

diff --git a/src/Unix.hs b/src/Unix.hs
index 17e3960104b75ca88f1d34ab93fe3119a9894574..f26263a42cca9de9c9894cdc465116d96c6da506 100644 (file)
--- a/src/Unix.hs
+++ b/src/Unix.hs
@@ -92,10 +92,10 @@ create_pid_directory :: FilePath -- ^ The directory to contain the PID file.
 create_pid_directory pid_directory uid gid = do
   it_exists <- doesDirectoryExist pid_directory
   unless it_exists $ do
-    report_info $ "Creating PID directory " ++ pid_directory
+    report_info $ "Creating PID directory " ++ pid_directory ++ "."
     createDirectory pid_directory
     report_info $ "Changing owner/group of " ++ pid_directory ++
-                    " to " ++ (show uid) ++ "/" ++ (show gid)
+                    " to " ++ (show uid) ++ "/" ++ (show gid) ++ "."
     setOwnerAndGroup pid_directory uid gid
 
 -- | Write a PID file, install a SIGTERM handler, drop privileges, and