Update of /cvsroot/fink/fink/perlmod/Fink
In directory sc8-pr-cvs1:/tmp/cvs-serv10407
Modified Files:
Tag: uidgid
PkgVersion.pm User.pm
Log Message:
Removing password support
Index: PkgVersion.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/PkgVersion.pm,v
retrieving revision 1.128.8.5
retrieving revision 1.128.8.6
diff -u -d -r1.128.8.5 -r1.128.8.6
--- PkgVersion.pm 11 Aug 2003 19:47:50 -0000 1.128.8.5
+++ PkgVersion.pm 12 Aug 2003 02:08:40 -0000 1.128.8.6
@@ -1646,23 +1646,23 @@
### Add user/group check to preinst if needed
if ($scriptname eq "preinst" && $self->{_type} = "bundle") {
my ($name, $type) = (0, 0);
- my ($desc, $pass, $shell, $home, $group, $tmp);
+ my ($desc, $shell, $home, $group, $tmp);
if ($self->has_param("Group")) {
$tmp = $self->param("Group");
$tmp = &expand_percent($tmp, $self->{_expand});
- ($name, $desc, $pass) = split(/:/, $tmp);
+ ($name, $desc) = split(/:/, $tmp);
$type = "group";
} elsif ($self->has_param("User")) {
$tmp = $self->param("User");
$tmp = &expand_percent($tmp, $self->{_expand});
- ($name, $group, $desc, $pass, $shell, $home) =
+ ($name, $group, $desc, $shell, $home) =
split(/:/, $tmp);
$type = "user";
}
my $script = Fink::User->add_user_script($name, $type,
- $desc, $pass, $shell, $home, $group);
+ $desc, $shell, $home, $group);
if ($script) {
### Add $script to top of preinstscript
Index: User.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/Attic/User.pm,v
retrieving revision 1.1.2.15
retrieving revision 1.1.2.16
diff -u -d -r1.1.2.15 -r1.1.2.16
--- User.pm 11 Aug 2003 21:53:07 -0000 1.1.2.15
+++ User.pm 12 Aug 2003 02:08:41 -0000 1.1.2.16
@@ -105,7 +105,6 @@
my $name = shift;
my $type = shift;
my $desc = shift;
- my $pass = shift || "*";
my $shell = shift || "/usr/bin/false";
my $home = shift;
my $group = shift || $name;
@@ -116,6 +115,7 @@
my $chown = "/usr/sbin/chown";
my $mkdir = "/bin/mkdir -p";
+ my pass = "*";
my $script = "";
### FIXME need to figure a way ehre to get and set uids and gids, and
-------------------------------------------------------
This SF.Net email sponsored by: Free pre-built ASP.NET sites including
Data Reports, E-commerce, Portals, and Forums are available now.
Download today and enter to win an XBOX or Visual Studio .NET.
http://aspnet.click-url.com/go/psa00100003ave/direct;at.aspnet_072303_01/01
_______________________________________________
Fink-commits mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/fink-commits
