@@ -296,22 +296,22 @@ main = do
296296
297297 test " rename - single level deep"
298298 (rename (alterExtension (const Nothing )) (file (SProxy :: SProxy " image.png" )))
299- (file $ SProxy :: SProxy " image" )
299+ (file ( SProxy :: SProxy " image" ) )
300300
301301 test """ extension (Name ".foo") == Nothing"""
302- (extension (reflectName $ SProxy :: SProxy " .foo" ))
302+ (extension (reflectName ( SProxy :: SProxy " .foo" ) ))
303303 (Nothing )
304304 test """ extension (Name "foo.") == Nothing"""
305- (extension (reflectName $ SProxy :: SProxy " foo." ))
305+ (extension (reflectName ( SProxy :: SProxy " foo." ) ))
306306 (Nothing )
307307 test """ extension (Name "foo") == Nothing"""
308- (extension (reflectName $ SProxy :: SProxy " foo" ))
308+ (extension (reflectName ( SProxy :: SProxy " foo" ) ))
309309 (Nothing )
310310 test """ extension (Name ".") == Nothing"""
311- (extension (reflectName $ SProxy :: SProxy " ." ))
311+ (extension (reflectName ( SProxy :: SProxy " ." ) ))
312312 (Nothing )
313313 test """ extension (Name "foo.baz") == (Just "baz")"""
314- (extension (reflectName $ SProxy :: SProxy " foo.baz" ))
314+ (extension (reflectName ( SProxy :: SProxy " foo.baz" ) ))
315315 (NES .fromString " baz" )
316316
317317 test " sandbox - fail when relative path lies outside sandbox (above)"
@@ -344,11 +344,11 @@ main = do
344344
345345 test " parseRelFile - image.png"
346346 (parseRelFile posixParser " image.png" )
347- (Just $ file $ SProxy :: SProxy " image.png" )
347+ (Just $ file ( SProxy :: SProxy " image.png" ) )
348348
349349 test " parseRelFile - ./image.png"
350350 (parseRelFile posixParser " ./image.png" )
351- (Just $ file $ SProxy :: SProxy " image.png" )
351+ (Just $ file ( SProxy :: SProxy " image.png" ) )
352352
353353 test " parseRelFile - foo/image.png"
354354 (parseRelFile posixParser " foo/image.png" )
0 commit comments