add missing case
This commit is contained in:
parent
3435a47245
commit
bdcf19b095
1 changed files with 1 additions and 0 deletions
|
@ -291,6 +291,7 @@ removeExportDirectoryM external dir = safely $
|
|||
REMOVEEXPORTDIRECTORY_SUCCESS -> Just $ return True
|
||||
REMOVEEXPORTDIRECTORY_FAILURE -> Just $ return False
|
||||
UNSUPPORTED_REQUEST -> Just $ return True
|
||||
_ -> Nothing
|
||||
where
|
||||
req = REMOVEEXPORTDIRECTORY dir
|
||||
|
||||
|
|
Loading…
Reference in a new issue