From c48da8d41174c5f9ecc5edfad9da64f24a666aa2 Mon Sep 17 00:00:00 2001 From: Eric Bollengier Date: Thu, 17 Aug 2006 21:18:07 +0000 Subject: [PATCH] ebl display message when bweb not found git-svn-id: https://bacula.svn.sourceforge.net/svnroot/bacula/trunk@3301 91ce42f0-d328-0410-95d8-f526ca767f89 --- gui/brestore/brestore.pl | 15 ++++++++++++--- 1 file changed, 12 insertions(+), 3 deletions(-) diff --git a/gui/brestore/brestore.pl b/gui/brestore/brestore.pl index ff107a4b32..fbe56b1e44 100755 --- a/gui/brestore/brestore.pl +++ b/gui/brestore/brestore.pl @@ -271,7 +271,16 @@ sub show_job { my ($self, $client, $jobid) = @_; - $self->{pref}->go_bweb("?action=dsp_cur_job;jobid=$jobid;client=$client", "view job status"); + my $ret = $self->{pref}->go_bweb("?action=dsp_cur_job;jobid=$jobid;client=$client", "view job status"); + + if ($ret == -1) { + my $widget = Gtk2::MessageDialog->new(undef, 'modal', 'info', 'close', +"Your job have been submited to bacula. +To follow it, you must use bconsole (or install/configure bweb)"); + $widget->run; + $widget->destroy(); + } + $self->on_cancel_resto_clicked(); } @@ -567,13 +576,13 @@ sub go_bweb unless ($self->{mozilla} and $self->{bweb}) { new DlgWarn("You must install Bweb and set your mozilla bin to $msg"); - return; + return -1; } system("$self->{mozilla} -remote 'Ping()'"); if ($? != 0) { new DlgWarn("Warning, you must have a running $self->{mozilla} to $msg"); - return; + return 0; } my $cmd = "$self->{mozilla} -remote 'OpenURL($self->{bweb}$url,new-tab)'" ; -- 2.39.5