diff options
Diffstat (limited to 'rpmdrake.pm')
| -rw-r--r-- | rpmdrake.pm | 5 |
1 files changed, 5 insertions, 0 deletions
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; |