[vhffs-dev] [1095] Removed useless Encode:: decode_utf8 because this is now managed by DBI::Pg

[subversion@xxxxxxxxxxxxx]

Revision: 1095
Author:   gradator
Date:     2007-11-26 20:11:32 +0000 (Mon, 26 Nov 2007)

Log Message:
-----------
Removed useless Encode::decode_utf8 because this is now managed by DBI::Pg

Modified Paths:
--------------
    trunk/vhffs-api/src/Vhffs/Group.pm
    trunk/vhffs-api/src/Vhffs/Mailings.pm
    trunk/vhffs-api/src/Vhffs/Object.pm
    trunk/vhffs-api/src/Vhffs/Panel/User.pm
    trunk/vhffs-api/src/Vhffs/Robots/Mailing.pm
    trunk/vhffs-api/src/Vhffs/Services/MailingList.pm


Modified: trunk/vhffs-api/src/Vhffs/Group.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Group.pm	2007-11-24 09:28:06 UTC (rev 1094)
+++ trunk/vhffs-api/src/Vhffs/Group.pm	2007-11-26 20:11:32 UTC (rev 1095)
@@ -615,7 +615,7 @@
 
 	$self->{gid} = $gid;
 	$self->{groupname} = $groupname;
-	$self->{realname} = Encode::decode_utf8( $realname );
+	$self->{realname} = $realname;
 	$self->{passwd} = $passwd;
 	$self->{quota} = $quota;
 	$self->{quota_used} = $quota_used;

Modified: trunk/vhffs-api/src/Vhffs/Mailings.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Mailings.pm	2007-11-24 09:28:06 UTC (rev 1094)
+++ trunk/vhffs-api/src/Vhffs/Mailings.pm	2007-11-26 20:11:32 UTC (rev 1095)
@@ -75,11 +75,6 @@
 	$request->execute( @params ) or return undef;
     
 	my $rows = $request->fetchall_hashref( 'id_mailing' );
-	foreach( keys(%{$rows}) ) {
-		$rows->{$_}->{'message'} = Encode::decode_utf8( $rows->{$_}->{'message'} );
-		$rows->{$_}->{'subject'} = Encode::decode_utf8( $rows->{$_}->{'subject'} );
-	}
-
 	return $rows;
 }
 
@@ -112,8 +107,6 @@
 	$request->execute( $id ) or return -2;
 
 	my $row = $request->fetchrow_hashref();
-	$row->{'message'} = Encode::decode_utf8( $row->{'message'} );
-	$row->{'subject'} = Encode::decode_utf8( $row->{'subject'} );
 	return $row;
 }
 

Modified: trunk/vhffs-api/src/Vhffs/Object.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Object.pm	2007-11-24 09:28:06 UTC (rev 1094)
+++ trunk/vhffs-api/src/Vhffs/Object.pm	2007-11-26 20:11:32 UTC (rev 1095)
@@ -103,8 +103,8 @@
     $self->{owner_uid} = $owner_uid;
     $self->{owner_gid} = $owner_gid;
     $self->{date_creation} = $date_creation;
-    $self->{description} = Encode::decode_utf8( $description );
-    $self->{refuse_reason} = Encode::decode_utf8( $refuse_reason );
+    $self->{description} = $description;
+    $self->{refuse_reason} = $refuse_reason;
     $self->{state} = $state;
     $self->{type} = $type;
     

Modified: trunk/vhffs-api/src/Vhffs/Panel/User.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/User.pm	2007-11-24 09:28:06 UTC (rev 1094)
+++ trunk/vhffs-api/src/Vhffs/Panel/User.pm	2007-11-26 20:11:32 UTC (rev 1095)
@@ -113,8 +113,8 @@
 
     while(my $u = $sth->fetchrow_hashref('NAME_lc')) {
         $u->{state} = Vhffs::Functions::status_string_from_status_id($u->{state});
-        $u->{firstname} = Encode::decode_utf8( $u->{firstname} );
-        $u->{lastname} = Encode::decode_utf8( $u->{lastname} );
+        $u->{firstname} = $u->{firstname};
+        $u->{lastname} = $u->{lastname};
         push(@$users, $u);
     }
     return $users;

Modified: trunk/vhffs-api/src/Vhffs/Robots/Mailing.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Robots/Mailing.pm	2007-11-24 09:28:06 UTC (rev 1094)
+++ trunk/vhffs-api/src/Vhffs/Robots/Mailing.pm	2007-11-26 20:11:32 UTC (rev 1095)
@@ -46,10 +46,6 @@
 	return undef if ( $request->execute() <= 0 );
 
 	my $rows = $request->fetchall_hashref('id_mailing');
-	foreach( keys(%{$rows}) ) {
-		$rows->{$_}->{'message'} = Encode::decode_utf8( $rows->{$_}->{'message'} );
-		$rows->{$_}->{'subject'} = Encode::decode_utf8( $rows->{$_}->{'subject'} );
-	}
 	return $rows;
 }
 

Modified: trunk/vhffs-api/src/Vhffs/Services/MailingList.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/MailingList.pm	2007-11-24 09:28:06 UTC (rev 1094)
+++ trunk/vhffs-api/src/Vhffs/Services/MailingList.pm	2007-11-26 20:11:32 UTC (rev 1095)
@@ -180,12 +180,12 @@
     $self->{ml_id} = $ml_id;
     $self->{local_part} = $local_part;
     $self->{domain} = $domain,
-    $self->{prefix} = Encode::decode_utf8( $prefix );
+    $self->{prefix} = $prefix;
     $self->{open_archive} = $open_archive;
     $self->{reply_to} = $reply_to;
     $self->{sub_ctrl} = $sub_ctrl;
     $self->{post_ctrl} = $post_ctrl;
-    $self->{signature} = Encode::decode_utf8( $signature );
+    $self->{signature} = $signature;
     $self->{subs} = $subs;
 
     return $self;