Changeset 28755

Show
Ignore:
Timestamp:
09.12.2013 18:41:35 (6 years ago)
Author:
ak19
Message:

First set of adjustments to get spreadsheets generated for the gs3interface translation module.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/bin/script/gti.pl

    r28518 r28755  
    120120    # for GS3, set gsdl_root_dir to GSDL3HOME 
    121121    if($module eq "gs3interface"){ 
    122     $gsdl_root_directory = (defined $ENV{'GSDL3HOME'}) ? $ENV{'GSDL3HOME'} : &util::filename_cat($ENV{'GSDL3SRCHOME'}, "web"); 
    123     $gti_log_file = &util::filename_cat($gsdl_root_directory, "logs", "gti.log"); 
     122    if($ENV{'GSDL3SRCHOME'}) { 
     123        $gsdl_root_directory = (defined $ENV{'GSDL3HOME'}) ? $ENV{'GSDL3HOME'} : &util::filename_cat($ENV{'GSDL3SRCHOME'}, "web"); 
     124        $gti_log_file = &util::filename_cat($gsdl_root_directory, "logs", "gti.log"); 
     125    } 
    124126    } 
    125127     
     
    331333    my ($source_file, $target_file, $translation_file_type) 
    332334    = &get_translation_configuration($target_language_code, $translation_file_key); 
    333      
     335 
    334336    # Parse the source language and target language files 
    335337    my $source_file_path = &util::filename_cat($gsdl_root_directory, $source_file); 
     
    18271829        &throw_fatal_error("Missing command argument."); 
    18281830    } 
    1829      
     1831 
    18301832    my %source_files_key_to_text_mapping = (); 
    18311833    my %target_files_key_to_text_mapping = (); 
     
    19001902    $source_files_key_to_gti_comment_mapping, $target_files_key_to_gti_comment_mapping) = @_; 
    19011903     
    1902     my $source_file_directory = &util::filename_cat("WEB-INF","classes"); # my $source_file_directory = "greenstone3"; 
     1904    my $source_file_directory = "greenstone3";  # my $source_file_directory = &util::filename_cat("WEB-INF","classes");  
    19031905    my $translation_file_type = "resource_bundle"; 
    19041906