Changeset 5849

Timestamp:

2003-11-14T15:22:36+13:00 (20 years ago)

Author:

kjdon

Message:

now this replaces home.dm with exported_home.dm, a much simpler version suitable for cd. not so nice cos it ignores any changes the user has made to their home page :-(

File:

• trunk/gsdl/bin/script/exportcol.pl (modified) (1 diff)

trunk/gsdl/bin/script/exportcol.pl

@@ -186 +186 @@
     &util::cp ($phindjar, $binjavadir);
 
+    # now change the home.dm macro file to a simple version
+    my $newmacrodir = &util::filename_cat ($gsdldir, "macros");
+    my $exporthome = &util::filename_cat ($newmacrodir, "exported_home.dm");
+    my $oldhome = &util::filename_cat ($newmacrodir, "home.dm");
+    if (-e $exporthome) {
+    &util::rm($oldhome);
+    &util::mv($exporthome, $oldhome);
+    }
+
     # copy the collection itself
     my $thiscoldir = &util::filename_cat ($collectdir, $collection);