diff options
-rw-r--r-- | src/luarocks/fs/unix.lua | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/luarocks/fs/unix.lua b/src/luarocks/fs/unix.lua index 41a9ba8b..2c99ff0d 100644 --- a/src/luarocks/fs/unix.lua +++ b/src/luarocks/fs/unix.lua | |||
@@ -145,13 +145,14 @@ function unix.is_actual_binary(filename) | |||
145 | if not file then | 145 | if not file then |
146 | return true | 146 | return true |
147 | end | 147 | end |
148 | local first = file:read(2) | 148 | local first = file:read() |
149 | file:close() | 149 | file:close() |
150 | if not first then | 150 | if not first then |
151 | util.warning("could not read "..filename) | 151 | util.warning("could not read "..filename) |
152 | return true | 152 | return true |
153 | end | 153 | end |
154 | return first ~= "#!" | 154 | -- only create wrapper for lua scripts with `#!/usr/bin/env lua` or `#!/usr/bin/lua` |
155 | return first:match('^#!.*[ /]lua.*') == first | ||
155 | end | 156 | end |
156 | 157 | ||
157 | function unix.copy_binary(filename, dest) | 158 | function unix.copy_binary(filename, dest) |