From 79c549108a9c1d9d081ceca5369a6f92dd54eebf Mon Sep 17 00:00:00 2001
From: Josh Yelon <jyelon@gmail.com>
Date: Wed, 27 Jun 2007 22:26:06 +0000
Subject: [PATCH] Removed explicit (incorrect) perl path

---
 direct/src/leveleditor/copyfiles.pl | 2 +-
 pandatool/src/scripts/binreplace.pl | 2 +-
 pandatool/src/scripts/cvlog.pl      | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/direct/src/leveleditor/copyfiles.pl b/direct/src/leveleditor/copyfiles.pl
index 7023cf7b7c..ee1a03be49 100755
--- a/direct/src/leveleditor/copyfiles.pl
+++ b/direct/src/leveleditor/copyfiles.pl
@@ -1,4 +1,4 @@
-#!/bin/perl -w
+#!perl -w
 use strict;
 #use File::Copy;
 use File::Basename;
diff --git a/pandatool/src/scripts/binreplace.pl b/pandatool/src/scripts/binreplace.pl
index 25d50121c5..8bae8935c5 100755
--- a/pandatool/src/scripts/binreplace.pl
+++ b/pandatool/src/scripts/binreplace.pl
@@ -1,4 +1,4 @@
-#!/bin/perl
+#!perl
 if($#ARGV<2) {
     print "Usage: perl binreplace.pl [-i] [findstr] [replacestr] [filename]\n";
     exit(1);
diff --git a/pandatool/src/scripts/cvlog.pl b/pandatool/src/scripts/cvlog.pl
index 5b7b2df56d..72f3315a19 100755
--- a/pandatool/src/scripts/cvlog.pl
+++ b/pandatool/src/scripts/cvlog.pl
@@ -1801,7 +1801,7 @@ Note about a bug-slash-opportunity:
 There's a bug in Text::Wrap, which affects cvs2cl.  This script
 reveals it:
 
-  #!/usr/bin/perl -w
+  #!perl -w
   
   use Text::Wrap;