Tk Library Source Code

Check-in [2af5779105]
Login

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

Overview
Comment:Fix typo and incorrect version number. Unbreaks tkpiechart.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 2af5779105541d8b3fc9deb8dbc698719e42621e7a5c1d4a1d00d98f397ed0ff
User & Date: stu 2025-01-07 23:13:00.876
Context
2025-01-13
13:22
PersistentSelection: Fix version check. check-in: 13ca1c2b3e user: stu tags: trunk
2025-01-07
23:13
Fix typo and incorrect version number. Unbreaks tkpiechart. check-in: 2af5779105 user: stu tags: trunk
2024-12-08
10:43
Updated release links on homepage, and assorted meta data files check-in: 5948d1fa2d user: aku tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to modules/tkpiechart/slice.tcl.
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
        set ($this,startRightLine)\
            [$canvas create line 0 0 0 0 -tags slice($this)]
        set ($this,endLeftLine) [$canvas create line 0 0 0 0 -tags slice($this)]
        set ($this,endRightLine)\
            [$canvas create line 0 0 0 0 -tags slice($this)]
    }
    ##nagelfar ignore
    set tfill $switched::($this,-topcolor)
    set ($this,topArc) [$canvas create arc\
        -$xRadius -$yRadius $xRadius $yRadius\
        -fill $fill -tags slice($this)\
    ]
    # move slice so upper-left corner is at requested coordinates
    $canvas move slice($this) $xRadius $yRadius
}







|







139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
        set ($this,startRightLine)\
            [$canvas create line 0 0 0 0 -tags slice($this)]
        set ($this,endLeftLine) [$canvas create line 0 0 0 0 -tags slice($this)]
        set ($this,endRightLine)\
            [$canvas create line 0 0 0 0 -tags slice($this)]
    }
    ##nagelfar ignore
    set fill $switched::($this,-topcolor)
    set ($this,topArc) [$canvas create arc\
        -$xRadius -$yRadius $xRadius $yRadius\
        -fill $fill -tags slice($this)\
    ]
    # move slice so upper-left corner is at requested coordinates
    $canvas move slice($this) $xRadius $yRadius
}
Changes to modules/tkpiechart/tkpiechart.tcl.
1
2
3
4
5
6
7
8
9
# -*- tcl -*-
tclPkgSetup [file dirname [file join [pwd] [info script]]] tkpiechart 6.6 {
    {pie.tcl source {::pie::_copy ::pie::buttonPress ::pie::buttonRelease ::pie::complete ::pie::currentSlice ::pie::darken ::pie::deleteSlice ::pie::labelSlice ::pie::maximum ::pie::minimum ::pie::newSlice ::pie::options ::pie::pie ::pie::selectedSlices ::pie::set-autoupdate ::pie::set-background ::pie::set-colors ::pie::set-height ::pie::set-labeler ::pie::set-selectable ::pie::set-thickness ::pie::set-title ::pie::set-titlefont ::pie::set-titleoffset ::pie::set-width ::pie::setLabelsState ::pie::setSliceBackground ::pie::setSliceLabelBackground ::pie::sizeSlice ::pie::sliceLabelTag ::pie::update ::pie::~pie}}
    {slice.tcl source {::slice::_copy ::slice::complete ::slice::data ::slice::normalizedAngle ::slice::options ::slice::rotate ::slice::set-bottomcolor ::slice::set-deletecommand ::slice::set-height ::slice::set-scale ::slice::set-startandextent ::slice::set-topcolor ::slice::slice ::slice::update ::slice::updateBottom ::slice::~slice}}
    {pielabel.tcl source {::pieLabeler::_copy ::pieLabeler::_updateSlices ::pieLabeler::delete ::pieLabeler::label ::pieLabeler::labelBackground ::pieLabeler::labelTextBackground ::pieLabeler::new ::pieLabeler::pieLabeler ::pieLabeler::room ::pieLabeler::selectState ::pieLabeler::set ::pieLabeler::update ::pieLabeler::updateSlices ::pieLabeler::~pieLabeler}}
    {boxlabel.tcl source {::pieBoxLabeler::_copy ::pieBoxLabeler::delete ::pieBoxLabeler::label ::pieBoxLabeler::labelBackground ::pieBoxLabeler::labelTextBackground ::pieBoxLabeler::new ::pieBoxLabeler::options ::pieBoxLabeler::pieBoxLabeler ::pieBoxLabeler::room ::pieBoxLabeler::selectState ::pieBoxLabeler::set ::pieBoxLabeler::set-font ::pieBoxLabeler::set-justify ::pieBoxLabeler::set-offset ::pieBoxLabeler::set-xoffset ::pieBoxLabeler::update ::pieBoxLabeler::~pieBoxLabeler}}
    {canlabel.tcl source {::canvasLabel::_copy ::canvasLabel::canvasLabel ::canvasLabel::eventuallyDeleteRelief ::canvasLabel::options ::canvasLabel::set-anchor ::canvasLabel::set-background ::canvasLabel::set-bordercolor ::canvasLabel::set-borderwidth ::canvasLabel::set-bulletwidth ::canvasLabel::set-font ::canvasLabel::set-foreground ::canvasLabel::set-justify ::canvasLabel::set-minimumwidth ::canvasLabel::set-padding ::canvasLabel::set-scale ::canvasLabel::set-select ::canvasLabel::set-selectrelief ::canvasLabel::set-stipple ::canvasLabel::set-text ::canvasLabel::set-textbackground ::canvasLabel::set-width ::canvasLabel::update ::canvasLabel::updateRelief ::canvasLabel::~canvasLabel}}
    {perilabel.tcl source {::piePeripheralLabeler::_copy ::piePeripheralLabeler::anglePosition ::piePeripheralLabeler::delete ::piePeripheralLabeler::label ::piePeripheralLabeler::labelBackground ::piePeripheralLabeler::labelTextBackground ::piePeripheralLabeler::new ::piePeripheralLabeler::options ::piePeripheralLabeler::piePeripheralLabeler ::piePeripheralLabeler::position ::piePeripheralLabeler::room ::piePeripheralLabeler::selectState ::piePeripheralLabeler::set ::piePeripheralLabeler::set-bulletwidth ::piePeripheralLabeler::set-font ::piePeripheralLabeler::set-justify ::piePeripheralLabeler::set-offset ::piePeripheralLabeler::set-smallfont ::piePeripheralLabeler::set-widestvaluetext ::piePeripheralLabeler::update ::piePeripheralLabeler::updateSlices ::piePeripheralLabeler::~piePeripheralLabeler}}
    {labarray.tcl source {::canvasLabelsArray::_copy ::canvasLabelsArray::canvasLabelsArray ::canvasLabelsArray::delete ::canvasLabelsArray::height ::canvasLabelsArray::labels ::canvasLabelsArray::manage ::canvasLabelsArray::options ::canvasLabelsArray::set-justify ::canvasLabelsArray::set-width ::canvasLabelsArray::update ::canvasLabelsArray::~canvasLabelsArray}}

|







1
2
3
4
5
6
7
8
9
# -*- tcl -*-
tclPkgSetup [file dirname [file join [pwd] [info script]]] tkpiechart 6.6.1 {
    {pie.tcl source {::pie::_copy ::pie::buttonPress ::pie::buttonRelease ::pie::complete ::pie::currentSlice ::pie::darken ::pie::deleteSlice ::pie::labelSlice ::pie::maximum ::pie::minimum ::pie::newSlice ::pie::options ::pie::pie ::pie::selectedSlices ::pie::set-autoupdate ::pie::set-background ::pie::set-colors ::pie::set-height ::pie::set-labeler ::pie::set-selectable ::pie::set-thickness ::pie::set-title ::pie::set-titlefont ::pie::set-titleoffset ::pie::set-width ::pie::setLabelsState ::pie::setSliceBackground ::pie::setSliceLabelBackground ::pie::sizeSlice ::pie::sliceLabelTag ::pie::update ::pie::~pie}}
    {slice.tcl source {::slice::_copy ::slice::complete ::slice::data ::slice::normalizedAngle ::slice::options ::slice::rotate ::slice::set-bottomcolor ::slice::set-deletecommand ::slice::set-height ::slice::set-scale ::slice::set-startandextent ::slice::set-topcolor ::slice::slice ::slice::update ::slice::updateBottom ::slice::~slice}}
    {pielabel.tcl source {::pieLabeler::_copy ::pieLabeler::_updateSlices ::pieLabeler::delete ::pieLabeler::label ::pieLabeler::labelBackground ::pieLabeler::labelTextBackground ::pieLabeler::new ::pieLabeler::pieLabeler ::pieLabeler::room ::pieLabeler::selectState ::pieLabeler::set ::pieLabeler::update ::pieLabeler::updateSlices ::pieLabeler::~pieLabeler}}
    {boxlabel.tcl source {::pieBoxLabeler::_copy ::pieBoxLabeler::delete ::pieBoxLabeler::label ::pieBoxLabeler::labelBackground ::pieBoxLabeler::labelTextBackground ::pieBoxLabeler::new ::pieBoxLabeler::options ::pieBoxLabeler::pieBoxLabeler ::pieBoxLabeler::room ::pieBoxLabeler::selectState ::pieBoxLabeler::set ::pieBoxLabeler::set-font ::pieBoxLabeler::set-justify ::pieBoxLabeler::set-offset ::pieBoxLabeler::set-xoffset ::pieBoxLabeler::update ::pieBoxLabeler::~pieBoxLabeler}}
    {canlabel.tcl source {::canvasLabel::_copy ::canvasLabel::canvasLabel ::canvasLabel::eventuallyDeleteRelief ::canvasLabel::options ::canvasLabel::set-anchor ::canvasLabel::set-background ::canvasLabel::set-bordercolor ::canvasLabel::set-borderwidth ::canvasLabel::set-bulletwidth ::canvasLabel::set-font ::canvasLabel::set-foreground ::canvasLabel::set-justify ::canvasLabel::set-minimumwidth ::canvasLabel::set-padding ::canvasLabel::set-scale ::canvasLabel::set-select ::canvasLabel::set-selectrelief ::canvasLabel::set-stipple ::canvasLabel::set-text ::canvasLabel::set-textbackground ::canvasLabel::set-width ::canvasLabel::update ::canvasLabel::updateRelief ::canvasLabel::~canvasLabel}}
    {perilabel.tcl source {::piePeripheralLabeler::_copy ::piePeripheralLabeler::anglePosition ::piePeripheralLabeler::delete ::piePeripheralLabeler::label ::piePeripheralLabeler::labelBackground ::piePeripheralLabeler::labelTextBackground ::piePeripheralLabeler::new ::piePeripheralLabeler::options ::piePeripheralLabeler::piePeripheralLabeler ::piePeripheralLabeler::position ::piePeripheralLabeler::room ::piePeripheralLabeler::selectState ::piePeripheralLabeler::set ::piePeripheralLabeler::set-bulletwidth ::piePeripheralLabeler::set-font ::piePeripheralLabeler::set-justify ::piePeripheralLabeler::set-offset ::piePeripheralLabeler::set-smallfont ::piePeripheralLabeler::set-widestvaluetext ::piePeripheralLabeler::update ::piePeripheralLabeler::updateSlices ::piePeripheralLabeler::~piePeripheralLabeler}}
    {labarray.tcl source {::canvasLabelsArray::_copy ::canvasLabelsArray::canvasLabelsArray ::canvasLabelsArray::delete ::canvasLabelsArray::height ::canvasLabelsArray::labels ::canvasLabelsArray::manage ::canvasLabelsArray::options ::canvasLabelsArray::set-justify ::canvasLabelsArray::set-width ::canvasLabelsArray::update ::canvasLabelsArray::~canvasLabelsArray}}