mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

fix 2 splicing bugs

Browse source
This commit is contained in:
Joey Hess 2013-04-15 14:50:05 -04:00
parent e1b4e95513
commit f44c917b22
1 changed files with 4 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Build/EvilSplicer.hs
View file

@ -268,6 +268,10 @@ expandExpressionSplice s lls = concat [before, spliced:padding, end]
-- function definition needs no preparation -- function definition needs no preparation
-- ie: foo = $(splice) -- ie: foo = $(splice)
| "=" `isSuffixOf` s' = s | "=" `isSuffixOf` s' = s
-- nor does lambda definition
| "->" `isSuffixOf` s' = s
-- nor does a let .. in declaration
| "in" `isSuffixOf` s' = s
-- already have a $ to set off the splice -- already have a $ to set off the splice
-- ie: foo $ $(splice) -- ie: foo $ $(splice)
| "$" `isSuffixOf` s' = s | "$" `isSuffixOf` s' = s