X-Git-Url: http://git.openwrt.org/?p=openwrt%2Fopenwrt.git;a=blobdiff_plain;f=scripts%2Fcleanpatch;h=ab5ebddded201747ad9b2bc416e523c46610f894;hp=9680d03ad2b8e5dfb23b45079999382abba3fe85;hb=38cc071ed148417ccb19dc9a9d506530e88ca139;hpb=957c2576cc66049a14a549b3652cb2fd54062dd7

diff --git a/scripts/cleanpatch b/scripts/cleanpatch
index 9680d03ad2..ab5ebddded 100755
--- a/scripts/cleanpatch
+++ b/scripts/cleanpatch
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl 
 #
 # Clean a patch file -- or directory of patch files -- of stealth whitespace.
 # WARNING: this can be a highly destructive operation.  Use with caution.
@@ -6,6 +6,7 @@
 
 use bytes;
 use File::Basename;
+use warnings;
 
 # Default options
 $max_width = 79;