Fixed closing root canvas issue using WaitPrimitive trick.

This commit is contained in:
2010-03-02 16:55:07 +00:00
parent 828b8ddd15
commit e14dd7303a
3 changed files with 31 additions and 25 deletions

View File

@ -622,20 +622,19 @@ void TrimSPGUI::PlotProfiles()
my $filenames=join(",",@files);
if ($filenames ne "" ) {
my $Warning = Qt::MessageBox::information( this, "Big Fat Warning",
"Warning:\nClose the plot using the menu FILE -> Quit ROOT\nDO NOT CLOSE USING X.");
# my $Warning = Qt::MessageBox::information( this, "Big Fat Warning",
# "Warning:\nClose the plot using the menu FILE -> Quit ROOT\nDO NOT CLOSE USING X.");
# Now that we have the file list send it to root macro for plotting.
my $cmd='root -n -l "plotRge.C(\"'.$filenames.'\")"';
my $cmd='root -n -l "plotRge.C(\"'.$filenames.'\")"&';
# my $pid = open(FTO,"$cmd");
my $pid = open(FTO,"$cmd 2>&1 |");
print "PID=$pid\n";
while (<FTO>) {
print "$_";
}
close(FTO);
# my $pid=system($cmd);
# my $pid = open(FTO,"$cmd 2>&1 |");
# print "PID=$pid\n";
# while (<FTO>) {
# print "$_";
# }
# close(FTO);
my $pid=system($cmd);
}
}