From db118f881d359a136f427e1c64be15f8a709b5dc Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Tue, 16 Jul 2013 16:54:30 -0400
Subject: grumble grumble

---
 lib/Spreadsheet/ParseXLSX.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/Spreadsheet/ParseXLSX.pm b/lib/Spreadsheet/ParseXLSX.pm
index ac76800..263de2c 100644
--- a/lib/Spreadsheet/ParseXLSX.pm
+++ b/lib/Spreadsheet/ParseXLSX.pm
@@ -47,6 +47,7 @@ sub parse {
 
     my $zip = Archive::Zip->new;
     if (openhandle($file)) {
+        bless $file, 'IO::File' if ref($file) eq 'GLOB'; # sigh
         $zip->readFromFileHandle($file) == Archive::Zip::AZ_OK
             or die "Can't open filehandle as a zip file";
     }
-- 
cgit v1.2.3-54-g00ecf