diff options
-rw-r--r-- | overlays/spm/server/Spm/Server.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/overlays/spm/server/Spm/Server.hs b/overlays/spm/server/Spm/Server.hs index 9ba3e446..8d7cef8f 100644 --- a/overlays/spm/server/Spm/Server.hs +++ b/overlays/spm/server/Spm/Server.hs | |||
@@ -286,6 +286,7 @@ spmServer dom mbox = whoami | |||
286 | , smlState = _SpmMappingStateReject # mailboxMappingReject | 286 | , smlState = _SpmMappingStateReject # mailboxMappingReject |
287 | } | 287 | } |
288 | ) | 288 | ) |
289 | & sortOn (spmMappingLocal . smlMapping &&& spmMappingExtension . smlMapping) | ||
289 | & SpmMappingListing | 290 | & SpmMappingListing |
290 | 291 | ||
291 | getUniqueMapping SpmMapping{..} = do | 292 | getUniqueMapping SpmMapping{..} = do |