X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;f=lib%2FUCW%2FGallery%2FWeb.pm;h=78445c6f727b0e6be53c62ed93b9a35693599d14;hb=a39047e64be87ea524044428e961cde559d7f783;hp=ccca477e8007fb11e0ef7cc2918c26c8b7e4b946;hpb=d94da8d601fa080700f1d610089ec5f602d5ee88;p=gallery.git

diff --git a/lib/UCW/Gallery/Web.pm b/lib/UCW/Gallery/Web.pm
index ccca477..78445c6 100644
--- a/lib/UCW/Gallery/Web.pm
+++ b/lib/UCW/Gallery/Web.pm
@@ -3,8 +3,7 @@
 
 package UCW::Gallery::Web;
 
-use strict;
-use warnings;
+use common::sense;
 
 use UCW::Gallery;
 use UCW::CGI;
@@ -52,7 +51,7 @@ sub showing_image($) {
 
 sub html_top($) {
 	my ($self) = @_;
-	my $title = UCW::CGI::html_escape($self->get('Title'));
+	my $title = $self->get('Title');
 	my $hextras = $self->extras('WebHeadExtras');
 	my $theme_hextras = $self->theme_head_extras;
 	print <<EOF ;