@@ -1380,5 +1380,5 @@ insertIncludedFile blocks dirs f = do
1380 bs <- blocks
1380 bs <- blocks
1381 setInput oldInput
1381 setInput oldInput
1382 setPosition oldPos
1382 setPosition oldPos
1383− updateState $ \s -> s{ stateContainers = tail $ stateContainers s }
1383+ updateState $ \s -> s{ stateContainers = drop 1 $ stateContainers s }
1384 return bs
1384 return bs