Fixed closing root canvas issue using WaitPrimitive trick.
This commit is contained in:
@ -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);
|
||||
}
|
||||
}
|
||||
|
||||
|
Reference in New Issue
Block a user