From: Martin Mares <mj@ucw.cz>
Date: Wed, 26 Dec 2012 13:46:20 +0000 (+0100)
Subject: Gallery2: Clean up remnants of archiving
X-Git-Url: http://mj.ucw.cz/gitweb/?a=commitdiff_plain;h=f9921003cf92c6e31af784bdf0e3f0e42d6fc25d;p=gallery.git

Gallery2: Clean up remnants of archiving
---

diff --git a/gal2/UCW/Gallery/Web.pm b/gal2/UCW/Gallery/Web.pm
index 2d6de1d..d2a718a 100644
--- a/gal2/UCW/Gallery/Web.pm
+++ b/gal2/UCW/Gallery/Web.pm
@@ -8,26 +8,14 @@ use UCW::CGI;
 use File::Spec;
 
 my $show_img;
-my $send_archive;
 
 my %args = (
 	'i'	=> { 'var' => \$show_img, 'check' => '\d+' },
-	'a'	=> { 'var' => \$send_archive }
 );
 
 our $meta;
 our $num_photos;
 
-sub new() {
-	if ($send_archive && $CF{'AllowArchives'}) {
-		# FIXME?
-		require UCW::Gallery::Archive;
-		return new UCW::Gallery::Archive($send_archive);
-	} else {
-		return bless {};
-	}
-}
-
 sub error($) {
 	print "<p style='color:red'>Bad luck, the script is broken. Sorry.\n<p>$_[0]\n";
 	print "</body></html>\n";