Adjust error messages in case of failure.

[people/stevee/guardian.git] / modules / Socket.pm

diff --git a/modules/Socket.pm b/modules/Socket.pm
index 5e5a9982e86cfff87603117591588713e7e12dd1..3b758dc4b780258965d261fb2a66786f84614d21 100644 (file)
--- a/modules/Socket.pm
+++ b/modules/Socket.pm
@@ -33,13 +33,13 @@ sub Server () {
        # If the path for the socketfile does not exist, try to
        # create it.
        unless (-d "$socketpath") {
-               mkdir("$socketpath") or die "Could not create $socketpath: $!\n";
+               mkdir("$socketpath") or die "Could not create $socketpath: $!";
        }
 
        # Delete an existing socket file.
        if (-e "$socketfile") {
                unlink $socketfile
-               or die "Could not release existing socket file: $!\n";
+               or die "Could not release existing socket file: $!";
        }
 
        # Create a new UNIX socket.
@@ -47,7 +47,7 @@ sub Server () {
                Local => $socketfile,
                Listen => SOMAXCONN,
                Type => SOCK_STREAM,
-       ) or die "Could not create socket: $!\n";
+       ) or die "Could not create socket: $!";
 
        # Return the server object.
        return $server;