From 3b5fb27f914bedbf06d95b57be34a9ab7e706b88 Mon Sep 17 00:00:00 2001
From: Francois Gouget <fgouget@free.fr>
Date: Fri, 20 Sep 2013 11:49:34 +0200
Subject: [PATCH] winapi: Small tweaks to fix perl warnings.

perl says defined(@array) is deprecated.
---
 tools/winapi/options.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/tools/winapi/options.pm b/tools/winapi/options.pm
index 749b9b74d0f..3daeb1144ff 100644
--- a/tools/winapi/options.pm
+++ b/tools/winapi/options.pm
@@ -414,7 +414,7 @@ sub c_files($) {
 
     my $c_files = \@{$self->{_C_FILES}};
 
-    if(!defined(@$c_files)) {
+    if(!@$c_files) {
 	$self->parse_files;
     }
 
@@ -426,7 +426,7 @@ sub h_files($) {
 
     my $h_files = \@{$self->{_H_FILES}};
 
-    if(!defined(@$h_files)) {
+    if(!@$h_files) {
 	$self->parse_files;
     }
 
@@ -438,7 +438,7 @@ sub directories($) {
 
     my $directories = \@{$self->{_DIRECTORIES}};
 
-    if(!defined(@$directories)) {
+    if(!@$directories) {
 	$self->parse_files;
     }