From ba25af0313dec8dea3b879c3bfecb97aade43ab8 Mon Sep 17 00:00:00 2001 From: David Botton Date: Thu, 11 Jul 2024 08:33:21 -0400 Subject: [PATCH] fix resize on maximize for search --- tools/clog-builder-search.lisp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/tools/clog-builder-search.lisp b/tools/clog-builder-search.lisp index 9d0e409..7a4ca57 100644 --- a/tools/clog-builder-search.lisp +++ b/tools/clog-builder-search.lisp @@ -16,9 +16,9 @@ (lambda (obj) (declare (ignore obj)) (setf (hiddenp win) t))) - (set-on-window-size win (lambda (obj) - (declare (ignore obj)) - (clog-ace:resize (preview-ace panel)))) + (set-on-window-size-done win (lambda (obj) + (declare (ignore obj)) + (clog-ace:resize (preview-ace panel)))) (setf (current-editor-is-lisp app) "clog-user") (setup-lisp-ace (preview-ace panel) nil) (setf (text-value (preview-ace panel))