Subject: Bug#3953: Tk 4.1's bell flashes the display.

From: Philippe Troin <[email-masked]>
Date: Sun, 28 Jul 1996 16:21:15 -0700

I installed Tk 4.1 and found the same bug as in 4.0 (see bug #3827). 
Running
the bell command flashes the display...
Description and demo are in bug report #3827.

Here's a patch:

diff -cr tk4.1.orig/generic/tkCmds.c tk4.1/generic/tkCmds.c
*** tk4.1.orig/generic/tkCmds.c Mon Apr  8 13:26:15 1996
--- tk4.1/generic/tkCmds.c      Sat Jul 27 19:32:06 1996
***************
*** 78,84 ****
        }
      }
      XBell(Tk_Display(tkwin), 0);
!     XForceScreenSaver(Tk_Display(tkwin), ScreenSaverReset);
      XFlush(Tk_Display(tkwin));
      return TCL_OK;
  }
--- 78,84 ----
        }
      }
      XBell(Tk_Display(tkwin), 0);
!     /* XForceScreenSaver(Tk_Display(tkwin), ScreenSaverReset); */
      XFlush(Tk_Display(tkwin));
      return TCL_OK;
  }

Here's some info:

Debian 1.1
Linux 2.0.8

Package: tk41
Status: install ok installed
Priority: optional
Section: devel
Maintainer: David Engel <[email-masked]>
Source: tk41
Version: 4.1-1
Depends: tcl75 (>= 7.5-1), elf-x11r6lib
Conflicts: tk, tk40 (<= 4.0p3-2)
Description: The Tk toolkit for TCL and X11 v4.1 - Run-Time Package.
 Tk is an X11 toolkit that provides the Motif look and feel and is 
 implemented using the Tcl scripting language.

Package: tk41-dev
Status: install ok installed
Priority: optional
Section: devel
Maintainer: David Engel <[email-masked]>
Source: tk41
Version: 4.1-1
Provides: tk-dev
Depends: tcl75-dev (>= 7.5-1), tk41 (= 4.1-1)
Conflicts: tk, tk-dev
Description: The Tk toolkit for TCL and X11 v4.1 - Development 
Package.
 Tk is an X11 toolkit that provides the Motif look and feel and is 
 implemented using the Tcl scripting language.

Package: tcl75
Status: install ok installed
Priority: optional
Section: devel
Maintainer: David Engel <[email-masked]>
Source: tcl75
Version: 7.5-1
Depends: libc5 (>= 5.2.18-5)
Conflicts: tcl, tcl74 (<= 7.4p3-2)
Description: The Tool Command Language (TCL) v7.5 - Run-Time Package.
 TCL is a powerful, easy to use, interpreted scripting language.

Package: tcl75-dev
Status: install ok installed
Priority: optional
Section: devel
Maintainer: David Engel <[email-masked]>
Source: tcl75
Version: 7.5-1
Provides: tcl-dev
Depends: libc5-dev (>= 5.2.18-5), tcl75 (= 7.5-1)
Conflicts: tcl, tcl-dev
Description: The Tool Command Language (TCL) v7.5 - Development 
Package.
 TCL is a powerful, easy to use, interpreted scripting language.

Phil.