Spell MSWin32 properly
Andrew Rodland [Thu, 27 Nov 2014 07:36:56 +0000 (02:36 -0500)]
lib/FCGI/ProcManager.pm

index efaa9e5..8e217b1 100644 (file)
@@ -145,7 +145,7 @@ sub new {
   $this->{PIDS} = {};
 
   # initialize signal constructions.
-  unless ($this->no_signals() or $^O eq 'Win32') {
+  unless ($this->no_signals() or $^O eq 'MSWin32') {
     $this->{sigaction_no_sa_restart} =
     POSIX::SigAction->new('FCGI::ProcManager::sig_sub');
     $this->{sigaction_sa_restart} =
@@ -158,7 +158,7 @@ sub new {
 sub _set_signal_handler {
   my ($this, $signal, $restart);
 
-  if ($^O eq 'Win32') {
+  if ($^O eq 'MSWin32') {
     $SIG{$signal} = 'FCGI::ProcManager::sig_sub';
   } else {
     no strict 'refs';