Francois Gouget : winetest: Prefer 'use warnings' to 'perl -w'.
Alexandre Julliard
julliard at wine.codeweavers.com
Wed Jul 23 13:49:23 CDT 2014
Module: tools
Branch: master
Commit: 346c06bbac8321b06b0a1dc9a9cdc1a0bbd90136
URL: http://source.winehq.org/git/tools.git/?a=commit;h=346c06bbac8321b06b0a1dc9a9cdc1a0bbd90136
Author: Francois Gouget <fgouget at codeweavers.com>
Date: Tue Jul 22 16:07:29 2014 +0200
winetest: Prefer 'use warnings' to 'perl -w'.
---
winetest/build-index | 3 ++-
winetest/dissect | 4 +++-
winetest/gather | 3 ++-
3 files changed, 7 insertions(+), 3 deletions(-)
diff --git a/winetest/build-index b/winetest/build-index
index 186a2de..900b144 100755
--- a/winetest/build-index
+++ b/winetest/build-index
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
#
# Copyright 2008 Alexandre Julliard <julliard at winehq.org>
#
@@ -20,6 +20,7 @@
# WineTest result data.
use strict;
+use warnings;
use open ':utf8';
use CGI qw(:standard);
diff --git a/winetest/dissect b/winetest/dissect
index a243a23..bbd156b 100755
--- a/winetest/dissect
+++ b/winetest/dissect
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
#
# Copyright (C) 2004 Ferenc Wagner
# Copyright (C) 2008 Alexandre Julliard
@@ -32,6 +32,8 @@
# 3 - fatal error, something went utterly wrong
use strict;
+use warnings;
+
use open ':utf8';
use CGI qw(:standard);
charset("utf-8");
diff --git a/winetest/gather b/winetest/gather
index 5023ac6..f469fb1 100755
--- a/winetest/gather
+++ b/winetest/gather
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
#
# Copyright (C) 2004 Ferenc Wagner
#
@@ -31,6 +31,7 @@
# 3 - fatal error, something went utterly wrong
use strict;
+use warnings;
use CGI qw(:standard);
charset("utf-8");
More information about the wine-cvs
mailing list