diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2013-11-15 11:24:46 +0000 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2013-11-15 11:24:46 +0000 |
| commit | 699dc5402a0b6a703daf648953ff560376714207 (patch) | |
| tree | 01adf9a610c31a9c527e9a3bf5b8f76e4a5a7c75 /utils/count_lines | |
| parent | eb8fb434ff5e962a54247cacc5d3340972d5daf4 (diff) | |
| download | haskell-699dc5402a0b6a703daf648953ff560376714207.tar.gz | |
Fix the unlit path in count_lines
Diffstat (limited to 'utils/count_lines')
| -rw-r--r-- | utils/count_lines/count_lines.lprl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/count_lines/count_lines.lprl b/utils/count_lines/count_lines.lprl index bfaad51804..72b441384e 100644 --- a/utils/count_lines/count_lines.lprl +++ b/utils/count_lines/count_lines.lprl @@ -14,7 +14,7 @@ my $binPath = $FindBin::Bin; foreach $f ( @ARGV ) { if ( $f =~ /\.lhs$/ ) { - open(INF, "$binPath/../../../inplace/lib/unlit $f - |") || die "Couldn't unlit $f!\n"; + open(INF, "$binPath/../../inplace/lib/unlit $f - |") || die "Couldn't unlit $f!\n"; } else { open(INF, "< $f") || die "Couldn't open $f!\n"; } |