From 5071f9f3dcf1e18e741b7907aa6fe0924f23f247 Mon Sep 17 00:00:00 2001 From: David Botton Date: Wed, 6 Jul 2022 17:00:13 -0400 Subject: [PATCH] reset default names on panel after load --- tools/clog-builder.lisp | 2 ++ 1 file changed, 2 insertions(+) diff --git a/tools/clog-builder.lisp b/tools/clog-builder.lisp index 317eba7..6b667d4 100644 --- a/tools/clog-builder.lisp +++ b/tools/clog-builder.lisp @@ -1351,6 +1351,7 @@ of controls and double click to select control." (window-focus win) (when fname (setf file-name fname) + (setf render-file-name "") (setf (inner-html content) (escape-string (read-file fname))) (clrhash (get-control-list app panel-id)) @@ -1663,6 +1664,7 @@ of controls and double click to select control." (window-focus win) (when fname (setf file-name fname) + (setf render-file-name "") (setf (inner-html content) (escape-string (read-file fname))) (clrhash (get-control-list app panel-id))