From 360b7dc7edc9b111dd9d3a6f24ac97d29235262a Mon Sep 17 00:00:00 2001
From: Holger Vogt <holger.vogt@uni-due.de>
Date: Wed, 22 Jun 2022 22:02:09 +0200
Subject: [PATCH] Make warning message on missing init file more verbose.

---
 src/frontend/cpitf.c | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/src/frontend/cpitf.c b/src/frontend/cpitf.c
index a0026d3bf..484b2ff49 100644
--- a/src/frontend/cpitf.c
+++ b/src/frontend/cpitf.c
@@ -317,8 +317,13 @@ ft_cpinit(void)
             }
         }
 
-        if (!found)
-            fprintf(cp_err, "Note: can't find init file.\n");
+        if (!found) {
+#if defined TCL_MODULE
+            fprintf(cp_err, "Note: can't find the initialization file tclspinit.\n");
+#else
+            fprintf(cp_err, "Note: can't find the initialization file spinit.\n");
+#endif
+        }
     }
 
     tcap_init();