浏览代码

Use conservative paths to shell bins

Alois Mahdal 10 年前
父节点
当前提交
0c26d2e015
共有 1 个文件被更改,包括 2 次插入2 次删除
  1. 2
    2
      bin/mkexec

+ 2
- 2
bin/mkexec 查看文件

@@ -23,9 +23,9 @@ my $type    = (defined nextarg() ? shift : guesstype $name);
23 23
 
24 24
 my $bangs = {
25 25
     pl   => `which perl`,
26
-    sh   => `which sh`,
26
+    sh   => '/bin/sh',
27 27
     py   => `which python`,
28
-    bash => `which bash`,
28
+    bash => '/bin/bash',
29 29
     sed  => `which sed`,
30 30
     bc   => `which bc`
31 31
 };