The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#  Copyright (c) 1995-1996 Sun Microsystems, Inc.
#  See the file "license.terms" for information on usage and redistribution
#  of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
#

=head1 NAME

Tk_DrawFocusHighlight - draw the traversal highlight ring for a widget

=for category C Programming

=head1 SYNOPSIS

B<#include E<lt>tk.hE<gt>>

B<Tk_GetPixels(>I<tkwin, gc, width, drawable>B<)>

=head1 ARGUMENTS

=over 4

=item Tk_Window tkwin (in)

Window for which the highlight is being drawn.  Used to retrieve
the window's dimensions, among other things.

=item GC gc (in)

Graphics context to use for drawing the highlight.

=item int width (in)

Width of the highlight ring, in pixels.

=item Drawable drawable (in)

Drawable in which to draw the highlight;  usually an offscreen
pixmap for double buffering.

=back

=head1 DESCRIPTION

B<Tk_DrawFocusHighlight> is a utility procedure that draws the
traversal highlight ring for a widget.
It is typically invoked by widgets during redisplay.

=head1 KEYWORDS

focus, traversal highlight