aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xrpmdrake2
-rw-r--r--rpmdrake.pm5
2 files changed, 5 insertions, 2 deletions
diff --git a/rpmdrake b/rpmdrake
index 4c15de49..7304214f 100755
--- a/rpmdrake
+++ b/rpmdrake
@@ -50,9 +50,7 @@ our $w;
my $treeview_dialog_run = 0;
our $statusbar;
-sub interactive_list_ { interactive_list(@_, if_($::main_window, transient => $::main_window)) }
sub wait_msg_with_banner { push @_, banner => 1 if $::isEmbedded && !$treeview_dialog_run; &statusbar_msg }
-sub interactive_msg_with_banner { push @_, banner => 1 if $::isEmbedded; &interactive_msg }
warn_about_user_mode();
diff --git a/rpmdrake.pm b/rpmdrake.pm
index e5c9d89a..a6ac9520 100644
--- a/rpmdrake.pm
+++ b/rpmdrake.pm
@@ -61,6 +61,8 @@ our @EXPORT = qw(
interactive_msg
interactive_packtable
interactive_list
+ interactive_list_
+ interactive_msg_with_banner
fatal_msg
getbanner
wait_msg
@@ -297,6 +299,9 @@ sub interactive_list {
$choice;
}
+sub interactive_list_ { interactive_list(@_, if_($::main_window, transient => $::main_window)) }
+sub interactive_msg_with_banner { push @_, banner => 1 if $::isEmbedded; &interactive_msg }
+
sub fatal_msg {
interactive_msg @_;
myexit -1;