Changeset 26544

Show
Ignore:
Timestamp:
30.11.2012 17:26:21 (7 years ago)
Author:
ak19
Message:

Changes to get-all-chunks to work for GS3 translation files again.

Files:
1 modified

Legend:

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

    r25285 r26544  
    9797]; 
    9898 
    99 my @gs3_interface_files = ("AbstractBrowse", "AbstractGS2FieldSearch", "Authentication", "CrossCollectionSearch", "GATEServices", "GS2Construct", "GS2LuceneSearch", "interface_default", "interface_nzdl", "IViaSearch", "LuceneSearch", "MapRetrieve", "MapSearch", "metadata_names", "PhindPhraseBrowse", "QBRWebServicesHelp", "Visualizer"); 
     99my @gs3_interface_files = ("AbstractBrowse", "AbstractGS2FieldSearch", "AbstractSearch", "Authentication", "CrossCollectionSearch", "GATEServices", "GS2Construct", "GS2LuceneSearch",  "interface_basic", "interface_basic2", "interface_default", "interface_default2", "interface_nzdl", "IViaSearch", "LuceneSearch", "MapRetrieve", "MapSearch", "metadata_names", "PhindPhraseBrowse", "QBRWebServicesHelp", "SharedSoleneGS2FieldSearch", "Visualizer"); 
     100# i18n (,log4j)? 
    100101 
    101102 
     
    106107    my @gti_command_arguments = @_; 
    107108    my $module = $_[1]; 
     109 
     110    # for GS3, set gsdl_root_dir to GSDL3HOME 
     111    if($module eq "gs3interface"){ 
     112    $gsdl_root_directory = (defined $ENV{'GSDL3HOME'}) ? $ENV{'GSDL3HOME'} : &util::filename_cat($ENV{'GSDL3SRCHOME'}, "web"); 
     113    $gti_log_file = &util::filename_cat($gsdl_root_directory, "logs", "gti.log"); 
     114    } 
    108115     
    109116    # Open the GTI log file for appending, or write to STDERR if that fails 
     
    123130    if ($gti_command =~ /^get-all-chunks$/i) { 
    124131        # Check that GS3 interface is the target 
    125         if ($module eq "gs3interface") {        
     132        if ($module eq "gs3interface") { 
    126133            print &get_all_chunks_for_gs3(@gti_command_arguments); 
    127134        } else { 
     
    18791886    $source_files_key_to_gti_comment_mapping, $target_files_key_to_gti_comment_mapping) = @_; 
    18801887     
    1881     my $source_file_directory = "greenstone3"; 
     1888    my $source_file_directory = &util::filename_cat("WEB-INF","classes"); # my $source_file_directory = "greenstone3"; 
    18821889    my $translation_file_type = "resource_bundle"; 
    18831890