Commit | Line | Data |
---|---|---|
ab2299b2 FF |
1 | diff -u -r ../netpbm-advanced-r3084/buildtools/installnetpbm.pl ./buildtools/installnetpbm.pl |
2 | --- ../netpbm-advanced-r3084/buildtools/installnetpbm.pl 2017-10-06 07:49:15.000000000 +0200 | |
3 | +++ ./buildtools/installnetpbm.pl 2017-10-06 12:18:07.809552955 +0200 | |
4 | @@ -32,16 +32,7 @@ | |
5 | ||
6 | my ($prompt, $default) = @_; | |
7 | ||
8 | - print("$prompt ($default) ==> "); | |
9 | - | |
10 | - my $response = <STDIN>; | |
11 | - | |
12 | - chomp($response); | |
13 | - if ($response eq "") { | |
14 | - $response = $default; | |
15 | - } | |
16 | - | |
17 | - return $response; | |
18 | + return $default; | |
19 | } | |
20 | ||
21 | ||
22 | @@ -185,7 +176,7 @@ | |
59f0d218 FF |
23 | $default = "/usr/local/netpbm"; |
24 | } | |
25 | ||
ab2299b2 | 26 | - my $response = fsObjPrompt("install prefix", $default); |
59f0d218 FF |
27 | + my $response = "@TERMUX_PREFIX@"; |
28 | ||
29 | my $prefix; | |
30 | ||
ab2299b2 | 31 | @@ -573,7 +564,7 @@ |
59f0d218 FF |
32 | $done = $FALSE; |
33 | ||
34 | while (!$done) { | |
35 | - my $response = prompt("Y(es) or N(o)", "Y"); | |
36 | + my $response = "N"; | |
37 | ||
38 | if (uc($response) eq "Y") { | |
39 | execLdconfig(); |