Mercurial Hosting > chat
comparison src/delete_user.js.luan @ 33:e2b7f6393dab
add online
| author | Franklin Schmidt <fschmidt@gmail.com> |
|---|---|
| date | Sun, 10 Nov 2024 19:57:14 -0700 |
| parents | f4708943f29e |
| children |
comparison
equal
deleted
inserted
replaced
| 32:0f40501b0b56 | 33:e2b7f6393dab |
|---|---|
| 1 local Luan = require "luan:Luan.luan" | 1 local Luan = require "luan:Luan.luan" |
| 2 local error = Luan.error | 2 local error = Luan.error |
| 3 local ipairs = Luan.ipairs or error() | |
| 4 local stringify = Luan.stringify or error() | |
| 5 local Io = require "luan:Io.luan" | 3 local Io = require "luan:Io.luan" |
| 6 local Http = require "luan:http/Http.luan" | 4 local Http = require "luan:http/Http.luan" |
| 7 local User = require "site:/lib/User.luan" | 5 local User = require "site:/lib/User.luan" |
| 8 local current_user = User.current or error() | 6 local current_user = User.current or error() |
| 9 local Chat = require "site:/lib/Chat.luan" | |
| 10 local chat_search = Chat.search or error() | |
| 11 local Utils = require "site:/lib/Utils.luan" | |
| 12 local list_to_set = Utils.list_to_set or error() | |
| 13 local set_to_list = Utils.set_to_list or error() | |
| 14 local Shared = require "site:/lib/Shared.luan" | 7 local Shared = require "site:/lib/Shared.luan" |
| 15 local http_push_to_users = Shared.http_push_to_users or error() | 8 local http_push_to_users = Shared.http_push_to_users or error() |
| 16 local Logging = require "luan:logging/Logging.luan" | 9 local Logging = require "luan:logging/Logging.luan" |
| 17 local logger = Logging.logger "delete_user.js" | 10 local logger = Logging.logger "delete_user.js" |
| 18 | 11 |
| 19 | 12 |
| 20 return function() | 13 return function() |
| 21 local user = current_user() | 14 local user = current_user() |
| 22 if user ~= nil then | 15 if user ~= nil then |
| 23 local user_ids = list_to_set{} | 16 local user_ids = user.chatting_with_ids() |
| 24 local chats = chat_search( "chat_user_ids:"..user.id ) | |
| 25 for _, chat in ipairs(chats) do | |
| 26 for _, user_id in ipairs(chat.user_ids) do | |
| 27 user_ids[user_id] = true | |
| 28 end | |
| 29 end | |
| 30 user_ids = set_to_list(user_ids) | |
| 31 local js = "getChats(null)" | 17 local js = "getChats(null)" |
| 32 user.delete() | 18 user.delete() |
| 33 http_push_to_users( user_ids, js ) | 19 http_push_to_users( user_ids, js ) |
| 34 end | 20 end |
| 35 Io.stdout = Http.response.text_writer() | 21 Io.stdout = Http.response.text_writer() |
