[vhffs-dev] [svn] commit: r101 - in /trunk: vhffs-intl/createpot.sh vhffs-intl/result/fr_FR/LC_MESSAGES/vhffs.mo vhffs-panel/pgsql/pgsql_submit.pl vhffs-panel/svn/prefs.pl vhffs-robots/src/delete_users.pl |
[ Thread Index |
Date Index
| More vhffs.org/vhffs-dev Archives
]
- To: vhffs-dev@xxxxxxxxx
- Subject: [vhffs-dev] [svn] commit: r101 - in /trunk: vhffs-intl/createpot.sh vhffs-intl/result/fr_FR/LC_MESSAGES/vhffs.mo vhffs-panel/pgsql/pgsql_submit.pl vhffs-panel/svn/prefs.pl vhffs-robots/src/delete_users.pl
- From: vhffs-dev@xxxxxxxxx
- Date: Fri Dec 9 14:44:38 2005 +00
Author: soda
Date: Fri Dec 9 15:44:32 2005
New Revision: 101
Log:
fix some code
Modified:
trunk/vhffs-intl/createpot.sh
trunk/vhffs-intl/result/fr_FR/LC_MESSAGES/vhffs.mo
trunk/vhffs-panel/pgsql/pgsql_submit.pl
trunk/vhffs-panel/svn/prefs.pl
trunk/vhffs-robots/src/delete_users.pl
Modified: trunk/vhffs-intl/createpot.sh
==============================================================================
--- trunk/vhffs-intl/createpot.sh (original)
+++ trunk/vhffs-intl/createpot.sh Fri Dec 9 15:44:32 2005
@@ -1,3 +1,3 @@
#!/bin/sh
-xgettext -L Perl -d vhffs -s -o vhffs.pot `find /vhffs -name "*.p[lm]"`
+xgettext -L Perl -d vhffs -s -o vhffs.pot `find ../ -name "*.p[lm]"`
Modified: trunk/vhffs-intl/result/fr_FR/LC_MESSAGES/vhffs.mo
==============================================================================
Binary files - no diff available.
Modified: trunk/vhffs-panel/pgsql/pgsql_submit.pl
==============================================================================
--- trunk/vhffs-panel/pgsql/pgsql_submit.pl (original)
+++ trunk/vhffs-panel/pgsql/pgsql_submit.pl Fri Dec 9 15:44:32 2005
@@ -51,7 +51,7 @@
}
elsif( ( length( $dbname ) < 3 ) || ( length( $dbname ) >= 16 ) )
{
- $message = gettext( "Database name must contains at least 3 caracters and no more than 16$dbname" );
+ $message = gettext( "Database name must contains at least 3 caracters and no more than 16" );
}
else
{
Modified: trunk/vhffs-panel/svn/prefs.pl
==============================================================================
--- trunk/vhffs-panel/svn/prefs.pl (original)
+++ trunk/vhffs-panel/svn/prefs.pl Fri Dec 9 15:44:32 2005
@@ -49,7 +49,7 @@
if( ( ! defined $repo_name ) || ( ! defined $svn ) )
{
$template = new HTML::Template( filename => $templatedir."/misc/simplemsg.tmpl" );
- $message = gettext( "CGI Error ! $cgigroupname" );
+ $message = gettext( "CGI Error" );
$template->param( MESSAGE => $message );
}
elsif( ( ! defined $group ) || ( $group->fetch < 0 ) )
Modified: trunk/vhffs-robots/src/delete_users.pl
==============================================================================
--- trunk/vhffs-robots/src/delete_users.pl (original)
+++ trunk/vhffs-robots/src/delete_users.pl Fri Dec 9 15:44:32 2005
@@ -17,17 +17,14 @@
$ok = 1;
if( ( defined $user ) && ( $user->fetch > 0 ))
{
- print "Suppression du user en cours".$user->get_username." \n";
+ print sprintf( "Delete user %s \n" , $user->get_username ) ;
$groups = $user->get_groups;
if( defined $groups )
{
foreach $group ( @{$groups} )
{
- print "\tSuppression du groupe : ". $group->get_groupname."\n";
- #Vérification si le user possède encore des groupes.
- #Si il en possède, on ne supprime pas le user
- #Et on mets les groups à supprimer
+ print sprintf("\tSuppression du groupe : %s\n", $group->get_groupname);
if( $group->get_owneruid == $user->get_uid )
{
$ok = 0;