Changeset 6167 for trunk

Timestamp:

2003-12-08T16:51:37+13:00 (20 years ago)

Author:

mdewsnip

Message:

GLI scripts are now made executable.

File:

• trunk/gsdl/bin/script/create_distributions.pl (modified) (2 diffs)

trunk/gsdl/bin/script/create_distributions.pl

@@ -493 +493 @@
     # Don't need Windows utilities
     &util::rm_r(&util::filename_cat($target_dir, "gli", "winutil"));
+
+    # Make Unix scripts executable
+    my $clean_sh = &util::filename_cat($target_dir, "gli", "clean.sh");
+    `chmod a+x $clean_sh`;
+    my $document_sh = &util::filename_cat($target_dir, "gli", "document.sh");
+    `chmod a+x $document_sh`;
+    my $gli_sh = &util::filename_cat($target_dir, "gli", "gli.sh");
+    `chmod a+x $gli_sh`;
+    my $makegli_sh = &util::filename_cat($target_dir, "gli", "makegli.sh");
+    `chmod a+x $makegli_sh`;
     }
 
@@ -557 +567 @@
     &util::cp_r ($winbin, $winbindir);
 
-    if (!$cd_rom) {
+    # if (!$cd_rom) {
     # &util::rm_r (&util::filename_cat ($winbindir, "windows", "net16"));
     # &util::rm_r (&util::filename_cat ($winbindir, "windows", "net32"));
-    &util::rm_r (&util::filename_cat ($winbindir, "windows", "Win32s"));
-    &util::rm_r (&util::filename_cat ($winbindir, "windows", "netscape"));
-    }
+    # &util::rm_r (&util::filename_cat ($winbindir, "windows", "Win32s"));
+    # &util::rm_r (&util::filename_cat ($winbindir, "windows", "netscape"));
+    # }
 
     # make sure there aren't any CVS directories laying around