msb/deps/system-tools-backends/fix-user-module.patch
Willy Sudiarto Raharjo 4cf96af8b9 system-tools-backends: Fix user module.
Signed-off-by: Willy Sudiarto Raharjo <willysr@slackware-id.org>
2015-01-14 21:28:05 +07:00

34 lines
1.2 KiB
Diff

--- system-tools-backends-2.10.2/SelfConfig.pm.orig 2015-01-14 21:14:11.499164540 +0700
+++ system-tools-backends-2.10.2/SelfConfig.pm 2015-01-14 21:15:28.974094285 +0700
@@ -30,7 +30,8 @@
my $OBJECT_PATH = "$Utils::Backend::DBUS_PATH/$OBJECT_NAME";
# user is only allowed to change his own GECOS fields, locale, location
-my $format = [ "uint32", [ "array", "string" ], "string", "string" ];
+my $get_format = [ [ "array", "string" ], "string", "string" ];
+my $set_format = [ "uint32", [ "array", "string" ], "string", "string" ];
sub new
{
@@ -43,8 +44,8 @@
}
# UID is filled by dispatcher
-dbus_method ("get", "uint32", $format);
-dbus_method ("set", $format, []);
+dbus_method ("get", [ "uint32" ], $get_format);
+dbus_method ("set", $set_format, []);
sub get
{
--- system-tools-backends-2.10.2/Users/Users.pm.orig 2015-01-14 21:15:49.530810417 +0700
+++ system-tools-backends-2.10.2/Users/Users.pm 2015-01-14 21:16:26.373301774 +0700
@@ -838,7 +838,7 @@
foreach $user (@$users)
{
next if ($uid != $$user[$UID]);
- return ($$user[$COMMENT], $$user[$LOCALE]);
+ return ($$user[$COMMENT], $$user[$LOCALE], $$user[$LOCATION]);
}
return ([""], "");