Tk Library Source Code

Check-in [cbab3b4b29]
Login
Core Home Blog Docs Downloads Tickets Timeline Branches Tags Wiki

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:provide package version 5.4.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | tcl80
Files: files | file ages | folders
SHA1: cbab3b4b297eab2fef1019daa7fe74edb3f5596b
User & Date: jfontain 2000-03-21 21:32:25.000
Context
2000-03-26
09:34
version 5.4. check-in: e891a830d9 user: jfontain tags: tcl80
2000-03-21
21:32
provide package version 5.4. check-in: cbab3b4b29 user: jfontain tags: tcl80
2000-03-05
21:04
added label{}. check-in: 6006de4814 user: jfontain tags: tcl80
Changes
Unified Diff Ignore Whitespace Patch
Changes to modules/tkpiechart/pie.tcl. 
1
2
3
4
5
6
7
8
9
10

set rcsId {$Id: pie.tcl,v 1.85.1.1 2000/03/05 20:48:16 jfontain Exp $}

package provide tkpiechart 5.3

class pie {
    set pie::(colors) {#7FFFFF #7FFF7F #FF7F7F #FFFF7F #7F7FFF #FFBF00 #BFBFBF #FF7FFF #FFFFFF}
}

proc pie::pie {this canvas x y args} switched {$args} {                         ;# note: all pie elements are tagged with pie($this)
    set pie::($this,canvas) $canvas

|

|








1
2
3
4
5
6
7
8
9
10

set rcsId {$Id: pie.tcl,v 1.85.1.2 2000/03/21 21:32:25 jfontain Exp $}

package provide tkpiechart 5.4

class pie {
    set pie::(colors) {#7FFFFF #7FFF7F #FF7F7F #FFFF7F #7F7FFF #FFBF00 #BFBFBF #FF7FFF #FFFFFF}
}

proc pie::pie {this canvas x y args} switched {$args} {                         ;# note: all pie elements are tagged with pie($this)
    set pie::($this,canvas) $canvas
︙︙
This page was generated in about 0.013s by Fossil 2.26 [1205ec86cb] 2025-04-30 16:57:32