From 54e8c8312086d5055287fc5d59564017568560e1 Mon Sep 17 00:00:00 2001
From: Eric Swenson <eric@swenson.org>
Date: Tue, 20 Dec 2016 17:01:53 -0800
Subject: [PATCH] Added MAILT. This is a link to SYS2; TS EMACS. It allows
 escaping from MAIL to EMACS to edit email being composed. Not sure how to
 invoke this from MAIL yet. Resolves #291.

---
 README.md       | 1 +
 build/build.tcl | 3 +++
 2 files changed, 4 insertions(+)

diff --git a/README.md b/README.md
index ea06db7e..4a160c95 100644
--- a/README.md
+++ b/README.md
@@ -157,6 +157,7 @@ A list of [known ITS machines](doc/machines.md).
    - LOSS (device).
    - LUSER, request help from registered list of logged-in users.
    - MAIL, Mail sending client.
+   - MAILT, allows editing mail (from :MAIL) in EMACS.
    - METER, displays system metering information.
    - MLDEV, MLSLV, Allows access to remote systems as devices (e.g. DB:).
    - MODEMS, modems gragon.
diff --git a/build/build.tcl b/build/build.tcl
index 5ea9a7b8..ea8115f8 100644
--- a/build/build.tcl
+++ b/build/build.tcl
@@ -811,6 +811,9 @@ respond "*" ":midas sysbin;timsrv bin_sysnet;timsrv\r"
 expect ":KILL"
 respond "*" ":link device;tcp syn045,sysbin;timesrv bin\r"
 
+# mailt
+respond "*" ":link sys;ts mailt,sys2;ts emacs\r"
+
 # rmtdev
 respond "*" ":midas device;atsign rmtdev_gz;rmtdev\r"