| [vhffs-dev] [1015] Added use strict; use utf8; everywhere, fixed most UTF-8 problems on panel |
[ Thread Index |
Date Index
| More vhffs.org/vhffs-dev Archives
]
Revision: 1015
Author: gradator
Date: 2007-10-22 12:58:47 +0000 (Mon, 22 Oct 2007)
Log Message:
-----------
Added use strict; use utf8; everywhere, fixed most UTF-8 problems on panel
Modified Paths:
--------------
trunk/vhffs-api/src/Vhffs/Acl.pm
trunk/vhffs-api/src/Vhffs/Conf.pm
trunk/vhffs-api/src/Vhffs/Constants.pm
trunk/vhffs-api/src/Vhffs/Debug.pm
trunk/vhffs-api/src/Vhffs/Functions.pm
trunk/vhffs-api/src/Vhffs/Group.pm
trunk/vhffs-api/src/Vhffs/Intl.pm
trunk/vhffs-api/src/Vhffs/Listengine.pm
trunk/vhffs-api/src/Vhffs/Main.pm
trunk/vhffs-api/src/Vhffs/Object.pm
trunk/vhffs-api/src/Vhffs/ObjectFactory.pm
trunk/vhffs-api/src/Vhffs/Panel/Admin.pm
trunk/vhffs-api/src/Vhffs/Panel/Avatar.pm
trunk/vhffs-api/src/Vhffs/Panel/Commons.pm
trunk/vhffs-api/src/Vhffs/Panel/Cvs.pm
trunk/vhffs-api/src/Vhffs/Panel/DNS.pm
trunk/vhffs-api/src/Vhffs/Panel/Git.pm
trunk/vhffs-api/src/Vhffs/Panel/Group.pm
trunk/vhffs-api/src/Vhffs/Panel/Mail.pm
trunk/vhffs-api/src/Vhffs/Panel/MailingList.pm
trunk/vhffs-api/src/Vhffs/Panel/Menu.pm
trunk/vhffs-api/src/Vhffs/Panel/Mysql.pm
trunk/vhffs-api/src/Vhffs/Panel/Object.pm
trunk/vhffs-api/src/Vhffs/Panel/Pgsql.pm
trunk/vhffs-api/src/Vhffs/Panel/Repository.pm
trunk/vhffs-api/src/Vhffs/Panel/Svn.pm
trunk/vhffs-api/src/Vhffs/Panel/Template.pm
trunk/vhffs-api/src/Vhffs/Panel/User.pm
trunk/vhffs-api/src/Vhffs/Panel/Web.pm
trunk/vhffs-api/src/Vhffs/Robots/Cvs.pm
trunk/vhffs-api/src/Vhffs/Robots/Git.pm
trunk/vhffs-api/src/Vhffs/Robots/Group.pm
trunk/vhffs-api/src/Vhffs/Robots/Mail.pm
trunk/vhffs-api/src/Vhffs/Robots/Mailing.pm
trunk/vhffs-api/src/Vhffs/Robots/Mysql.pm
trunk/vhffs-api/src/Vhffs/Robots/Pgsql.pm
trunk/vhffs-api/src/Vhffs/Robots/Repository.pm
trunk/vhffs-api/src/Vhffs/Robots/Svn.pm
trunk/vhffs-api/src/Vhffs/Robots/User.pm
trunk/vhffs-api/src/Vhffs/Robots/Web.pm
trunk/vhffs-api/src/Vhffs/Robots.pm
trunk/vhffs-api/src/Vhffs/Services/Cvs.pm
trunk/vhffs-api/src/Vhffs/Services/DNS.pm
trunk/vhffs-api/src/Vhffs/Services/Git.pm
trunk/vhffs-api/src/Vhffs/Services/Mail.pm
trunk/vhffs-api/src/Vhffs/Services/MailGroup.pm
trunk/vhffs-api/src/Vhffs/Services/MailUser.pm
trunk/vhffs-api/src/Vhffs/Services/MailingList.pm
trunk/vhffs-api/src/Vhffs/Services/Mysql.pm
trunk/vhffs-api/src/Vhffs/Services/Pgsql.pm
trunk/vhffs-api/src/Vhffs/Services/Repository.pm
trunk/vhffs-api/src/Vhffs/Services/Svn.pm
trunk/vhffs-api/src/Vhffs/Services/Web.pm
trunk/vhffs-api/src/Vhffs/Services.pm
trunk/vhffs-api/src/Vhffs/Stats.pm
trunk/vhffs-api/src/Vhffs/User.pm
trunk/vhffs-api/src/examples/create_dir.pl
trunk/vhffs-api/src/examples/hash_webdir.pl
trunk/vhffs-api/src/examples/hashdomain.pl
trunk/vhffs-api/src/examples/hashhome_example.pl
trunk/vhffs-api/src/examples/hashpopuser.pl
trunk/vhffs-api/src/examples/list_themes.pl
trunk/vhffs-api/src/examples/perm_for_user.pl
trunk/vhffs-api/src/examples/show_mail_conf.pl
trunk/vhffs-api/src/examples/stats.pl
trunk/vhffs-backend/src/mirror/mx1-mirror.pl
trunk/vhffs-backend/src/mirror/mx2-mirror.pl
trunk/vhffs-backend/src/mirror/mydns-mirror.pl
trunk/vhffs-backend/src/mirror/nss-mirror.pl
trunk/vhffs-compat/updatedb.pl
trunk/vhffs-intl/extra_strings.pl
trunk/vhffs-irc/modobot.pl
trunk/vhffs-listengine/src/listengine.pl
trunk/vhffs-panel/ajax/help.pl
trunk/vhffs-panel/getavatar.pl
trunk/vhffs-panel/show_code.pl
trunk/vhffs-public/allgroups.pl
trunk/vhffs-public/allwebsites.pl
trunk/vhffs-public/group.pl
trunk/vhffs-public/index.pl
trunk/vhffs-public/lastgroups.pl
trunk/vhffs-public/lastusers.pl
trunk/vhffs-public/rss/lastgroups.pl
trunk/vhffs-public/rss/lastusers.pl
trunk/vhffs-public/user.pl
trunk/vhffs-public/websearch.pl
trunk/vhffs-robots/misc/svn_post-commit.pl
trunk/vhffs-robots/src/cvs_create.pl
trunk/vhffs-robots/src/cvs_delete.pl
trunk/vhffs-robots/src/cvs_fixperms.pl
trunk/vhffs-robots/src/cvs_viewvcconf.pl
trunk/vhffs-robots/src/dns_create.pl
trunk/vhffs-robots/src/dns_delete.pl
trunk/vhffs-robots/src/git_create.pl
trunk/vhffs-robots/src/git_delete.pl
trunk/vhffs-robots/src/git_public.pl
trunk/vhffs-robots/src/group_create.pl
trunk/vhffs-robots/src/group_delete.pl
trunk/vhffs-robots/src/group_getquota.pl
trunk/vhffs-robots/src/group_setquota.pl
trunk/vhffs-robots/src/listengine_publicarchives.pl
trunk/vhffs-robots/src/mail_create.pl
trunk/vhffs-robots/src/mail_createboxes.pl
trunk/vhffs-robots/src/mail_delete.pl
trunk/vhffs-robots/src/mail_deleteboxes.pl
trunk/vhffs-robots/src/mailing.pl
trunk/vhffs-robots/src/mailinglist_create.pl
trunk/vhffs-robots/src/mailinglist_delete.pl
trunk/vhffs-robots/src/mysql_create.pl
trunk/vhffs-robots/src/mysql_delete.pl
trunk/vhffs-robots/src/mysql_dump.pl
trunk/vhffs-robots/src/mysql_modify.pl
trunk/vhffs-robots/src/object_cleanup.pl
trunk/vhffs-robots/src/pgsql_create.pl
trunk/vhffs-robots/src/pgsql_delete.pl
trunk/vhffs-robots/src/pgsql_dump.pl
trunk/vhffs-robots/src/pgsql_modify.pl
trunk/vhffs-robots/src/repository_create.pl
trunk/vhffs-robots/src/repository_delete.pl
trunk/vhffs-robots/src/repository_getquota.pl
trunk/vhffs-robots/src/repository_setquota.pl
trunk/vhffs-robots/src/repository_stats.pl
trunk/vhffs-robots/src/svn_create.pl
trunk/vhffs-robots/src/svn_delete.pl
trunk/vhffs-robots/src/svn_public.pl
trunk/vhffs-robots/src/svn_viewvcconf.pl
trunk/vhffs-robots/src/svn_websvn.pl
trunk/vhffs-robots/src/user_cleanup.pl
trunk/vhffs-robots/src/user_create.pl
trunk/vhffs-robots/src/user_delete.pl
trunk/vhffs-robots/src/user_getquota.pl
trunk/vhffs-robots/src/user_group.pl
trunk/vhffs-robots/src/user_setquota.pl
trunk/vhffs-robots/src/web_create.pl
trunk/vhffs-robots/src/web_delete.pl
trunk/vhffs-robots/src/web_stats.pl
Modified: trunk/vhffs-api/src/Vhffs/Acl.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Acl.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Acl.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -35,6 +35,7 @@
use Vhffs::Constants;
use strict;
+use utf8;
use diagnostics;
package Vhffs::Acl;
Modified: trunk/vhffs-api/src/Vhffs/Conf.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Conf.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Conf.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -32,6 +32,7 @@
package Vhffs::Conf;
use strict;
+use utf8;
use Config::General;
#Vhffs::Conf written by sod` <dieu AT gunnm DOT org>
Modified: trunk/vhffs-api/src/Vhffs/Constants.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Constants.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Constants.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -1,6 +1,7 @@
package Vhffs::Constants;
use strict;
+use utf8;
use Locale::gettext;
use constant
Modified: trunk/vhffs-api/src/Vhffs/Debug.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Debug.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Debug.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -34,6 +34,7 @@
@EXPORT = qw( debuglog );
use strict;
+use utf8;
use constant
{
Modified: trunk/vhffs-api/src/Vhffs/Functions.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Functions.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Functions.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -44,6 +44,7 @@
@EXPORT = qw( send_mail mail_template);
use strict;
+use utf8;
use DBI;
use POSIX qw(locale_h);
use locale;
Modified: trunk/vhffs-api/src/Vhffs/Group.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Group.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Group.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -623,15 +623,19 @@
sub _new {
- no strict 'refs';
- my ($class, $main, $gid, $oid, $owner_uid, $groupname, $realname, $passwd, $quota, $quota_used, $date_creation, $description, $state) = @_;
- my $self = $class->SUPER::_new($main, $oid, $owner_uid, $gid, $date_creation, $description, '', $state, Vhffs::Constants::TYPE_GROUP);
- return undef unless(defined $self);
+ no strict 'refs';
+ my ($class, $main, $gid, $oid, $owner_uid, $groupname, $realname, $passwd, $quota, $quota_used, $date_creation, $description, $state) = @_;
+ my $self = $class->SUPER::_new($main, $oid, $owner_uid, $gid, $date_creation, $description, '', $state, Vhffs::Constants::TYPE_GROUP);
+ return undef unless(defined $self);
- foreach (qw (gid groupname realname passwd quota quota_used) ) {
- eval '$self->{$_} = $'.$_;
- }
- return $self;
+ $self->{gid} = $gid;
+ $self->{groupname} = $groupname;
+ $self->{realname} = Encode::decode_utf8( $realname );
+ $self->{passwd} = $passwd;
+ $self->{quota} = $quota;
+ $self->{quota_used} = $quota_used;
+
+ return $self;
}
sub fill_object {
Modified: trunk/vhffs-api/src/Vhffs/Intl.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Intl.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Intl.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,6 +31,7 @@
package Vhffs::Intl;
use strict;
+use utf8;
use Vhffs::Main;
sub get_languages
Modified: trunk/vhffs-api/src/Vhffs/Listengine.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Listengine.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Listengine.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,6 +31,9 @@
package Vhffs::Listengine;
+use strict;
+use utf8;
+
use locale;
use Locale::gettext;
Modified: trunk/vhffs-api/src/Vhffs/Main.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Main.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Main.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -32,6 +32,7 @@
use strict;
+use utf8;
use DBI;
use Vhffs::Functions;
use Vhffs::Conf;
Modified: trunk/vhffs-api/src/Vhffs/Object.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Object.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Object.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -48,8 +48,9 @@
=cut
+use strict;
+use utf8;
-
package Vhffs::Object;
use Vhffs::Constants;
Modified: trunk/vhffs-api/src/Vhffs/ObjectFactory.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/ObjectFactory.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/ObjectFactory.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -45,6 +45,7 @@
package Vhffs::ObjectFactory;
use strict;
+use utf8;
use Vhffs::Constants;
use Vhffs::User;
use Vhffs::Group;
Modified: trunk/vhffs-api/src/Vhffs/Panel/Admin.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Admin.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Admin.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
# This is a part of VHFFS platform
@@ -41,7 +43,6 @@
use HTML::Template;
use locale;
use Locale::gettext;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Acl;
Modified: trunk/vhffs-api/src/Vhffs/Panel/Avatar.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Avatar.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Avatar.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,9 +29,11 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
-
package Vhffs::Panel::Avatar;
+use strict;
+use utf8;
+
use Vhffs::Functions;
use Digest::MD5 qw(md5 md5_hex md5_base64);
Modified: trunk/vhffs-api/src/Vhffs/Panel/Commons.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Commons.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Commons.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,9 +29,11 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
package Vhffs::Panel::Commons;
-use strict;
use DBI;
use POSIX qw(locale_h);
use locale;
Modified: trunk/vhffs-api/src/Vhffs/Panel/Cvs.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Cvs.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Cvs.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Panel::Cvs;
@@ -39,7 +41,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Acl;
Modified: trunk/vhffs-api/src/Vhffs/Panel/DNS.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/DNS.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/DNS.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Panel::DNS;
@@ -38,7 +40,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Panel::Main;
Modified: trunk/vhffs-api/src/Vhffs/Panel/Git.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Git.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Git.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -30,6 +30,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Panel::Git;
@@ -40,7 +42,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Acl;
Modified: trunk/vhffs-api/src/Vhffs/Panel/Group.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Group.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Group.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Panel::Group;
@@ -39,7 +41,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Panel::Main;
Modified: trunk/vhffs-api/src/Vhffs/Panel/Mail.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Mail.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Mail.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Panel::Mail;
@@ -39,7 +41,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Panel::Main;
Modified: trunk/vhffs-api/src/Vhffs/Panel/MailingList.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/MailingList.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/MailingList.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Panel::MailingList;
@@ -39,7 +41,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Panel::Main;
Modified: trunk/vhffs-api/src/Vhffs/Panel/Menu.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Menu.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Menu.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Panel::Menu;
@@ -36,7 +38,6 @@
use HTML::Template;
use locale;
use Locale::gettext;
-use strict;
=pod
Modified: trunk/vhffs-api/src/Vhffs/Panel/Mysql.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Mysql.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Mysql.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Panel::Mysql;
@@ -39,7 +41,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Panel::Main;
Modified: trunk/vhffs-api/src/Vhffs/Panel/Object.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Object.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Object.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Panel::Object;
@@ -39,7 +41,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Object;
Modified: trunk/vhffs-api/src/Vhffs/Panel/Pgsql.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Pgsql.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Pgsql.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Panel::Pgsql;
@@ -39,7 +41,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Constants;
Modified: trunk/vhffs-api/src/Vhffs/Panel/Repository.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Repository.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Repository.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Panel::Repository;
@@ -39,7 +41,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Acl;
Modified: trunk/vhffs-api/src/Vhffs/Panel/Svn.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Svn.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Svn.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Panel::Svn;
@@ -39,7 +41,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Acl;
Modified: trunk/vhffs-api/src/Vhffs/Panel/Template.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Template.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Template.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -46,10 +46,12 @@
=cut
+use strict;
+use utf8;
+
package Vhffs::Panel::Template;
use base qw(HTML::Template::Expr);
-use strict;
use Locale::gettext;
sub new {
Modified: trunk/vhffs-api/src/Vhffs/Panel/User.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/User.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/User.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Panel::User;
@@ -36,7 +38,6 @@
use POSIX qw(locale_h);
use locale;
use Locale::gettext;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Panel::Main;
Modified: trunk/vhffs-api/src/Vhffs/Panel/Web.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Panel/Web.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Panel/Web.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Panel::Web;
@@ -39,7 +41,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Panel::Main;
Modified: trunk/vhffs-api/src/Vhffs/Robots/Cvs.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Robots/Cvs.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Robots/Cvs.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,9 +29,11 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
-
package Vhffs::Robots::Cvs;
+use strict;
+use utf8;
+
use Vhffs::Services::Cvs;
use Vhffs::Constants;
use Vhffs::Functions;
Modified: trunk/vhffs-api/src/Vhffs/Robots/Git.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Robots/Git.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Robots/Git.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -30,6 +30,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Robots::Git;
Modified: trunk/vhffs-api/src/Vhffs/Robots/Group.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Robots/Group.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Robots/Group.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Robots::Group;
Modified: trunk/vhffs-api/src/Vhffs/Robots/Mail.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Robots/Mail.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Robots/Mail.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Robots::Mail;
@@ -39,7 +41,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use Vhffs::User;
use Vhffs::Main;
use Vhffs::Services::Mail;
Modified: trunk/vhffs-api/src/Vhffs/Robots/Mailing.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Robots/Mailing.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Robots/Mailing.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Robots::Mailing;
Modified: trunk/vhffs-api/src/Vhffs/Robots/Mysql.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Robots/Mysql.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Robots/Mysql.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -33,7 +33,8 @@
package Vhffs::Robots::Mysql;
require 5.004;
-# use strict;
+use strict;
+use utf8;
use POSIX;
use locale;
use Locale::gettext;
Modified: trunk/vhffs-api/src/Vhffs/Robots/Pgsql.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Robots/Pgsql.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Robots/Pgsql.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Robots::Pgsql;
@@ -36,8 +38,6 @@
use Vhffs::Constants;
use Vhffs::Functions;
-use strict;
-
sub update_db
{
my $main = shift;
Modified: trunk/vhffs-api/src/Vhffs/Robots/Repository.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Robots/Repository.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Robots/Repository.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Robots::Repository;
Modified: trunk/vhffs-api/src/Vhffs/Robots/Svn.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Robots/Svn.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Robots/Svn.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,9 +29,11 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
-
package Vhffs::Robots::Svn;
+use strict;
+use utf8;
+
use Vhffs::Services::Svn;
use Vhffs::Constants;
use Vhffs::Functions;
Modified: trunk/vhffs-api/src/Vhffs/Robots/User.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Robots/User.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Robots/User.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Robots::User;
Modified: trunk/vhffs-api/src/Vhffs/Robots/Web.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Robots/Web.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Robots/Web.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
package Vhffs::Robots::Web;
Modified: trunk/vhffs-api/src/Vhffs/Robots.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Robots.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Robots.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -28,11 +28,12 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+package Vhffs::Robots;
-
no warnings 'redefine';
-package Vhffs::Robots;
+use strict;
+use utf8;
require Exporter;
@ISA = qw(Exporter);
Modified: trunk/vhffs-api/src/Vhffs/Services/Cvs.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/Cvs.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Services/Cvs.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -43,11 +43,13 @@
=cut
+use strict;
+use utf8;
+
package Vhffs::Services::Cvs;
use base qw(Vhffs::Object);
use Vhffs::Group;
-use strict;
use DBI;
=pod
Modified: trunk/vhffs-api/src/Vhffs/Services/DNS.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/DNS.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Services/DNS.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -43,11 +43,12 @@
=cut
+use strict;
+use utf8;
package Vhffs::Services::DNS;
use base qw(Vhffs::Object);
-use strict;
use DBI;
# Returns an array with ALL the DNS
Modified: trunk/vhffs-api/src/Vhffs/Services/Git.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/Git.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Services/Git.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -33,11 +33,13 @@
# This file is a part of VHFFS4 Hosting Platform
# Please respect the licence of this file and the whole software
+use strict;
+use utf8;
+
package Vhffs::Services::Git;
use base qw(Vhffs::Object);
use Vhffs::Group;
-use strict;
use DBI;
sub check_name($) {
Modified: trunk/vhffs-api/src/Vhffs/Services/Mail.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/Mail.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Services/Mail.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -45,10 +45,12 @@
=cut
+use strict;
+use utf8;
+
package Vhffs::Services::Mail;
use base qw(Vhffs::Object);
-use strict;
use DBI;
sub delete
Modified: trunk/vhffs-api/src/Vhffs/Services/MailGroup.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/MailGroup.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Services/MailGroup.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -38,9 +38,11 @@
#This module helps you to manage a simple maildomain
#for all hosted people
+use strict;
+use utf8;
+
package Vhffs::Services::MailGroup;
-use strict;
use DBI;
use Vhffs::Group;
use Vhffs::Services::Mail;
Modified: trunk/vhffs-api/src/Vhffs/Services/MailUser.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/MailUser.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Services/MailUser.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -38,9 +38,11 @@
#This module helps you to manage a simple maildomain
#for all hosted people
+use strict;
+use utf8;
+
package Vhffs::Services::MailUser;
-use strict;
use DBI;
use Vhffs::User;
use Vhffs::Services::Mail;
Modified: trunk/vhffs-api/src/Vhffs/Services/MailingList.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/MailingList.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Services/MailingList.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -47,10 +47,12 @@
=cut
+use strict;
+use utf8;
+
package Vhffs::Services::MailingList;
use base qw(Vhffs::Object);
-use strict;
use DBI;
=pod
@@ -178,12 +180,12 @@
$self->{ml_id} = $ml_id;
$self->{local_part} = $local_part;
$self->{domain} = $domain,
- $self->{prefix} = $prefix;
+ $self->{prefix} = Encode::decode_utf8( $prefix );
$self->{open_archive} = $open_archive;
$self->{reply_to} = $reply_to;
$self->{sub_ctrl} = $sub_ctrl;
$self->{post_ctrl} = $post_ctrl;
- $self->{signature} = $signature;
+ $self->{signature} = Encode::decode_utf8( $signature );
$self->{subs} = $subs;
return $self;
Modified: trunk/vhffs-api/src/Vhffs/Services/Mysql.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/Mysql.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Services/Mysql.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -47,10 +47,12 @@
=cut
+use strict;
+use utf8;
+
package Vhffs::Services::Mysql;
use base qw(Vhffs::Object);
-use strict;
use DBI;
=head2 check_dbname
Modified: trunk/vhffs-api/src/Vhffs/Services/Pgsql.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/Pgsql.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Services/Pgsql.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -46,10 +46,12 @@
=cut
+use strict;
+use utf8;
+
package Vhffs::Services::Pgsql;
use base qw(Vhffs::Object);
-use strict;
use DBI;
=pod
Modified: trunk/vhffs-api/src/Vhffs/Services/Repository.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/Repository.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Services/Repository.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -47,11 +47,13 @@
=cut
+use strict;
+use utf8;
+
package Vhffs::Services::Repository;
use base qw(Vhffs::Object);
use Vhffs::Group;
-use strict;
use DBI;
sub check_name($)
Modified: trunk/vhffs-api/src/Vhffs/Services/Svn.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/Svn.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Services/Svn.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,8 +29,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
-
# This file is a part of VHFFS4 Hosting Platform
# Please respect the licence of this file and the whole software
@@ -40,7 +41,6 @@
use base qw(Vhffs::Object);
use Vhffs::Group;
-use strict;
use DBI;
sub check_name($) {
Modified: trunk/vhffs-api/src/Vhffs/Services/Web.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/Web.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Services/Web.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -48,11 +48,13 @@
=cut
+use strict;
+use utf8;
+
package Vhffs::Services::Web;
use Vhffs::Functions;
use base qw(Vhffs::Object);
-use strict;
use DBI;
=pod
Modified: trunk/vhffs-api/src/Vhffs/Services.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Services.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
package Vhffs::Services;
use Vhffs::Services::Cvs;
Modified: trunk/vhffs-api/src/Vhffs/Stats.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Stats.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/Stats.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -57,6 +57,7 @@
package Vhffs::Stats;
use strict;
+use utf8;
use base qw(Vhffs::Object);
use Vhffs::Constants;
Modified: trunk/vhffs-api/src/Vhffs/User.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/User.pm 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/Vhffs/User.pm 2007-10-22 12:58:47 UTC (rev 1015)
@@ -37,6 +37,7 @@
use base qw(Vhffs::Object);
use strict;
+use utf8;
use DBI;
use POSIX qw(locale_h);
use locale;
@@ -98,12 +99,12 @@
$self->{homedir} = $homedir;
$self->{shell} = $shell;
$self->{admin} = $admin;
- $self->{firstname} = $firstname;
- $self->{lastname} = $lastname;
- $self->{address} = $address;
- $self->{zipcode} = $zipcode;
- $self->{city} = $city;
- $self->{country} = $country;
+ $self->{firstname} = Encode::decode_utf8( $firstname );
+ $self->{lastname} = Encode::decode_utf8( $lastname );
+ $self->{address} = Encode::decode_utf8( $address );
+ $self->{zipcode} = Encode::decode_utf8( $zipcode );
+ $self->{city} = Encode::decode_utf8( $city );
+ $self->{country} = Encode::decode_utf8( $country );
$self->{mail} = $mail;
$self->{gpg_key} = $gpg_key;
$self->{note} = $note;
Modified: trunk/vhffs-api/src/examples/create_dir.pl
===================================================================
--- trunk/vhffs-api/src/examples/create_dir.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/examples/create_dir.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -1,5 +1,7 @@
#!%PERL%
+use strict;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Functions;
Modified: trunk/vhffs-api/src/examples/hash_webdir.pl
===================================================================
--- trunk/vhffs-api/src/examples/hash_webdir.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/examples/hash_webdir.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -1,5 +1,7 @@
#!%PERL%
+use strict;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Functions;
Modified: trunk/vhffs-api/src/examples/hashdomain.pl
===================================================================
--- trunk/vhffs-api/src/examples/hashdomain.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/examples/hashdomain.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -1,5 +1,7 @@
#!%PERL%
+use strict;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Functions;
Modified: trunk/vhffs-api/src/examples/hashhome_example.pl
===================================================================
--- trunk/vhffs-api/src/examples/hashhome_example.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/examples/hashhome_example.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -1,5 +1,7 @@
#!%PERL%
+use strict;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Functions;
use Vhffs::Main;
Modified: trunk/vhffs-api/src/examples/hashpopuser.pl
===================================================================
--- trunk/vhffs-api/src/examples/hashpopuser.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/examples/hashpopuser.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -1,5 +1,7 @@
#!%PERL%
+use strict;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Functions;
Modified: trunk/vhffs-api/src/examples/list_themes.pl
===================================================================
--- trunk/vhffs-api/src/examples/list_themes.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/examples/list_themes.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -1,5 +1,7 @@
#!%PERL%
+use strict;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Panel::Main;
use Vhffs::Main;
Modified: trunk/vhffs-api/src/examples/perm_for_user.pl
===================================================================
--- trunk/vhffs-api/src/examples/perm_for_user.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/examples/perm_for_user.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -1,5 +1,7 @@
#!%PERL%
+use strict;
+
use Data::Dumper;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::User;
Modified: trunk/vhffs-api/src/examples/show_mail_conf.pl
===================================================================
--- trunk/vhffs-api/src/examples/show_mail_conf.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/examples/show_mail_conf.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -1,5 +1,7 @@
#!%PERL% -w
+use strict;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Conf;
use Vhffs::User;
Modified: trunk/vhffs-api/src/examples/stats.pl
===================================================================
--- trunk/vhffs-api/src/examples/stats.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-api/src/examples/stats.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -1,5 +1,7 @@
#!%PERL%
+use strict;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::Stats;
Modified: trunk/vhffs-backend/src/mirror/mx1-mirror.pl
===================================================================
--- trunk/vhffs-backend/src/mirror/mx1-mirror.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-backend/src/mirror/mx1-mirror.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -37,6 +37,7 @@
use DBI;
use strict;
+use utf8;
# Master DB params
my $MASTER_DB_HOST = 'localhost';
Modified: trunk/vhffs-backend/src/mirror/mx2-mirror.pl
===================================================================
--- trunk/vhffs-backend/src/mirror/mx2-mirror.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-backend/src/mirror/mx2-mirror.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -36,6 +36,7 @@
use DBI;
use strict;
+use utf8;
# Master DB params
my $MASTER_DB_HOST = 'localhost';
Modified: trunk/vhffs-backend/src/mirror/mydns-mirror.pl
===================================================================
--- trunk/vhffs-backend/src/mirror/mydns-mirror.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-backend/src/mirror/mydns-mirror.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -36,6 +36,7 @@
use DBI;
use strict;
+use utf8;
# Master DB params
my $MASTER_DB_HOST = 'localhost';
Modified: trunk/vhffs-backend/src/mirror/nss-mirror.pl
===================================================================
--- trunk/vhffs-backend/src/mirror/nss-mirror.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-backend/src/mirror/nss-mirror.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -34,6 +34,7 @@
use DBI;
use Getopt::Long;
use strict;
+use utf8;
# TODO Set us!
my $PG_DB_HOST = 'localhost'; # Host running pg
Modified: trunk/vhffs-compat/updatedb.pl
===================================================================
--- trunk/vhffs-compat/updatedb.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-compat/updatedb.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -30,6 +30,8 @@
# POSSIBILITY OF SUCH DAMAGE.
#
+use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Term::ReadPassword;
@@ -40,8 +42,6 @@
use Vhffs::Main;
use IO::File;
-use strict;
-
#my $SQL_DIR = '%VHFFS_BACKEND_DIR%/';
my $SQL_DIR = '/root/vhffs/vhffs/trunk/vhffs-backend/src/pgsql/';
Modified: trunk/vhffs-intl/extra_strings.pl
===================================================================
--- trunk/vhffs-intl/extra_strings.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-intl/extra_strings.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -2,6 +2,9 @@
# string ids that can't be passed directly to gettext
# (arrays, generation).
+use strict;
+use utf8;
+
die('Don\'t execute me, vi me');
# Help topics
Modified: trunk/vhffs-irc/modobot.pl
===================================================================
--- trunk/vhffs-irc/modobot.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-irc/modobot.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -7,6 +7,7 @@
use POSIX qw(locale_h);
use locale;
use strict;
+use utf8;
use warnings;
use Locale::gettext;
Modified: trunk/vhffs-listengine/src/listengine.pl
===================================================================
--- trunk/vhffs-listengine/src/listengine.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-listengine/src/listengine.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,6 +31,7 @@
use strict;
+use utf8;
use Net::SMTP;
use Socket;
use POSIX qw(locale_h);
Modified: trunk/vhffs-panel/ajax/help.pl
===================================================================
--- trunk/vhffs-panel/ajax/help.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-panel/ajax/help.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,7 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
use utf8;
use CGI;
use locale;
Modified: trunk/vhffs-panel/getavatar.pl
===================================================================
--- trunk/vhffs-panel/getavatar.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-panel/getavatar.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,7 +29,7 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
-
+use strict;
use utf8;
use CGI;
use GD;
Modified: trunk/vhffs-panel/show_code.pl
===================================================================
--- trunk/vhffs-panel/show_code.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-panel/show_code.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,7 +29,7 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
-
+use strict;
use utf8;
use CGI;
use lib '%VHFFS_LIB_DIR%';
Modified: trunk/vhffs-public/allgroups.pl
===================================================================
--- trunk/vhffs-public/allgroups.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-public/allgroups.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,12 +29,13 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use POSIX qw(locale_h);
use HTML::Template;
use locale;
use Locale::gettext;
-use strict;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::User;
Modified: trunk/vhffs-public/allwebsites.pl
===================================================================
--- trunk/vhffs-public/allwebsites.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-public/allwebsites.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,12 +29,13 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use POSIX qw(locale_h);
use HTML::Template;
use locale;
use Locale::gettext;
-use strict;
use CGI;
use lib '%VHFFS_LIB_DIR%';
Modified: trunk/vhffs-public/group.pl
===================================================================
--- trunk/vhffs-public/group.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-public/group.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use POSIX qw(locale_h);
use HTML::Template::Expr;
@@ -36,7 +38,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::User;
Modified: trunk/vhffs-public/index.pl
===================================================================
--- trunk/vhffs-public/index.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-public/index.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,12 +29,13 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use POSIX qw(locale_h);
use HTML::Template;
use locale;
use Locale::gettext;
-use strict;
use CGI;
use lib '%VHFFS_LIB_DIR%';
Modified: trunk/vhffs-public/lastgroups.pl
===================================================================
--- trunk/vhffs-public/lastgroups.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-public/lastgroups.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,12 +29,13 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use POSIX qw(locale_h);
use HTML::Template;
use locale;
use Locale::gettext;
-use strict;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::User;
Modified: trunk/vhffs-public/lastusers.pl
===================================================================
--- trunk/vhffs-public/lastusers.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-public/lastusers.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,12 +29,13 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use POSIX qw(locale_h);
use HTML::Template;
use locale;
use Locale::gettext;
-use strict;
use CGI;
use lib '%VHFFS_LIB_DIR%';
Modified: trunk/vhffs-public/rss/lastgroups.pl
===================================================================
--- trunk/vhffs-public/rss/lastgroups.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-public/rss/lastgroups.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,16 +29,15 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
-
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::User;
use XML::RSS;
-use strict;
-
my $vhffs = init Vhffs::Main;
my $url;
Modified: trunk/vhffs-public/rss/lastusers.pl
===================================================================
--- trunk/vhffs-public/rss/lastusers.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-public/rss/lastusers.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,16 +29,15 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
-
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::User;
use XML::RSS;
-use strict;
-
my $vhffs = init Vhffs::Main;
my $url;
$url = "" unless defined ( $url = $vhffs->get_config->get_panel->{'url_public'} );
Modified: trunk/vhffs-public/user.pl
===================================================================
--- trunk/vhffs-public/user.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-public/user.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use POSIX qw(locale_h);
use HTML::Template;
@@ -36,7 +38,6 @@
use Locale::gettext;
use CGI;
use CGI::Session;
-use strict;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::User;
Modified: trunk/vhffs-public/websearch.pl
===================================================================
--- trunk/vhffs-public/websearch.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-public/websearch.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,12 +29,13 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use POSIX qw(locale_h);
use HTML::Template;
use locale;
use Locale::gettext;
-use strict;
use CGI;
use lib '%VHFFS_LIB_DIR%';
Modified: trunk/vhffs-robots/misc/svn_post-commit.pl
===================================================================
--- trunk/vhffs-robots/misc/svn_post-commit.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/misc/svn_post-commit.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,6 +31,7 @@
# POSSIBILITY OF SUCH DAMAGE.
use strict;
+use utf8;
my $repopath = $ARGV[0];
my $rev = $ARGV[1];
Modified: trunk/vhffs-robots/src/cvs_create.pl
===================================================================
--- trunk/vhffs-robots/src/cvs_create.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/cvs_create.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,6 +31,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Robots::Cvs;
Modified: trunk/vhffs-robots/src/cvs_delete.pl
===================================================================
--- trunk/vhffs-robots/src/cvs_delete.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/cvs_delete.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Robots::Cvs;
Modified: trunk/vhffs-robots/src/cvs_fixperms.pl
===================================================================
--- trunk/vhffs-robots/src/cvs_fixperms.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/cvs_fixperms.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -36,8 +36,9 @@
# by sod
+use strict;
+use utf8;
-
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::Robots;
Modified: trunk/vhffs-robots/src/cvs_viewvcconf.pl
===================================================================
--- trunk/vhffs-robots/src/cvs_viewvcconf.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/cvs_viewvcconf.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -32,6 +32,7 @@
use strict;
use lib '%VHFFS_LIB_DIR%';
+use utf8;
use Vhffs::Main;
use Vhffs::Constants;
use Vhffs::Services::Cvs;
Modified: trunk/vhffs-robots/src/dns_create.pl
===================================================================
--- trunk/vhffs-robots/src/dns_create.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/dns_create.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,7 +31,7 @@
# POSSIBILITY OF SUCH DAMAGE.
use lib '%VHFFS_LIB_DIR%';
-
+use utf8;
use Vhffs::Services::DNS;
use Vhffs::Robots;
use Vhffs::Main;
Modified: trunk/vhffs-robots/src/dns_delete.pl
===================================================================
--- trunk/vhffs-robots/src/dns_delete.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/dns_delete.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -30,6 +30,7 @@
# POSSIBILITY OF SUCH DAMAGE.
use lib '%VHFFS_LIB_DIR%';
+use utf8;
use Vhffs::Robots;
use Vhffs::Services::DNS;
use Vhffs::Main;
Modified: trunk/vhffs-robots/src/git_create.pl
===================================================================
--- trunk/vhffs-robots/src/git_create.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/git_create.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -30,6 +30,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::Robots;
Modified: trunk/vhffs-robots/src/git_delete.pl
===================================================================
--- trunk/vhffs-robots/src/git_delete.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/git_delete.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -30,6 +30,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::Robots;
Modified: trunk/vhffs-robots/src/git_public.pl
===================================================================
--- trunk/vhffs-robots/src/git_public.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/git_public.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -30,6 +30,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::Robots;
Modified: trunk/vhffs-robots/src/group_create.pl
===================================================================
--- trunk/vhffs-robots/src/group_create.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/group_create.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -30,6 +30,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::Group;
Modified: trunk/vhffs-robots/src/group_delete.pl
===================================================================
--- trunk/vhffs-robots/src/group_delete.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/group_delete.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Robots::Group;
Modified: trunk/vhffs-robots/src/group_getquota.pl
===================================================================
--- trunk/vhffs-robots/src/group_getquota.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/group_getquota.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,6 +31,7 @@
require 5.004;
use strict;
+use utf8;
use POSIX;
use locale;
use Locale::gettext;
Modified: trunk/vhffs-robots/src/group_setquota.pl
===================================================================
--- trunk/vhffs-robots/src/group_setquota.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/group_setquota.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,6 +31,7 @@
require 5.004;
use strict;
+use utf8;
use POSIX;
use locale;
use Locale::gettext;
Modified: trunk/vhffs-robots/src/listengine_publicarchives.pl
===================================================================
--- trunk/vhffs-robots/src/listengine_publicarchives.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/listengine_publicarchives.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -1,6 +1,7 @@
#!%PERL% -w
use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
Modified: trunk/vhffs-robots/src/mail_create.pl
===================================================================
--- trunk/vhffs-robots/src/mail_create.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/mail_create.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -34,6 +34,9 @@
# FIXME : This robot is unnecessary, we just have to activate mailbox on creation
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Services::Mail;
use Vhffs::Robots;
Modified: trunk/vhffs-robots/src/mail_createboxes.pl
===================================================================
--- trunk/vhffs-robots/src/mail_createboxes.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/mail_createboxes.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,6 +31,9 @@
#This robot create mail boxes
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Services::Mail;
use Vhffs::Robots::Mail;
Modified: trunk/vhffs-robots/src/mail_delete.pl
===================================================================
--- trunk/vhffs-robots/src/mail_delete.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/mail_delete.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
Modified: trunk/vhffs-robots/src/mail_deleteboxes.pl
===================================================================
--- trunk/vhffs-robots/src/mail_deleteboxes.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/mail_deleteboxes.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -30,6 +30,8 @@
# POSSIBILITY OF SUCH DAMAGE.
#This robot archives and delete mail boxes
+use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Services::Mail;
Modified: trunk/vhffs-robots/src/mailing.pl
===================================================================
--- trunk/vhffs-robots/src/mailing.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/mailing.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -40,7 +40,6 @@
#TODO : Declare an encoding system in the vhffs.conf for mailings
use strict;
-use Encode;
use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
Modified: trunk/vhffs-robots/src/mailinglist_create.pl
===================================================================
--- trunk/vhffs-robots/src/mailinglist_create.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/mailinglist_create.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,10 @@
# LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::Robots;
Modified: trunk/vhffs-robots/src/mailinglist_delete.pl
===================================================================
--- trunk/vhffs-robots/src/mailinglist_delete.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/mailinglist_delete.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
Modified: trunk/vhffs-robots/src/mysql_create.pl
===================================================================
--- trunk/vhffs-robots/src/mysql_create.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/mysql_create.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -30,6 +30,7 @@
# POSSIBILITY OF SUCH DAMAGE.
use strict;
+use utf8;
use POSIX;
use locale;
use lib '%VHFFS_LIB_DIR%';
Modified: trunk/vhffs-robots/src/mysql_delete.pl
===================================================================
--- trunk/vhffs-robots/src/mysql_delete.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/mysql_delete.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Robots;
use Vhffs::Robots::Mysql;
Modified: trunk/vhffs-robots/src/mysql_dump.pl
===================================================================
--- trunk/vhffs-robots/src/mysql_dump.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/mysql_dump.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -35,6 +35,8 @@
#
use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::User;
Modified: trunk/vhffs-robots/src/mysql_modify.pl
===================================================================
--- trunk/vhffs-robots/src/mysql_modify.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/mysql_modify.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Robots;
use Vhffs::Robots::Mysql;
Modified: trunk/vhffs-robots/src/object_cleanup.pl
===================================================================
--- trunk/vhffs-robots/src/object_cleanup.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/object_cleanup.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -30,6 +30,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::Robots;
Modified: trunk/vhffs-robots/src/pgsql_create.pl
===================================================================
--- trunk/vhffs-robots/src/pgsql_create.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/pgsql_create.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Robots::Pgsql;
Modified: trunk/vhffs-robots/src/pgsql_delete.pl
===================================================================
--- trunk/vhffs-robots/src/pgsql_delete.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/pgsql_delete.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Robots;
use Vhffs::Services::Pgsql;
Modified: trunk/vhffs-robots/src/pgsql_dump.pl
===================================================================
--- trunk/vhffs-robots/src/pgsql_dump.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/pgsql_dump.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -35,6 +35,7 @@
#
use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::User;
Modified: trunk/vhffs-robots/src/pgsql_modify.pl
===================================================================
--- trunk/vhffs-robots/src/pgsql_modify.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/pgsql_modify.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Robots;
Modified: trunk/vhffs-robots/src/repository_create.pl
===================================================================
--- trunk/vhffs-robots/src/repository_create.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/repository_create.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,6 +31,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Robots::Repository;
Modified: trunk/vhffs-robots/src/repository_delete.pl
===================================================================
--- trunk/vhffs-robots/src/repository_delete.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/repository_delete.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Robots::Repository;
Modified: trunk/vhffs-robots/src/repository_getquota.pl
===================================================================
--- trunk/vhffs-robots/src/repository_getquota.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/repository_getquota.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,6 +31,7 @@
require 5.004;
use strict;
+use utf8;
use POSIX;
use locale;
use Locale::gettext;
Modified: trunk/vhffs-robots/src/repository_setquota.pl
===================================================================
--- trunk/vhffs-robots/src/repository_setquota.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/repository_setquota.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,6 +31,7 @@
require 5.004;
use strict;
+use utf8;
use POSIX;
use locale;
use Locale::gettext;
Modified: trunk/vhffs-robots/src/repository_stats.pl
===================================================================
--- trunk/vhffs-robots/src/repository_stats.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/repository_stats.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -36,6 +36,7 @@
#CustomLog /var/log/apache2/http.log vhffs
use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::Conf;
Modified: trunk/vhffs-robots/src/svn_create.pl
===================================================================
--- trunk/vhffs-robots/src/svn_create.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/svn_create.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::Robots;
Modified: trunk/vhffs-robots/src/svn_delete.pl
===================================================================
--- trunk/vhffs-robots/src/svn_delete.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/svn_delete.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::Robots;
Modified: trunk/vhffs-robots/src/svn_public.pl
===================================================================
--- trunk/vhffs-robots/src/svn_public.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/svn_public.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::Robots;
Modified: trunk/vhffs-robots/src/svn_viewvcconf.pl
===================================================================
--- trunk/vhffs-robots/src/svn_viewvcconf.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/svn_viewvcconf.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -30,6 +30,7 @@
# POSSIBILITY OF SUCH DAMAGE.
use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
Modified: trunk/vhffs-robots/src/svn_websvn.pl
===================================================================
--- trunk/vhffs-robots/src/svn_websvn.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/svn_websvn.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -30,6 +30,7 @@
# POSSIBILITY OF SUCH DAMAGE.
use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
Modified: trunk/vhffs-robots/src/user_cleanup.pl
===================================================================
--- trunk/vhffs-robots/src/user_cleanup.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/user_cleanup.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -30,6 +30,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::Robots;
Modified: trunk/vhffs-robots/src/user_create.pl
===================================================================
--- trunk/vhffs-robots/src/user_create.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/user_create.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,6 +31,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Robots::User;
use Vhffs::Robots;
Modified: trunk/vhffs-robots/src/user_delete.pl
===================================================================
--- trunk/vhffs-robots/src/user_delete.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/user_delete.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Robots;
use Vhffs::Robots::User;
Modified: trunk/vhffs-robots/src/user_getquota.pl
===================================================================
--- trunk/vhffs-robots/src/user_getquota.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/user_getquota.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,6 +31,7 @@
require 5.004;
use strict;
+use utf8;
use POSIX;
use locale;
use Locale::gettext;
Modified: trunk/vhffs-robots/src/user_group.pl
===================================================================
--- trunk/vhffs-robots/src/user_group.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/user_group.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::User;
Modified: trunk/vhffs-robots/src/user_setquota.pl
===================================================================
--- trunk/vhffs-robots/src/user_setquota.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/user_setquota.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -31,6 +31,7 @@
require 5.004;
use strict;
+use utf8;
use POSIX;
use locale;
use Locale::gettext;
Modified: trunk/vhffs-robots/src/web_create.pl
===================================================================
--- trunk/vhffs-robots/src/web_create.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/web_create.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,8 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Robots::Web;
Modified: trunk/vhffs-robots/src/web_delete.pl
===================================================================
--- trunk/vhffs-robots/src/web_delete.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/web_delete.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -29,6 +29,9 @@
# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
+use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Robots;
use Vhffs::Robots::Web;
Modified: trunk/vhffs-robots/src/web_stats.pl
===================================================================
--- trunk/vhffs-robots/src/web_stats.pl 2007-10-22 12:05:02 UTC (rev 1014)
+++ trunk/vhffs-robots/src/web_stats.pl 2007-10-22 12:58:47 UTC (rev 1015)
@@ -36,6 +36,8 @@
#CustomLog /var/log/apache2/vhffs.log vhffs
use strict;
+use utf8;
+
use lib '%VHFFS_LIB_DIR%';
use Vhffs::Main;
use Vhffs::Conf;