Method code for $connection.write()

[Turn on line numbering]

---

arg what, @how;
var elem, sep;

(> .perms(sender()) <);
sep = 'non_terminated in how ? `[] : `[13, 10];
switch (type(what)) {
    case 'string:
        what = strings_to_buf([what], sep);
    case 'list:
        what = strings_to_buf(what, sep);
    case 'buffer:
    default:
        throw(~type, "Write: strings, list of strings and buffers.");
}
cwrite(what);

// $#Edited: 12 Jan 02 15:17 $user_bruce

---

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