aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--rpmdrake.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/rpmdrake.pm b/rpmdrake.pm
index 69b7644b..37e6d700 100644
--- a/rpmdrake.pm
+++ b/rpmdrake.pm
@@ -180,6 +180,7 @@ sub getbanner() {
sub interactive_msg {
my ($title, $contents, %options) = @_;
+ local $::isEmbedded;
my $d = ugtk2->new($title, grab => 1, if_(exists $options{transient}, transient => $options{transient}));
$d->{rwindow}->set_position($options{transient} ? 'center_on_parent' : 'center_always');
$contents = formatAlaTeX($contents) unless $options{scroll}; #- because we'll use a WrappedLabel
@@ -302,6 +303,7 @@ sub fatal_msg {
sub wait_msg {
my ($msg, %options) = @_;
gtkflush();
+ local $::isEmbedded;
my $mainw = ugtk2->new(N("Please wait"), grab => 1, if_(exists $options{transient}, transient => $options{transient}));
$mainw->{real_window}->set_position($options{transient} ? 'center_on_parent' : 'center_always');
my $label = ref($msg) =~ /^Gtk/ ? $msg : Gtk2::WrappedLabel->new($msg);