summaryrefslogtreecommitdiffstats
path: root/txr.c
diff options
context:
space:
mode:
Diffstat (limited to 'txr.c')
-rw-r--r--txr.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/txr.c b/txr.c
index 8f71f91e..b4381b39 100644
--- a/txr.c
+++ b/txr.c
@@ -126,10 +126,9 @@ static val remove_hash_bang_line(val spec)
{
val shbang = string(L"#!");
val firstline = first(spec);
- val items = rest(firstline);
- if (stringp(first(items))) {
- val twochars = sub_str(first(items), zero, two);
+ if (stringp(first(firstline))) {
+ val twochars = sub_str(first(firstline), zero, two);
if (equal(twochars, shbang))
return rest(spec);
}