Bug fixing.

This commit is contained in:
salman 2011-05-10 14:31:38 +00:00
parent cb995d984d
commit 8a4214793c
4 changed files with 6 additions and 6 deletions

View File

@ -307,7 +307,7 @@ FUNCTIONS
$Data_Line =$Data_Line." ".$All{"Data1$NHist"}." ".$All{"Data2$NHist"};
}
if ($All{"t0$NHist"} ne $EMPTY) {
$T0_Line=$T0_Line." ".$All{"Data1$NHist"};
$T0_Line=$T0_Line." ".$All{"t0$NHist"};
}
$NHist++;
}

View File

@ -1,6 +1,6 @@
# Form implementation generated from reading ui file 'MuSRFit.ui'
#
# Created: Wed May 4 16:26:42 2011
# Created: Wed May 4 16:51:35 2011
# by: The PerlQt User Interface Compiler (puic)
#
# WARNING! All changes made in this file will be lost!
@ -3068,7 +3068,7 @@ sub NEW
MenuBar->insertSeparator( 8 );
languageChange();
my $resize = Qt::Size(582, 546);
my $resize = Qt::Size(582, 502);
$resize = $resize->expandedTo(minimumSizeHint());
resize( $resize );
clearWState( &Qt::WState_Polished );

View File

@ -9,7 +9,7 @@
<x>0</x>
<y>0</y>
<width>582</width>
<height>546</height>
<height>502</height>
</rect>
</property>
<property name="sizePolicy">

View File

@ -927,9 +927,9 @@ void MuSRFitform::t0UpdateClicked()
# First T0s
while ($FinHist) {
my $counter=0;
# (my $tmp,my @SplitT0) = split( /\s+/, $T0s[$counter]);
(my $tmp,my @SplitT0) = split( /\s+/, $T0s[$counter]);
(my $tmp,my @SplitBg) = split( /\s+/, $Bgs[$counter]);
# (my $tmp,my @SplitData) = split( /\s+/, $Datas[$counter]);
(my $tmp,my @SplitData) = split( /\s+/, $Datas[$counter]);
if ($#SplitBg>0) {
foreach (@SplitBg) {
print $_."\n";