User: sits    
  Date: 06/06/10 00:48:35

  Modified:    bin      install.pl
  Log:
  Use current perl path when generating codestriker.pl file
  
  
  
  Index: install.pl
  ===================================================================
  RCS file: /cvsroot/codestriker/codestriker/bin/install.pl,v
  retrieving revision 1.8
  retrieving revision 1.9
  diff -u -r1.8 -r1.9
  --- install.pl        10 Jun 2006 07:45:30 -0000      1.8
  +++ install.pl        10 Jun 2006 07:48:35 -0000      1.9
  @@ -1030,12 +1030,12 @@
   # For Win32, don't enable tainting mode.  There are weird issues with
   # ActivePerl, and sometimes with IIS as well.  Make sure the Windows Perl
   # path is set correctly, as its location could be anywhere.
  +my $perl = $^X;
   if ($windows) {
  -    my $perl = $^X;
       $perl =~ s/\\/\//g;
       $template_vars->{hash_ex_line} = '#!' . $perl . ' -w';
   } else {
  -    $template_vars->{hash_ex_line} = '#!/usr/bin/perl -wT';
  +    $template_vars->{hash_ex_line} = '#!' . $perl . ' -wT';
   }
   
   $template_vars->{codestriker_lib} = 'use lib \'' . cwd() . '/../lib\';';
  
  
  


_______________________________________________
Codestriker-commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/codestriker-commits

Reply via email to