Sha256: 53b8b2bc99dda8a01f97833be35dfdd8065b097fc8369a63bfd1db20f8375e2e

Contents?: true

Size: 567 Bytes

Versions: 6

Compression:

Stored size: 567 Bytes

Contents

#
# cursors.tcl,v 1.3 2006/11/05 18:40:48 jenglish Exp
#
# Tile package: Symbolic cursor names.
#
# @@@ TODO: Figure out appropriate platform-specific cursors
#	for the various functions.
#

namespace eval ttk {

    variable Cursors

    switch -glob $::tcl_platform(platform) {

	"windows" {
	    array set Cursors {
		hresize 	sb_h_double_arrow
		vresize 	sb_v_double_arrow
		seresize	size_nw_se
	    }
	}

	"unix" - 
	* {
	    array set Cursors {
		hresize 	sb_h_double_arrow
		vresize 	sb_v_double_arrow
		seresize	bottom_right_corner
	    }
	}

    }
}

#*EOF*

Version data entries

6 entries across 6 versions & 1 rubygems

Version Path
Pratt-1.6.8 pkgs/tile-0.8.2/library/cursors.tcl
Pratt-1.6.5 pkgs/tile-0.8.2/library/cursors.tcl
Pratt-1.6.4 pkgs/tile-0.8.2/library/cursors.tcl
Pratt-1.6.2 pkgs/tile-0.8.2/library/cursors.tcl
Pratt-1.5.8 pkgs/tile-0.8.2/library/cursors.tcl
Pratt-1.5.6 pkgs/tile-0.8.2/library/cursors.tcl