[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Savannah-cvs] administration/infra/savane/bin sv_users
From: |
Elfyn McBratney |
Subject: |
[Savannah-cvs] administration/infra/savane/bin sv_users |
Date: |
Tue, 14 Sep 2004 00:14:59 -0400 |
CVSROOT: /cvsroot/administration
Module name: administration
Branch:
Changes by: Elfyn McBratney <address@hidden> 04/09/14 04:09:46
Modified files:
infra/savane/bin: sv_users
Log message:
add back user_id.
CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/administration/administration/infra/savane/bin/sv_users.diff?tr1=1.16&tr2=1.17&r1=text&r2=text
Patches:
Index: administration/infra/savane/bin/sv_users
diff -u administration/infra/savane/bin/sv_users:1.16
administration/infra/savane/bin/sv_users:1.17
--- administration/infra/savane/bin/sv_users:1.16 Tue Sep 14 03:10:16 2004
+++ administration/infra/savane/bin/sv_users Tue Sep 14 04:09:46 2004
@@ -2,7 +2,7 @@
# This file is part of the Savane project
# <http://gna.org/projects/savane/>
#
-# $Id: sv_users,v 1.16 2004/09/14 03:10:16 beu Exp $
+# $Id: sv_users,v 1.17 2004/09/14 04:09:46 beu Exp $
#
# Copyright 2001 (c) Loic Dachary <loic--at--gnu.org> (sv_cvs.pl)
# 2003-2004 (c) Mathieu Roy <yeupou--at--gnu.org>
@@ -166,10 +166,10 @@
foreach my $line (GetDB("user", "status='A' OR status='D'",
"user_name,email,realname,authorized_keys,".
- "gpg_key,status,unix_status,use_cvsadmin")) {
+ "gpg_key,status,unix_status,use_cvsadmin,user_id")) {
chomp($line);
my ($user, $email, $realname, $authorized_keys, $gpg_keys,
- $status, $unix_status, $use_cvsadmin) = split(",", $line);
+ $status, $unix_status, $use_cvsadmin, $user_id) = split(",", $line);
#print "DBG - user=$user\n" if $debug;
print "DBG db: got $user <$email> from database\n" if $debug;
@@ -178,7 +178,8 @@
$realname =~ s/[:\x00-\x1f]//g;
$email =~ s/[:\x00-\x1f]//g;
$db_user{$user} = [ ($user, $email, $realname, $authorized_keys,
- $gpg_keys, $status, $unix_status, $use_cvsadmin) ];
+ $gpg_keys, $status, $unix_status, $use_cvsadmin,
+ $user_id) ];
push (@db_users, $user);
}
- [Savannah-cvs] administration/infra/savane/bin sv_users, (continued)
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/13
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/13
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/13
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/13
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/13
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/13
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/13
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/13
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/13
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/13
- [Savannah-cvs] administration/infra/savane/bin sv_users,
Elfyn McBratney <=
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/14
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/14
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/14
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/14
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/14
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/14
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/14
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/14
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/14
- [Savannah-cvs] administration/infra/savane/bin sv_users, Elfyn McBratney, 2004/09/15