Changeset 21259 for gs3-extensions

Timestamp:

2009-12-04T13:30:10+13:00 (14 years ago)

Author:

davidb

Message:

need use PHAROSIS_SRC_HOME not PHAROSIS_HOME

Location:

gs3-extensions/pharos/trunk/bin/script

Files:

• pharos-imageis-add.pl (modified) (3 diffs)
• pharos-imageis-delete.pl (modified) (3 diffs)
• pharos-imageis-identify.pl (modified) (1 diff)
• pharos-imageis-query.pl (modified) (3 diffs)

gs3-extensions/pharos/trunk/bin/script/pharos-imageis-add.pl

@@ -29 +29 @@
     die "GSDLHOME not set\n" unless defined $ENV{'GSDLHOME'};
     die "GSDLOS not set\n" unless defined $ENV{'GSDLOS'};
-    die "PHAROSIS_HOME not set\n" unless defined $ENV{'PHAROSIS_HOME'};
+    die "PHAROSIS_SRC_HOME not set\n" unless defined $ENV{'PHAROSIS_SRC_HOME'};
     unshift (@INC, "$ENV{'GSDLHOME'}/perllib");
 }
@@ -93 +93 @@
     
     my $add_template_filename
-    = &util::filename_cat($ENV{'PHAROSIS_HOME'},"resources", "templates","add_file.xml");
+    = &util::filename_cat($ENV{'PHAROSIS_SRC_HOME'},"resources", "templates","add_file.xml");
     my $add_this_filename = &util::filename_cat($tmp_dir,"add_file.xml");
     
@@ -124 +124 @@
     
     
-    my $jar_filename = &util::filename_cat($ENV{'PHAROSIS_HOME'},"ImageIS.jar");
+    my $jar_filename = &util::filename_cat($ENV{'PHAROSIS_SRC_HOME'},"ImageIS.jar");
     my $java_cmd = "java -jar \"$jar_filename\" \"$add_this_filename\"";
     #my $java_cmd = "java -cp /research/kjdon/home/pharos-greenstone3/ext/pharos/decompiled:/research/kjdon/home/pharos-greenstone3/ext/pharos/cmdline-api-srcpack/ImageIS.jar:/research/kjdon/home/pharos-greenstone3/ext/pharos MyImageIS $add_this_filename";

gs3-extensions/pharos/trunk/bin/script/pharos-imageis-delete.pl

@@ -29 +29 @@
     die "GSDLHOME not set\n" unless defined $ENV{'GSDLHOME'};
     die "GSDLOS not set\n" unless defined $ENV{'GSDLOS'};
-    die "PHAROSIS_HOME not set\n" unless defined $ENV{'PHAROSIS_HOME'};
+    die "PHAROSIS_SRC_HOME not set\n" unless defined $ENV{'PHAROSIS_SRC_HOME'};
     unshift (@INC, "$ENV{'GSDLHOME'}/perllib");
 }
@@ -66 +66 @@
     
     my $del_template_filename
-    = &util::filename_cat($ENV{'PHAROSIS_HOME'},"resources", "templates","del_id.xml");
+    = &util::filename_cat($ENV{'PHAROSIS_SRC_HOME'},"resources", "templates","del_id.xml");
     my $del_this_filename = &util::filename_cat($tmp_dir,"del_id.xml");
     
@@ -97 +97 @@
     
     
-    my $jar_filename = &util::filename_cat($ENV{'PHAROSIS_HOME'},"ImageIS.jar");
+    my $jar_filename = &util::filename_cat($ENV{'PHAROSIS_SRC_HOME'},"ImageIS.jar");
     my $java_cmd = "java -jar \"$jar_filename\" \"$del_this_filename\"";
 

gs3-extensions/pharos/trunk/bin/script/pharos-imageis-identify.pl

@@ -29 +29 @@
     die "GSDLHOME not set\n" unless defined $ENV{'GSDLHOME'};
     die "GSDLOS not set\n" unless defined $ENV{'GSDLOS'};
-    die "PHAROSIS_HOME not set\n" unless defined $ENV{'PHAROSIS_HOME'};
+    die "PHAROSIS_SRC_HOME not set\n" unless defined $ENV{'PHAROSIS_SRC_HOME'};
     unshift (@INC, "$ENV{'GSDLHOME'}/perllib");
 }

gs3-extensions/pharos/trunk/bin/script/pharos-imageis-query.pl

@@ -29 +29 @@
     die "GSDLHOME not set\n" unless defined $ENV{'GSDLHOME'};
     die "GSDLOS not set\n" unless defined $ENV{'GSDLOS'};
-    die "PHAROSIS_HOME not set\n" unless defined $ENV{'PHAROSIS_HOME'};
+    die "PHAROSIS_SRC_HOME not set\n" unless defined $ENV{'PHAROSIS_SRC_HOME'};
     unshift (@INC, "$ENV{'GSDLHOME'}/perllib");
 }
@@ -65 +65 @@
     
     my $query_template_filename
-    = &util::filename_cat($ENV{'PHAROSIS_HOME'},"resources","templates","query_id.xml");
+    = &util::filename_cat($ENV{'PHAROSIS_SRC_HOME'},"resources","templates","query_id.xml");
     my $query_this_filename = &util::filename_cat($tmp_dir,"query_id.xml");
     
@@ -96 +96 @@
     
     
-    my $jar_filename = &util::filename_cat($ENV{'PHAROSIS_HOME'},"ImageIS.jar");
+    my $jar_filename = &util::filename_cat($ENV{'PHAROSIS_SRC_HOME'},"ImageIS.jar");
     my $java_cmd = "java -jar \"$jar_filename\" \"$query_this_filename\"";