Method code for $user_db<$registry>.search()

[Turn on line numbering]

---

arg name;
var tmp;

name = .strip_key(name);
name || throw(~namenf, "No matches found.");
tmp = (| .exact_match(name) |);
if (tmp)
    return tmp;
catch any {
    tmp = (> .match_begin(name) <);
} with {
    switch (error()) {
        case ~ambig:
            rethrow(error());
        default:
            throw(~namenf, "No matches found.");
    }
}
return tmp;

---

["// Created 26-Mar-1995 as a part of ColdCore, see: @help Credit"]