From 112e192cf319ed2145f2f0f7a76494c6b93fe7a8 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn=20Victor?= <bjorn@victor.se>
Date: Thu, 12 Aug 2021 13:32:50 +0200
Subject: [PATCH] Link EMACS;EMACS INIT to EMACS;* EMACS.

Support canonical phrase "er emacs;emacs init$ @y :m(hfx*)$" at end of
personal init file.
---
 build/emacs.tcl | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/build/emacs.tcl b/build/emacs.tcl
index 175bca81..263bfe62 100644
--- a/build/emacs.tcl
+++ b/build/emacs.tcl
@@ -96,6 +96,10 @@ respond "*" ":kill\r"
 
 respond "*" ":rename emacs;\[rmai\] \021:ej, emacs;\[rmai\] 147\r"
 
+# Support canonical phrase "er emacs;emacs init$ @y :m(hfx*)$"
+# at end of personal init file
+respond "*" ":link emacs;emacs init,emacs;* emacs\r"
+
 # make TS BABYL
 respond "*" ":midas sys3;ts babyl_kmp;babyl\r"
 expect ":KILL"