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"}; $Data_Line =$Data_Line." ".$All{"Data1$NHist"}." ".$All{"Data2$NHist"};
} }
if ($All{"t0$NHist"} ne $EMPTY) { if ($All{"t0$NHist"} ne $EMPTY) {
$T0_Line=$T0_Line." ".$All{"Data1$NHist"}; $T0_Line=$T0_Line." ".$All{"t0$NHist"};
} }
$NHist++; $NHist++;
} }

View File

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

View File

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

View File

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