LIB: fix throwSameFile in copyDir
This commit is contained in:
parent
b66e12cc9e
commit
2609338f6e
@ -174,7 +174,7 @@ copyDir cm from@(_ :/ Dir fromn FileInfo{ fileMode = fmode })
|
|||||||
top = fullPath to
|
top = fullPath to
|
||||||
destdirp = top P.</> fromn
|
destdirp = top P.</> fromn
|
||||||
throwDestinationInSource fromp destdirp
|
throwDestinationInSource fromp destdirp
|
||||||
throwSameFile fromp top
|
throwSameFile fromp destdirp
|
||||||
throwCantOpenDirectory fromp
|
throwCantOpenDirectory fromp
|
||||||
throwCantOpenDirectory top
|
throwCantOpenDirectory top
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user