Check for /vagrant dir rather than hostname

it's simpler and doesn't rely on an ambiguous hostname
metacpan · Jun 5, 2014 · a3176ce · a3176ce
1 parent 0290638
commit a3176ce
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/bin/daemon-control.pl b/bin/daemon-control.pl
@@ -7,7 +7,6 @@
 
 use Daemon::Control;
 use File::Path 2.06 (); # core
-use Sys::Hostname qw( hostname );
 
 my $name    = 'metacpan-www';
 my $user    = 'metacpan';
@@ -20,7 +19,8 @@
 my $carton  = '/usr/local/perlbrew/perls/perl-5.16.2/bin/carton';
 my $workers = 7;
 
-if ( hostname() eq 'debian' ) {
+# If running in the development vm change the user to avoid permission problems.
+if ( -d '/vagrant' ) {
     $user    = 'vagrant';
     $workers = 3;
 }