From: curt <curt>
Date: Wed, 22 Jul 1998 21:46:09 +0000 (+0000)
Subject: minor tweaks.
X-Git-Url: https://git.mxchange.org/?a=commitdiff_plain;h=d8c9c07659151c572d8cfe6b903124b37c3b4f59;p=flightgear.git

minor tweaks.
---

diff --git a/Tools/process-dem.pl b/Tools/process-dem.pl
index a7d3976b1..2f9f72be9 100755
--- a/Tools/process-dem.pl
+++ b/Tools/process-dem.pl
@@ -68,7 +68,7 @@ while ( $dem_file = shift(@ARGV) ) {
     if ( $do_dem2node ) {
 	dem2node() ;
     } else {
-	$subdir = "./work/Scenery/w100n040/w094n045";
+	$subdir = "./work/Scenery/w120n030/w111n033";
 	print "WARNING:  Hardcoding subdir = $subdir\n";
     }
 
@@ -153,11 +153,11 @@ sub triangle_1 {
 	    $fileroot = $file;
 	    $fileroot =~ s/\.node$//;
 	    print "$subdir/$fileroot\n";
+	    $command = "Triangle/triangle";
 	    if ( -r "$subdir/$fileroot.poly" ) {
-		$command = "Triangle/triangle -pc -a$max_area -q5 $subdir/$fileroot";
-	    } else {
-		$command = "Triangle/triangle -c -a$max_area -q5 $subdir/$file";
+		$command = " -pc";
 	    }
+	    $command .= " -a$max_area -q10 $subdir/$file";
 	    $command = fix_command($command);
 	    print "Running '$command'\n";
 	    open(OUT, "$command |");
@@ -185,7 +185,7 @@ sub fixnode {
     $command = "FixNode/fixnode $dem_file $subdir";
     $command = fix_command($command);
     print "Running '$command'\n";
-    open(OUT, "$command |");
+    open(OUT, "$command |") || die "cannot run command\n";
     while ( <OUT> ) {
 	print $_;
     }
@@ -287,7 +287,7 @@ sub triangle_2 {
 	    if ( -r "$subdir/$base.poly" ) {
 		$command .= " -pc $subdir/$base";
 	    } else {
-		$command .= " -c $subdir/$file";
+		$command .= " $subdir/$file";
 	    }
 
 	    $command = fix_command($command);
@@ -454,6 +454,9 @@ sub install {
 
 #---------------------------------------------------------------------------
 # $Log$
+# Revision 1.25  1998/07/22 21:46:09  curt
+# minor tweaks.
+#
 # Revision 1.24  1998/07/21 04:33:47  curt
 # More tweaks for sub-area cutouts.
 #