From cd48ea8f00567f30d9685f96a12b8f123a121f62 Mon Sep 17 00:00:00 2001
From: Robin Haberkorn <rhaberkorn@fmsbw.de>
Date: Mon, 13 Apr 2026 16:44:34 +0200
Subject: opener.check-recovery now checks for and warns about the presence of
 recovery `#files#`

* This could have been in ring.c, but in the future we may want to script
  the behavior in case recovery files are detected.
* The warnings are currently written as user messages, which looks
  ugly in interactive mode.
  Once n^A is supported, we can write them as regular warnings, though (FIXME).
---
 fallback.teco_ini | Bin 2610 -> 2640 bytes
 lib/opener.tes    |  18 ++++++++++++++++++
 2 files changed, 18 insertions(+)

diff --git a/fallback.teco_ini b/fallback.teco_ini
index bf1add7..bd92c29 100644
Binary files a/fallback.teco_ini and b/fallback.teco_ini differ
diff --git a/lib/opener.tes b/lib/opener.tes
index c0183c8..59af79a 100644
--- a/lib/opener.tes
+++ b/lib/opener.tes
@@ -36,3 +36,21 @@
     EBN[
\.i] Q.c-1,Q.l-1ESFINDCOLUMN:J
   >
 ]* }
+
+!*$
+ * M[opener.check-recovery] -- Warn if there if a recovery file (#filename#) is detected
+ *
+ * This points to a prior crash or unexpected termination.
+ *!
+@[opener.check-recovery]{
+  :Q*"=  '
+  [*
+    EQ.f G* I# R
+    <-A"I 1; ' :R;>
+    I#
+    1:EN*Q.f"S
+      !* FIXME: log as a true warning once 
 supports it *!
+      
Warning: Detected recovery file "Q.f"^J

+    '
+  ]*
+}
-- 
cgit v1.2.3