Fixed incomplete patch 966a370.

diff --git a/src/gtk-screen/gtk-screen.scm b/src/gtk-screen/gtk-screen.scm
index 86d5073816ac65af7a62952271b34b092cc4a905..db4d711cb8fc4c1a577cf4962cfce792cf34a161 100644 (file)
--- a/src/gtk-screen/gtk-screen.scm
+++ b/src/gtk-screen/gtk-screen.scm
@@ -1315,9 +1315,7 @@ USA.
         (%trace "; (update-screen! <gtk-screen>) done: "visibility"\n")
         visibility))
       (else
-       (update-name screen)
        (update-widgets screen)
-       (for-each-text-widget screen update-widget-buffer)
        (%trace ";   update drawings\n")
        (if (every (lambda (entry) (update-drawing screen (cdr entry)))
                  (gtk-screen-drawings screen))