From a774ea73e41310360af39eb6e77db6f1164b53fd Mon Sep 17 00:00:00 2001
From: Ralph Castain <rhc@open-mpi.org>
Date: Mon, 27 Feb 2017 06:02:54 -0800
Subject: [PATCH] Skip empty files to avoid infinite loop

Signed-off-by: Ralph Castain <rhc@open-mpi.org>
---
 contrib/purge-trailing-blank-lines.pl | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/contrib/purge-trailing-blank-lines.pl b/contrib/purge-trailing-blank-lines.pl
index 827e366673..3c7570f5df 100755
--- a/contrib/purge-trailing-blank-lines.pl
+++ b/contrib/purge-trailing-blank-lines.pl
@@ -72,6 +72,12 @@ my $fh;
 # Examine each of the files and remove trailing blank lines
 foreach my $f (@files) {
     quiet_print "==> Working file: $f\n";
+    # check file size
+    my $filesize = -s $f;
+    if (0 == $filesize) {
+        next;
+    }
+
     open $fh, "+<$f" or die "$!";
 
     binmode $fh; # Just in case