From 722082d52bb34d7e32613b879d5a3e4900549dba Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Tue, 30 Jul 2013 16:16:54 -0400
Subject: sometimes the whole themes section doesn't exist (#3)

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

diff --git a/lib/Spreadsheet/ParseXLSX.pm b/lib/Spreadsheet/ParseXLSX.pm
index 7b672fb..6d2f232 100644
--- a/lib/Spreadsheet/ParseXLSX.pm
+++ b/lib/Spreadsheet/ParseXLSX.pm
@@ -240,6 +240,8 @@ sub _parse_themes {
     my $self = shift;
     my ($themes) = @_;
 
+    return {} unless $themes;
+
     my @color = map {
         $_->name eq 'a:sysClr' ? $_->att('lastClr') : $_->att('val')
     } $themes->find_nodes('//a:clrScheme/*/*');
-- 
cgit v1.2.3-54-g00ecf