From fad444b8e4c07b926e034329b323a5f98a9f3edd Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 8 Oct 2008 15:00:29 +0000 Subject: (upgrade) prevent upgrading more than once at a time --- mdkapplet | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'mdkapplet') diff --git a/mdkapplet b/mdkapplet index cf1412d2..10163848 100755 --- a/mdkapplet +++ b/mdkapplet @@ -436,7 +436,11 @@ sub confirm_upgrade() { $res; } +my $already_in_upgrade; sub upgrade() { + return if $already_in_upgrade; + $already_in_upgrade = 1; + my $_a = before_leaving { undef $already_in_upgrade }; return if !confirm_upgrade(); logIt("backuping urpmi configuration"); cp_af("$root/etc/urpmi/urpmi.cfg", "$ENV{HOME}/urpmi.cfg.backup." . int(rand 100000)); -- cgit v1.2.1