summaryrefslogtreecommitdiff
path: root/overlays/spm/server/Spm/Server.hs
diff options
context:
space:
mode:
authorGregor Kleen <gkleen@yggdrasil.li>2022-12-16 20:47:08 +0100
committerGregor Kleen <gkleen@yggdrasil.li>2022-12-16 20:47:08 +0100
commit01bbbf5794bce349a07a790f7dcb987cf2a3808a (patch)
treec4d58e90752ec452ca3fc25eeb23e073a3be9f8d /overlays/spm/server/Spm/Server.hs
parent46da3eed283b4a7b4f0153db025e7dbecd67b6a5 (diff)
downloadnixos-01bbbf5794bce349a07a790f7dcb987cf2a3808a.tar
nixos-01bbbf5794bce349a07a790f7dcb987cf2a3808a.tar.gz
nixos-01bbbf5794bce349a07a790f7dcb987cf2a3808a.tar.bz2
nixos-01bbbf5794bce349a07a790f7dcb987cf2a3808a.tar.xz
nixos-01bbbf5794bce349a07a790f7dcb987cf2a3808a.zip
...
Diffstat (limited to 'overlays/spm/server/Spm/Server.hs')
-rw-r--r--overlays/spm/server/Spm/Server.hs1
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