Changeset 169

Show
Ignore:
Timestamp:
04/08/08 10:30:50
Author:
dan
Message:

--

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • scout/branches/cdl_0master.pl

    r168 r169  
    28682868    }                     
    28692869  } 
    2870   my $strXMLPath = '';  
    2871   my $strDate = `date  +%Y-%m-%dT%H-%M-%S`; 
    2872   chomp( $strDate );       
    2873   $strXMLPath = "../sql/$strPlatformID-$strDate.kml"; 
    2874   obsKMLSubRoutines::BuildKMLFile( \%ObsHash, $strXMLPath ); 
     2870  #DWR 4/5/2008 
     2871  if( $bWriteobsKMLFile ) 
     2872  { 
     2873    my $strXMLPath = '';  
     2874    my $strDate = `date  +%Y-%m-%dT%H-%M-%S`; 
     2875    chomp( $strDate );       
     2876    $strXMLPath = "../sql/$strPlatformID-$strDate.kml"; 
     2877    obsKMLSubRoutines::BuildKMLFile( \%ObsHash, $strXMLPath ); 
     2878  } 
    28752879}