From feecf012080612cff582401a512d9b3a2861808e Mon Sep 17 00:00:00 2001
From: Ivo Hinkelmann <ihi@openoffice.org>
Date: Thu, 17 Jul 2008 12:37:42 +0000
Subject: INTEGRATION: CWS ause095 (1.5.30); FILE MERGED 2008/07/15 16:36:07
 hjs 1.5.30.1: #i90789# - survive empty patch files

---
 solenv/bin/patch_sanitizer.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/solenv/bin/patch_sanitizer.pl b/solenv/bin/patch_sanitizer.pl
index d08699c1c0b0..d7297f772497 100755
--- a/solenv/bin/patch_sanitizer.pl
+++ b/solenv/bin/patch_sanitizer.pl
@@ -11,7 +11,7 @@ eval 'exec perl -wS $0 ${1+"$@"}'
 #
 # $RCSfile: patch_sanitizer.pl,v $
 #
-# $Revision: 1.5 $
+# $Revision: 1.6 $
 #
 # This file is part of OpenOffice.org.
 #
@@ -92,6 +92,7 @@ sub parse_patch {
     open PATCHFILE, "< $patchfile" or die "Cannot open file $patchfile $!";
     my @patchfile = <PATCHFILE>;
     close PATCHFILE;
+    return %hunks if ( $#patchfile == -1 );
     if ( $patchfile[0] =~ /^---/ ) {
         $patchtype = "unified";
         $pfirst = '^--- [^\*]*$';
-- 
cgit v1.2.3