diff options
Diffstat (limited to 'Command')
-rw-r--r-- | Command/Export.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Command/Export.hs b/Command/Export.hs index 56676809f..cc463b7dc 100644 --- a/Command/Export.hs +++ b/Command/Export.hs @@ -321,4 +321,6 @@ cleanupRename ea db ek src dest = do removeExportLocation db (asKey ek) src addExportLocation db (asKey ek) dest flushDbQueue db - removeEmptyDirectories ea db src [asKey ek] + if exportedDirectories src /= exportedDirectories dest + then removeEmptyDirectories ea db src [asKey ek] + else return True |