[Oberon] Copy a text buffer to a string?

[peter at easthope.ca]

Hi,

I want to add the Date field in email message submission implemented in 
A2,
Oberon.Mail.Mod.  Conceptually this.

	PROCEDURE SendText ...
		VAR ...
			t, d: SIGNED32;
	BEGIN
		...
		Oberon.GetClock(t,d); (* Ref. Oberon.Oberon.Mod *)
		WritePair(W, " ", d MOD 32);
		WritePair(W, " ", d DIV 32 MOD 16);
		Texts.Write(W, " "); Texts.WriteInt(W, 1900 + d DIV 512, 1);
		WritePair(W, " ", t DIV 4096 MOD 32);
		WritePair(W, ":", t DIV 64 MOD 64);
		WritePair(W, ":", t MOD 64);
		SendCmd(S,"Date:", W.buf);

With SendCmd requiring an ARRAY OF CHAR rather than Text buffer in the
third parameter, that fails.  What alternatives are appropriate?

Thx,                            ... P.L.