diff options
author | Thierry Vignaud <tv@mandriva.org> | 2008-03-04 23:26:26 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2008-03-04 23:26:26 +0000 |
commit | 5d5bbe030dd56ef04900ef6ade7a63c6dbae1f39 (patch) | |
tree | 3646ccf273070069270216af8d7733e950ac19a6 /Rpmdrake/init.pm | |
parent | ab33211db20a80f494950231098bba1ab5f8ba7d (diff) | |
download | rpmdrake-5d5bbe030dd56ef04900ef6ade7a63c6dbae1f39.tar rpmdrake-5d5bbe030dd56ef04900ef6ade7a63c6dbae1f39.tar.gz rpmdrake-5d5bbe030dd56ef04900ef6ade7a63c6dbae1f39.tar.bz2 rpmdrake-5d5bbe030dd56ef04900ef6ade7a63c6dbae1f39.tar.xz rpmdrake-5d5bbe030dd56ef04900ef6ade7a63c6dbae1f39.zip |
handle priority upgrade list
Diffstat (limited to 'Rpmdrake/init.pm')
-rw-r--r-- | Rpmdrake/init.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Rpmdrake/init.pm b/Rpmdrake/init.pm index eeb14f10..06415980 100644 --- a/Rpmdrake/init.pm +++ b/Rpmdrake/init.pm @@ -37,8 +37,11 @@ our @EXPORT = qw(init $changelog_first $default_list_mode %rpmdrake_options + @ARGV_copy ); +our @ARGV_copy = @ARGV; + BEGIN { #- we want to run this code before the Gtk->init of the use-my_gtk my $basename = sub { local $_ = shift; s|/*\s*$||; s|.*/||; $_ }; any { /^--?h/ } @ARGV and do { |