From 517566b9f173245938b855f8a928b2ba7d12a7c7 Mon Sep 17 00:00:00 2001
From: Julian Blake Kongslie <jblake@omgwallhack.org>
Date: Thu, 18 Mar 2010 16:57:13 -0700
Subject: Hardcode some paths.
---
usr/src/libpiny/debian/changelog | 3 ++-
usr/src/libpiny/lib/Piny/Group.pm | 4 ++--
2 files changed, 4 insertions(+), 3 deletions(-)
(limited to 'usr/src/libpiny')
diff --git a/usr/src/libpiny/debian/changelog b/usr/src/libpiny/debian/changelog
index bd74a64..222d361 100644
--- a/usr/src/libpiny/debian/changelog
+++ b/usr/src/libpiny/debian/changelog
@@ -5,8 +5,9 @@ libpiny-perl (0.3-1) unstable; urgency=low
* Add some more type constraints.
* Fix a bug in the username detection.
* Forbid purely-numeric usernames.
+ * Use fixed paths to reach adduser and deluser.
- -- Julian Blake Kongslie <jblake@omgwallhack.org> Thu, 18 Mar 2010 13:51:47 -0700
+ -- Julian Blake Kongslie <jblake@omgwallhack.org> Thu, 18 Mar 2010 16:56:24 -0700
libpiny-perl (0.2-1) unstable; urgency=low
diff --git a/usr/src/libpiny/lib/Piny/Group.pm b/usr/src/libpiny/lib/Piny/Group.pm
index c1df42d..a4d3c27 100644
--- a/usr/src/libpiny/lib/Piny/Group.pm
+++ b/usr/src/libpiny/lib/Piny/Group.pm
@@ -41,7 +41,7 @@ sub add_member {
my ( $s, @users ) = @_;
foreach my $user ( @users ) {
- system( "adduser", $user->username( ), $s->groupname( ) );
+ system( "/usr/sbin/adduser", $user->username( ), $s->groupname( ) );
$user->clear_groups( );
};
@@ -52,7 +52,7 @@ sub remove_member {
my ( $s, @users ) = @_;
foreach my $user ( @users ) {
- system( "deluser", $user->username( ), $s->groupname( ) );
+ system( "/usr/sbin/deluser", $user->username( ), $s->groupname( ) );
$user->clear_groups( );
};
--
cgit v1.2.3