Store.add_current: def of cswap-bend-cli@0.1.0.0
Import: import cswap-bend-cli@0.1.0.0/store.bend as Store
Lines 332-341 of cswap-bend-cli@0.1.0.0/store.bend: https://jend.leeeet.dev/read.txt?path=cswap-bend-cli@0.1.0.0/store.bend&start_line=332&end_line=341

import Base
import cswap-bend-cli@0.1.0.0/act.bend as Act
import cswap-bend-cli@0.1.0.0/lock.bend as Lock
import cswap-bend-cli@0.1.0.0/store/base.bend as SBase
import cswap-bend-cli@0.1.0.0/store/plan.bend as SPlan

# Adopt the live login (~/.claude.json oauthAccount + .credentials.json) into a
# slot. The credential's owner is looked up with `fetch` (profile_http in
# production, a stub in tests); an owner that disagrees with the config's
# (email, organization) is refused with the reference's wording and nothing is
# written. An unresolvable owner registers with a Notice line, as the
# reference does. An occupied slot needs `assume_yes` (see add_token).
def add_current(+ctx: SBase.Ctx, +alias: Maybe<&2, String>, +slot0: Maybe<&2, U32>, +assume_yes: Bool, fetch: String -> IO(SPlan.Prof)) -> Act.of(String):
  do ActM<String>:
    alias_check(alias)
    Lock.with_lock(String, SBase.lock_path(SBase.root_of(ctx)), 10000, current3(SBase.root_of(ctx), ctx, alias_of(alias), slot0, assume_yes, fetch))

Uses (17):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=IO
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Maybe
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=String
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Unit
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/act.bend&name=of
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/lock.bend&name=with_lock
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/store/base.bend&name=Ctx
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/store/base.bend&name=lock_path
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/store/base.bend&name=root_of
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/store/plan.bend&name=Prof
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/store.bend&name=ActM
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/store.bend&name=ActM.bind
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/store.bend&name=alias_check
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/store.bend&name=alias_of
  https://jend.leeeet.dev/definition.txt?path=cswap-bend-cli@0.1.0.0/store.bend&name=current3