diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-01-21 07:02:12 +0100 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-01-21 07:03:55 +0100 |
| commit | 51b9492dab4d6523fa888d70d940acfaa3c543d1 (patch) | |
| tree | c0c753a62e2ebbb40ed888e0202c9398e88ade6c /perl-install/install/any.pm | |
| parent | 85c858b393b399d21a02f1485fb1533f39ce5e35 (diff) | |
| download | drakx-51b9492dab4d6523fa888d70d940acfaa3c543d1.tar drakx-51b9492dab4d6523fa888d70d940acfaa3c543d1.tar.gz drakx-51b9492dab4d6523fa888d70d940acfaa3c543d1.tar.bz2 drakx-51b9492dab4d6523fa888d70d940acfaa3c543d1.tar.xz drakx-51b9492dab4d6523fa888d70d940acfaa3c543d1.zip | |
do not warn if a screenshot already has been taked (mga#11176)
as help runs in a one shot process, it doesn't remember the warning has
already been done
Diffstat (limited to 'perl-install/install/any.pm')
| -rw-r--r-- | perl-install/install/any.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm index 9bad240c2..63b1d0316 100644 --- a/perl-install/install/any.pm +++ b/perl-install/install/any.pm @@ -1392,6 +1392,9 @@ sub take_screenshot { $nb++ while -e "$dir/$nb.png"; system('fb2png', '/dev/fb0', "$dir/$nb.png", '0'); + # help doesn't remember warning has been shown (one shot processes): + $warned ||= -e "$dir/1.png"; + if (!$warned && !$nowarn) { $warned = 1; $in->ask_warn('', N("Screenshots will be available after install in %s", "/root/DrakX-screenshots")); |