summaryrefslogtreecommitdiffstats
path: root/bin
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.com>2008-04-03 08:21:45 +0000
committerOlivier Blin <oblin@mandriva.com>2008-04-03 08:21:45 +0000
commite7e66b406e613a296417a0e18b280579527f6607 (patch)
tree2a8537ff136f80acecec13f4ed59e25195f47a75 /bin
parent73bb5ccde5f26b77599acb1c83b0ff130ba98255 (diff)
downloaddrakguard-e7e66b406e613a296417a0e18b280579527f6607.tar
drakguard-e7e66b406e613a296417a0e18b280579527f6607.tar.gz
drakguard-e7e66b406e613a296417a0e18b280579527f6607.tar.bz2
drakguard-e7e66b406e613a296417a0e18b280579527f6607.tar.xz
drakguard-e7e66b406e613a296417a0e18b280579527f6607.zip
use more generic function names
Diffstat (limited to 'bin')
-rwxr-xr-xbin/drakguard10
1 files changed, 5 insertions, 5 deletions
diff --git a/bin/drakguard b/bin/drakguard
index e5758b2..6717012 100755
--- a/bin/drakguard
+++ b/bin/drakguard
@@ -166,7 +166,7 @@ gtkadd($w->{window},
gtknew('Button', text => N("Add"), clicked => sub {
my $text = $entry->get_text;
$text =~ s,^[^:]+://,,g; #- strip protocol
- list_add_addr($url_list->{list}, $text);
+ list_add_entry($url_list->{list}, $text);
$entry->set_text("");
}),
]),
@@ -191,7 +191,7 @@ Gtk2->main;
$w->exit(0);
-sub list_add_addr {
+sub list_add_entry {
my ($list, @addr) = @_;
foreach my $a (@addr) {
push @{$list->{data}}, $a
@@ -199,7 +199,7 @@ sub list_add_addr {
}
}
-sub list_remove_addr {
+sub list_remove_entry {
my ($list, @addr) = @_;
#- workaround buggy Gtk2::SimpleList array abstraction, it destroys references
@{$list->{data}} = map { member($_->[0], @addr) ? () : [ @$_ ] } @{$list->{data}};
@@ -212,11 +212,11 @@ sub list_get_selected {
sub list_remove_selected {
my ($list) = @_;
- list_remove_addr($list, list_get_selected($list));
+ list_remove_entry($list, list_get_selected($list));
}
sub add_user {
- list_add_addr($users_list, list_get_selected($allusers_list));
+ list_add_entry($users_list, list_get_selected($allusers_list));
}
sub remove_user {