- Timestamp:
- 2018-11-19T13:42:05+13:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/bin/script/incremental-buildcol.pl
r26567 r32611 92 92 exit -1; 93 93 } 94 95 if (!defined $build_dir) {96 # Yes this is intentional that 'build_dir' points to "index"97 $build_dir = &util::filename_cat ($ENV{'GSDLCOLLECTDIR'},"index");98 push(@filtered_argv,"-builddir",$build_dir);99 }100 101 my $quoted_argv = join(" ", map { "\"$_\"" } @filtered_argv);102 94 103 95 my $buildcol_cmd = "\"".&util::get_perl_exec()."\" -S buildcol.pl"; … … 120 112 $build_cfg_filename = &util::filename_cat($build_dir, "buildConfig.xml"); 121 113 } 122 114 115 # do we actually want to be incremental? 116 my $is_incremental = 1; 123 117 if (-e $build_cfg_filename) { 124 118 … … 132 126 print STDERR "*****\n"; 133 127 $buildcol_cmd .= " -removeold"; 128 $is_incremental = 0; 134 129 } 135 130 else { … … 144 139 print STDERR "*****\n"; 145 140 $buildcol_cmd .= " -removeold"; 141 $is_incremental = 0; 146 142 } 147 143 148 144 # if we actually are incremental, then set builddir to index. 145 if (!defined $build_dir && $is_incremental) { 146 # Yes this is intentional that 'build_dir' points to "index" 147 $build_dir = &util::filename_cat ($ENV{'GSDLCOLLECTDIR'},"index"); 148 push(@filtered_argv,"-builddir",$build_dir); 149 } 150 151 my $quoted_argv = join(" ", map { "\"$_\"" } @filtered_argv); 152 149 153 $buildcol_cmd .= " $quoted_argv \"$collection\""; 150 154
Note:
See TracChangeset
for help on using the changeset viewer.