head	1.3;
access;
symbols
	rel-5-2:1.2
	rel-5-1-patches:1.2.0.2
	rel-5-1:1.2
	rel-5-0:1.1
	rel-5-0beta:1.1;
locks; strict;
comment	@# @;


1.3
date	2000.12.06.21.21.37;	author bparker;	state dead;
branches;
next	1.2;

1.2
date	99.10.19.20.02.41;	author jra;	state Exp;
branches
	1.2.2.1;
next	1.1;

1.1
date	98.06.02.19.49.26;	author jra;	state Exp;
branches;
next	;

1.2.2.1
date	2000.12.06.21.26.47;	author bparker;	state dead;
branches;
next	;


desc
@Original
@


1.3
log
@Upgrading to newer version
@
text
@#!/bin/sh
# the next line restarts using wish \
exec wish "$0" "$@@"

# hello --
# Simple Tk script to create a button that prints "Hello, world".
# Click on the button to terminate the program.
#
# RCS: @@(#) $Id: hello,v 1.2 1999/10/19 20:02:41 jra Exp $
# 
# The first line below creates the button, and the second line
# asks the packer to shrink-wrap the application's main window
# around the button.

button .hello -text "Hello, world" -command {
    puts stdout "Hello, world"; destroy .
}
pack .hello
@


1.2
log
@tk 8.2.1 update
@
text
@d9 1
a9 1
# RCS: @@(#) $Id: hello,v 1.2 1998/09/14 18:23:28 stanton Exp $
@


1.2.2.1
log
@Upgrading to newer version
@
text
@d9 1
a9 1
# RCS: @@(#) $Id: hello,v 1.2 1999/10/19 20:02:41 jra Exp $
@


1.1
log
@Initial revision
@
text
@d9 1
a9 1
# SCCS: @@(#) hello 1.6 96/02/16 10:49:18
@

