1 files changed, 15 insertions, 0 deletions

diff --git a/lib/opener.tes b/lib/opener.tes
index c0183c8..8bcd896 100644
--- a/lib/opener.tes
+++ b/lib/opener.tes
@@ -36,3 +36,18 @@
     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 2
Detected recovery file "Q.f"
 '
+  ]*
+}