From b2f54569ae36dbcc6dfe52763b1e827ddcfbc050 Mon Sep 17 00:00:00 2001
From: David Botton <david@botton.com>
Date: Tue, 16 Feb 2021 16:51:08 -0500
Subject: [PATCH] tweeks

---
 clog-gui.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/clog-gui.lisp b/clog-gui.lisp
index 95d786d..55d85cb 100644
--- a/clog-gui.lisp
+++ b/clog-gui.lisp
@@ -593,7 +593,7 @@ on-window-resize-done at end of resize."))
                        <span data-drag-obj='~A' data-drag-type='m' id='~A-title'
                              style='flex-grow:9;user-select:none;cursor:move;'>~A</span>
                               <span id='~A-closer'
-                                    style='cursor:pointer;user-select:none;'>X</span>
+                                    style='cursor:pointer;user-select:none;'>&times;</span>
                   </div>
                   <div id='~A-body' style='flex-grow:9;overflow:auto'>~A</div>
                   <div id='~A-sizer' style='user-select:none;height:3px;
@@ -932,7 +932,7 @@ on-window-resize-done at end of resize."))
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 (defun server-file-dialog (obj title initial-dir on-file-name
-			   &key (left nil) (top nil) (width 400) (height 360)
+			   &key (left nil) (top nil) (width 400) (height 375)
 			     (initial-filename nil))
   "Create a local file dialog box called TITLE using INITIAL-DIR on server
 machine, upon close ON-FILE-NAME called with filename or nil if failure."