fix indentation of cond
1 files changed, 6 insertions(+), 6 deletions(-)

M wispwot/server.w
M wispwot/server.w +6 -6
@@ 634,12 634,12 @@ define : next-subscriptions wotstate own
             let*
                 : id : first updated
                   rank : get-rank id
-              cond
-                {rank = 1} : set! updated-rank1-ids : cons id updated-rank1-ids
-                {rank = 2} : set! updated-rank2-ids : cons id updated-rank2-ids
-                {rank > 2} : set! updated-rank3+-ids : cons id updated-rank3+-ids
-                else #t
-              loop : cdr updated
+                cond
+                  {rank = 1} : set! updated-rank1-ids : cons id updated-rank1-ids
+                  {rank = 2} : set! updated-rank2-ids : cons id updated-rank2-ids
+                  {rank > 2} : set! updated-rank3+-ids : cons id updated-rank3+-ids
+                  else #t
+                loop : cdr updated
     ;; clear updated IDs
     set-subscriptions-for-ownid! subscriptions-updated ownid '()
     ;; reorder rank1 subscriptions