def dup.id3

cswap-bend-cli@0.1.0.0 · warn.bend:146

import Base

146def dup.id3(other: Maybe<&2, String>, +key: String, +slot: String, +email: String, ds: DS) -> DS:
147  match other ds:
148    case Some{o} DS{f, i, m}:
149      DS{f, i, append_str(m, "Account-" ++ o ++ " and Account-" ++ slot ++ " both authenticate as " ++ email ++ dash() ++ "remove or re-login one of them.")}
150    case None{} DS{f, i, m}:
151      DS{f, Seen{key, slot} <> i, m}