From: Martin Mares Date: Wed, 26 Dec 2012 19:05:58 +0000 (+0100) Subject: Old gallery: Follow changes in UCW::CGI X-Git-Url: http://mj.ucw.cz/gitweb/?a=commitdiff_plain;h=432cb9d3eeed72411491b1ff01a74cfcc4e73527;p=gallery.git Old gallery: Follow changes in UCW::CGI --- diff --git a/gal/Gallery/Web.pm b/gal/Gallery/Web.pm index 03b8d7a..1a1bca2 100644 --- a/gal/Gallery/Web.pm +++ b/gal/Gallery/Web.pm @@ -5,6 +5,7 @@ package Gallery::Web; import Gallery qw(%CF); use UCW::CGI; +use UCW::CGI::ErrorHandler; my $show_img; my $send_archive; @@ -76,7 +77,7 @@ $CF{"HeadExtras"} $CF{"TopExtras"} EOF - $UCW::CGI::error_hook = \&error; + $UCW::CGI::ErrorHandler::error_hook = \&error; load_notes(); if ($show_img ne "" && $show_img > 0 && $show_img <= $#images) { show_links(($show_img > 1 ? ("?i=".($show_img-1)) : ""),