| # | Line 12 | Line 12 | my $td = tempdir( CLEANUP => 0 ); | |
|---|---|---|
| 12 | my $octree = "$td/bv$$.oct"; | |
| 13 | my $ambf = "$td/af$$.amb"; | |
| 14 | my $raddev = "x11"; # default output device. Overwrite with -o | |
| 15 | < | my $qual = "Low"; |
| 15 | > | my $qual = "Med"; |
| 16 | my $usetrad = 0; | |
| 17 | ||
| 18 | my $opts = ""; # Options common to rad | |
| # | Line 118 | Line 118 | EndOfRif | |
| 118 | close(FH); | |
| 119 | ||
| 120 | if ($usetrad) { | |
| 121 | < | system "trad $rif"; |
| 121 | > | system "rad -v 0 $rif ; trad $rif"; |
| 122 | } else { | |
| 123 | system "rad -o $raddev $opts $rif"; | |
| 124 | } | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |