From d5e1e044950531caaad11220362b75269c01b0ab Mon Sep 17 00:00:00 2001
From: hjp <hjp@d47eeb7a-11fe-0310-b519-e5a4e12f9765>
Date: Tue, 26 Nov 2013 21:50:11 +0000
Subject: [PATCH] Check for gzipped files, too.

---
 scripts/simba_export | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/scripts/simba_export b/scripts/simba_export
index 3b854cc..88a33c5 100644
--- a/scripts/simba_export
+++ b/scripts/simba_export
@@ -15,7 +15,8 @@ my $dbh = $ca->{dbh};
 
 my $sessions = $dbh->selectcol_arrayref("select id from sessions order by id");
 for my $session_id (@$sessions) {
-    next if (-f "$basedir/$session_id.tsv");
+    next if (-f "$basedir/$session_id.tsv"
+          || -f "$basedir/$session_id.tsv.gz");
     $ca->log(3, "exporting session $session_id");
     my $sth
 	= $dbh->prepare(