From babd340da98d0298de0a4bb923105026100648bf Mon Sep 17 00:00:00 2001
From: stefan schippers <stefan.schippers@gmail.com>
Date: Wed, 15 Nov 2023 00:32:41 +0100
Subject: [PATCH] report previous netlist error also if doing current level
 only netlist

---
 src/callback.c | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/callback.c b/src/callback.c
index c88b4c8a..1da9e623 100644
--- a/src/callback.c
+++ b/src/callback.c
@@ -2482,6 +2482,11 @@ int rstate; /* (reduced state, without ShiftMask) */
                 "-message {Please Set netlisting mode (Options menu)}");
       dbg(1, "callback(): -------------\n");
     }
+    else {
+       if(has_x) tcleval("alert_ {Can not write into the netlist directory. Please check} {}");
+       else dbg(0, "Can not write into the netlist directory. Please check");
+       err = 1;
+    }
     if(err) {
       if(has_x) {
         tclvareval(xctx->top_path, ".menubar.netlist configure -bg red", NULL);