From 4b1d0cfd48a6907b5ad1ad26fda675d11240f045 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 5 Feb 2004 14:21:00 +0000 Subject: remove "Quit" icon --- perl-install/diskdrake/dav.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/diskdrake') diff --git a/perl-install/diskdrake/dav.pm b/perl-install/diskdrake/dav.pm index 1f1008de1..5d00fb4aa 100644 --- a/perl-install/diskdrake/dav.pm +++ b/perl-install/diskdrake/dav.pm @@ -25,7 +25,7 @@ points, select \"New\".")) }, my $dav = $_; { label => $dav->{device}, val => $dav->{mntpoint}, clicked_may_quit => sub { config($in, $dav, $all_hds); 1 } } } @$davs), { val => N("New"), clicked_may_quit => sub { create($in, $all_hds); 1 } }, - { val => N("Quit"), icon => "exit", clicked_may_quit => sub { $quit = 1 } }, + { val => N("Quit"), clicked_may_quit => sub { $quit = 1 } }, ]); } until $quit; -- cgit v1.2.1