Changeset 6813 for trunk/gsdl/bin/script/exportcol.pl

Timestamp:

2004-02-17T10:12:11+13:00 (20 years ago)

Author:

mdewsnip

Message:

Additions for the GsdlCollageApplet: a classifier that displays a collage of the images in a collection. By Katrina Edgar (kde2).

File:

• trunk/gsdl/bin/script/exportcol.pl (modified) (3 diffs)

trunk/gsdl/bin/script/exportcol.pl

@@ -273 +273 @@
     my $win32sdir = &util::filename_cat ($ENV{'GSDLHOME'}, "bin", "windows", "Win32s");
     my $phindjar = &util::filename_cat ($ENV{'GSDLHOME'}, "bin", "java", "Phind.jar");
+    my $gsdlcollageappletjar = &util::filename_cat ($ENV{'GSDLHOME'}, "bin", "java", "GsdlCollageApplet.jar");
 
     if ((!-d $imagesdir) || (!-d $macrosdir) || (!-d $mappingsdir) || (!-e $maincfg) ||
     (!-e $serverexe) || (!-e $gssetupexe) || (!-e $setupexe) || (!-d $net32dir) ||
-    (!-d $net16dir) || (!-d $netscapedir) || (!-d $win32sdir) || (!-e $phindjar)) {
+    (!-d $net16dir) || (!-d $netscapedir) || (!-d $win32sdir) || (!-e $phindjar) ||
+    (!-e $gsdlcollageappletjar)) {
     &gsprintf($out, "{exportcol.fail}");
     &gsprintf($out, "{exportcol.non_exist_files}\n");
@@ -291 +293 @@
     print $out "  $win32sdir\n";
     print $out "  $phindjar\n";
+    print $out "  $gsdlcollageappletjar\n";
     die "\n";
     }
@@ -306 +309 @@
     &util::cp_r ($win32sdir, $topdir);
     &util::cp ($phindjar, $binjavadir);
+    &util::cp ($gsdlcollageappletjar, $binjavadir);
 
     # now change the home.dm macro file to a simple version