Bläddra i källkod

Correct socket paths

Zachary Kotlarek 13 år sedan
förälder
incheckning
9fa3bccde7
1 ändrade filer med 1 tillägg och 6 borttagningar
  1. 1 6
      serial/cmd.pl

+ 1 - 6
serial/cmd.pl

@@ -14,12 +14,7 @@ my $DATA_DIR = DMX::dataDir();
 
 
 # Command-line parameters
 # Command-line parameters
 my ($DEV, $CMD) = @ARGV;
 my ($DEV, $CMD) = @ARGV;
-my $CMD_FILE = 'UberZach::Integration::' . uc($DEV);
-
-# Sanity check
-if (!-S $CMD_FILE) {
-	die('Invalid command file: ' . $CMD_FILE . "\n");
-}
+my $CMD_FILE = uc($DEV);
 
 
 # Socket init
 # Socket init
 my $sock = DMX::clientSock($CMD_FILE);
 my $sock = DMX::clientSock($CMD_FILE);