Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

This debug option didn't really do much

  • Loading branch information...
commit 3f1e03db79034af0effda93401e84e0b107c7890 1 parent a4c9cbe
Jonathan Steinert authored
Showing with 0 additions and 7 deletions.
  1. +0 −7 ddlockd
View
7 ddlockd
@@ -22,9 +22,6 @@ use Danga::Socket;
use IO::Socket::INET;
use POSIX ();
-use vars qw($DEBUG);
-$DEBUG = 0;
-
my (
$daemonize,
$nokeepalive,
@@ -37,7 +34,6 @@ my $lock_type = "internal";
Getopt::Long::GetOptions(
'd|daemon' => \$daemonize,
'p|port=i' => \$conf_port,
- 'debug=i' => \$DEBUG,
'n|no-keepalive' => \$nokeepalive,
't|type=s' => \$lock_type,
'h|hostname=s' => \$hostname,
@@ -96,9 +92,6 @@ my $accept_handler = sub {
my $csock = $server->accept();
return unless $csock;
- printf("Listen child making a Client for %d.\n", fileno($csock))
- if $DEBUG;
-
IO::Handle::blocking($csock, 0);
setsockopt($csock, IPPROTO_TCP, TCP_NODELAY, pack("l", 1)) or die;
Please sign in to comment.
Something went wrong with that request. Please try again.