Changeset 3027

Timestamp:

2002-03-01T15:41:16+13:00 (22 years ago)

Author:

sjboddie

Message:

* empty log message *

File:

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

trunk/gsdl/bin/script/create_distributions.pl

@@ -760 +760 @@
     
     # edit fnord.cpp
-    my $fnord_file = &util::filename_cat ($tmpdir, "gsdl", "src", "w32server", "fnord.cpp");
-    open (FNORD, $fnord_file) || die;
-    $found = 0; $line = ""; $file = "";
-    while (defined ($line = <FNORD>)) {
-    if ($line =~ s/(\#define VERSIONSTRING \"version )x\.xx(\")/$1$version_num$2/) {
-        $found ++;
-    }
-    $file .= $line;
-    }
-    close FNORD;
-    if (!$found) {
-    die "error while editing $fnord_file\n";
-    } 
-    
-    open (FNORD, ">$fnord_file") || die;
-    print FNORD $file;
-    close FNORD;
+#    my $fnord_file = &util::filename_cat ($tmpdir, "gsdl", "src", "w32server", "fnord.cpp");
+#    open (FNORD, $fnord_file) || die;
+#    $found = 0; $line = ""; $file = "";
+#    while (defined ($line = <FNORD>)) {
+#   if ($line =~ s/(\#define VERSIONSTRING \"version )x\.xx(\")/$1$version_num$2/) {
+#       $found ++;
+#   }
+#   $file .= $line;
+#    }
+#    close FNORD;
+#    if (!$found) {
+#   die "error while editing $fnord_file\n";
+#    } 
+    
+#    open (FNORD, ">$fnord_file") || die;
+#    print FNORD $file;
+#    close FNORD;
 }