[vhffs-dev] [1356] UTF-8 & warning removal

[subversion@xxxxxxxxxxxxx]

Revision: 1356
Author:   beuss
Date:     2009-03-09 13:32:50 +0100 (Mon, 09 Mar 2009)

Log Message:
-----------
UTF-8 & warning removal

Modified Paths:
--------------
    branches/vhffs-design/vhffs-public/allgroups.pl
    branches/vhffs-design/vhffs-public/groupsearch.pl


Modified: branches/vhffs-design/vhffs-public/allgroups.pl
===================================================================
--- branches/vhffs-design/vhffs-public/allgroups.pl	2009-03-09 12:28:36 UTC (rev 1355)
+++ branches/vhffs-design/vhffs-public/allgroups.pl	2009-03-09 12:32:50 UTC (rev 1356)
@@ -48,7 +48,7 @@
 my $letter = $cgi->param('letter');
 my $used_letters = Vhffs::Panel::Group::get_used_letters($vhffs);
 $letter = $used_letters->[0]{letter} unless(defined $letter || !defined $used_letters->[0]{letter});
-undef $letter if( $letter eq 'all');
+undef $letter if( defined $letter && $letter eq 'all');
 
 my $page = $cgi->param('page');
 $page = 1 unless(defined $page && int($page) > 0);

Modified: branches/vhffs-design/vhffs-public/groupsearch.pl
===================================================================
--- branches/vhffs-design/vhffs-public/groupsearch.pl	2009-03-09 12:28:36 UTC (rev 1355)
+++ branches/vhffs-design/vhffs-public/groupsearch.pl	2009-03-09 12:32:50 UTC (rev 1356)
@@ -62,9 +62,9 @@
 # Tags in "does not match" section
 my @excluded_tags_ids = map{ int($_); } $cgi->param('excluded_tags');
 
-my $groupname = $cgi->param('groupname');
+my $groupname = Encode::decode_utf8($cgi->param('groupname'));
 $groupname = '' unless(defined $groupname);		# Direct tag click brings us here without  without groupname ...
-my $description = $cgi->param('description');
+my $description = Encode::decode_utf8($cgi->param('description'));
 $description = '' unless(defined $description);	# ... and without description