Minor fixes from wohnivec@iol.cz Thanks!

FossilOrigin-Name: a01ae661426988ed2d6a72a797bc0102ac95fded

4 files changed, 8 insertions, 8 deletions

diff --git a/library/demos/browse b/library/demos/browse
index cd9e09a..b881b4d 100644
--- a/library/demos/browse
+++ b/library/demos/browse
@@ -1,13 +1,13 @@
 #!/bin/sh
 # the next line restarts using wish \
-exec wish8.4 "$0" ${1+"$@"} || exec wish "$0" ${1+"$@"}
+exec wish "$0" ${1+"$@"}
 
 # browse --
 # This script generates a directory browser, which lists the working
 # directory and allows you to open files or subdirectories by
 # double-clicking.
 #
-# RCS: @(#) $Id: browse,v 1.3 2001/10/29 16:42:20 dkf Exp $
+# RCS: @(#) $Id: browse,v 1.4 2001/11/05 10:13:53 dkf Exp $
 
 # Create a scrollbar on the right side of the main window and a listbox
 # on the left side.
diff --git a/library/demos/dialog2.tcl b/library/demos/dialog2.tcl
index 0252ee0..502ac8b 100644
--- a/library/demos/dialog2.tcl
+++ b/library/demos/dialog2.tcl
@@ -2,7 +2,7 @@
 #
 # This demonstration script creates a dialog box with a global grab.
 #
-# RCS: @(#) $Id: dialog2.tcl,v 1.2 1998/09/14 18:23:27 stanton Exp $
+# RCS: @(#) $Id: dialog2.tcl,v 1.3 2001/11/05 10:13:53 dkf Exp $
 
 after idle {
     .dialog2.msg configure -wraplength 4i
@@ -10,7 +10,7 @@ after idle {
 after 100 {
     grab -global .dialog2
 }
-set i [tk_dialog .dialog2 "Dialog with local grab" {This dialog box uses a global grab, so it prevents you from interacting with anything on your display until you invoke one of the buttons below.  Global grabs are almost always a bad idea; don't use them unless you're truly desperate.} warning 0 OK Cancel {Show Code}]
+set i [tk_dialog .dialog2 "Dialog with global grab" {This dialog box uses a global grab, so it prevents you from interacting with anything on your display until you invoke one of the buttons below.  Global grabs are almost always a bad idea; don't use them unless you're truly desperate.} warning 0 OK Cancel {Show Code}]
 
 switch $i {
     0 {puts "You pressed OK"}
diff --git a/library/demos/ixset b/library/demos/ixset
index 8e6df3d..3ae2689 100644
--- a/library/demos/ixset
+++ b/library/demos/ixset
@@ -1,6 +1,6 @@
 #!/bin/sh
 # the next line restarts using wish \
-exec wish8.4 "$0" ${1+"$@"} || exec wish "$0" ${1+"$@"}
+exec wish "$0" ${1+"$@"}
 
 # ixset --
 # A nice interface to "xset" to change X server settings
@@ -9,7 +9,7 @@ exec wish8.4 "$0" ${1+"$@"} || exec wish "$0" ${1+"$@"}
 #   91/11/23 : pda@masi.ibp.fr, jt@ratp.fr : design
 #   92/08/01 : pda@masi.ibp.fr : cleaning
 #
-# RCS: @(#) $Id: ixset,v 1.3 2001/10/30 10:17:07 dkf Exp $
+# RCS: @(#) $Id: ixset,v 1.4 2001/11/05 10:13:53 dkf Exp $
 
 #
 # Button actions
diff --git a/library/demos/rolodex b/library/demos/rolodex
index 8245a67..e117edf 100644
--- a/library/demos/rolodex
+++ b/library/demos/rolodex
@@ -1,6 +1,6 @@
 #!/bin/sh
 # the next line restarts using wish \
-exec wish8.4 "$0" ${1+"$@"} || exec wish "$0" ${1+"$@"}
+exec wish "$0" ${1+"$@"}
 
 # rolodex --
 # This script was written as an entry in Tom LaStrange's rolodex
@@ -8,7 +8,7 @@ exec wish8.4 "$0" ${1+"$@"} || exec wish "$0" ${1+"$@"}
 # feel of a rolodex program, although it's lifeless and doesn't
 # actually do the rolodex application.
 #
-# RCS: @(#) $Id: rolodex,v 1.3 2001/10/30 10:17:07 dkf Exp $
+# RCS: @(#) $Id: rolodex,v 1.4 2001/11/05 10:13:53 dkf Exp $
 
 foreach i [winfo child .] {
     catch {destroy $i}