Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Comment: | Tcl 9 migration fixes in various packages. Version bumps. - ico 1.1.2 - ipentry 0.3.1 - khim 1.0.2 - shtmlview 1.1.1 Docs regenerated. Release READMEs regenerated. |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | tklib-0-8-rc |
Files: | files | file ages | folders |
SHA3-256: |
0893d867efc0b833235a5ea490db004b |
User & Date: | aku 2024-07-03 18:59:39 |
2024-07-06
| ||
11:49 | Updated .tap and PACKAGES Closed-Leaf check-in: b8311069d6 user: aku tags: tklib-0-8-rc | |
2024-07-03
| ||
18:59 | Tcl 9 migration fixes in various packages. Version bumps. - ico 1.1.2 - ipentry 0.3.1 - khim 1.0.2 - shtmlview 1.1.1 Docs regenerated. Release READMEs regenerated. check-in: 0893d867ef user: aku tags: tklib-0-8-rc | |
2024-07-01
| ||
16:54 | Merged the suspended 2022 work on a tklib 0.8 release into the active run. check-in: fff1b7ef73 user: aku tags: tklib-0-8-rc | |
Changes to embedded/md/tklib/files/modules/ico/ico.md.
1 2 3 | [//000000001]: # (ico \- Windows ICO handling) [//000000002]: # (Generated from file 'ico\.man' by tcllib/doctools with format 'markdown') | | | 1 2 3 4 5 6 7 8 9 10 11 | [//000000001]: # (ico \- Windows ICO handling) [//000000002]: # (Generated from file 'ico\.man' by tcllib/doctools with format 'markdown') [//000000003]: # (ico\(n\) 1\.1\.2 tklib "Windows ICO handling") <hr> [ <a href="../../../../toc.md">Main Table Of Contents</a> | <a href="../../../toc.md">Table Of Contents</a> | <a href="../../../../index.md">Keyword Index</a> | <a href="../../../../toc0.md">Categories</a> | <a href="../../../../toc1.md">Modules</a> | <a href="../../../../toc2.md">Applications</a> ] <hr> |
︙ | ︙ | |||
31 32 33 34 35 36 37 | - [Bugs, Ideas, Feedback](#section5) - [Keywords](#keywords) # <a name='synopsis'></a>SYNOPSIS package require Tcl 8\.4 | | | 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 | - [Bugs, Ideas, Feedback](#section5) - [Keywords](#keywords) # <a name='synopsis'></a>SYNOPSIS package require Tcl 8\.4 package require ico ?1\.1\.2? [__::ico::icons__ *file* ?*option* *value*\.\.\.?](#1) [__::ico::iconMembers__ *file* *name* ?*option* *value*\.\.\.?](#2) [__::ico::getIcon__ *file* *name* ?*option* *value*\.\.\.?](#3) [__::ico::getIconByName__ *file* *name* ?*option* *value*\.\.\.?](#4) [__::ico::getFileIcon__ *file* ?*option* *value*\.\.\.?](#5) [__::ico::writeIcon__ *file* *name* *depth* *data* ?*option* *value*\.\.\.?](#6) |
︙ | ︙ |
Changes to embedded/md/tklib/files/modules/ipentry/ipentry.md.
1 2 3 | [//000000001]: # (ipentry \- An IP address entry widget) [//000000002]: # (Generated from file 'ipentry\.man' by tcllib/doctools with format 'markdown') | | | 1 2 3 4 5 6 7 8 9 10 11 | [//000000001]: # (ipentry \- An IP address entry widget) [//000000002]: # (Generated from file 'ipentry\.man' by tcllib/doctools with format 'markdown') [//000000003]: # (ipentry\(n\) 0\.3\.1 tklib "An IP address entry widget") <hr> [ <a href="../../../../toc.md">Main Table Of Contents</a> | <a href="../../../toc.md">Table Of Contents</a> | <a href="../../../../index.md">Keyword Index</a> | <a href="../../../../toc0.md">Categories</a> | <a href="../../../../toc1.md">Modules</a> | <a href="../../../../toc2.md">Applications</a> ] <hr> |
︙ | ︙ | |||
30 31 32 33 34 35 36 | - [Category](#category) # <a name='synopsis'></a>SYNOPSIS package require Tcl 8\.4 package require Tk 8\.4 | | | 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 | - [Category](#category) # <a name='synopsis'></a>SYNOPSIS package require Tcl 8\.4 package require Tk 8\.4 package require ipentry ?0\.3\.1? [__::ipentry::ipentry__ *pathName* ?*option* *value*\.\.\.?](#1) [__::ipentry::ipentry6__ *pathName* ?*option* *value*\.\.\.?](#2) [*pathName* __complete__](#3) [*pathName* __get__](#4) [*pathName* __insert__ *iplist*](#5) [*pathName* __icursor__ *index*](#6) |
︙ | ︙ |
Changes to embedded/md/tklib/files/modules/khim/khim.md.
1 2 3 | [//000000001]: # (khim \- Kevin's Hacky Input Method) [//000000002]: # (Generated from file 'khim\.man' by tcllib/doctools with format 'markdown') | | | 1 2 3 4 5 6 7 8 9 10 11 | [//000000001]: # (khim \- Kevin's Hacky Input Method) [//000000002]: # (Generated from file 'khim\.man' by tcllib/doctools with format 'markdown') [//000000003]: # (khim\(n\) 1\.0\.2 tklib "Kevin's Hacky Input Method") <hr> [ <a href="../../../../toc.md">Main Table Of Contents</a> | <a href="../../../toc.md">Table Of Contents</a> | <a href="../../../../index.md">Keyword Index</a> | <a href="../../../../toc0.md">Categories</a> | <a href="../../../../toc1.md">Modules</a> | <a href="../../../../toc2.md">Applications</a> ] <hr> |
︙ | ︙ | |||
32 33 34 35 36 37 38 | - [Bugs, Ideas, Feedback](#section5) - [Keywords](#keywords) # <a name='synopsis'></a>SYNOPSIS package require Tcl | | | 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 | - [Bugs, Ideas, Feedback](#section5) - [Keywords](#keywords) # <a name='synopsis'></a>SYNOPSIS package require Tcl package require khim ?1\.0\.2? [__::khim::getOptions__ *path*](#1) [__::khim::getConfig__](#2) [__::khim::setConfig__ *version* *enabled* *compose* *map*](#3) [__::khim::showHelp__ *path*](#4) # <a name='description'></a>DESCRIPTION |
︙ | ︙ |
Changes to embedded/md/tklib/files/modules/shtmlview/shtmlview.md.
1 2 3 4 5 6 7 | [//000000001]: # (shtmlview \- Basic HTML and Markdown viewer widget) [//000000002]: # (Generated from file 'shtmlview\.man' by tcllib/doctools with format 'markdown') [//000000003]: # (Copyright © 2018\-2022, Detlef Groth <detlef\(at\)dgroth\(dot\)de>) [//000000004]: # (Copyright © 2009, Robert Heller) [//000000005]: # (Copyright © 2000, Clif Flynt) [//000000006]: # (Copyright © 1995\-1999, Stephen Uhler) | | | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | [//000000001]: # (shtmlview \- Basic HTML and Markdown viewer widget) [//000000002]: # (Generated from file 'shtmlview\.man' by tcllib/doctools with format 'markdown') [//000000003]: # (Copyright © 2018\-2022, Detlef Groth <detlef\(at\)dgroth\(dot\)de>) [//000000004]: # (Copyright © 2009, Robert Heller) [//000000005]: # (Copyright © 2000, Clif Flynt) [//000000006]: # (Copyright © 1995\-1999, Stephen Uhler) [//000000007]: # (shtmlview\(n\) 1\.1\.1 tklib "Basic HTML and Markdown viewer widget") <hr> [ <a href="../../../../toc.md">Main Table Of Contents</a> | <a href="../../../toc.md">Table Of Contents</a> | <a href="../../../../index.md">Keyword Index</a> | <a href="../../../../toc0.md">Categories</a> | <a href="../../../../toc1.md">Modules</a> | <a href="../../../../toc2.md">Applications</a> ] <hr> |
︙ | ︙ | |||
57 58 59 60 61 62 63 | # <a name='synopsis'></a>SYNOPSIS package require Tk package require snit package require Markdown ;\# optional Markdown support package require img::jpeg ;\# optional jpeg image support | | | 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 | # <a name='synopsis'></a>SYNOPSIS package require Tk package require snit package require Markdown ;\# optional Markdown support package require img::jpeg ;\# optional jpeg image support package require shtmlview::shtmlview ?1\.1\.1? [__::shtmlview::converter__ *extension* *description* *cmdprefix*](#1) [__::shtmlview::shtmlview__ *pathName* ?*options*?](#2) [*pathName* __back__](#3) [*pathName* __browse__ *filename* ?args?](#4) [*pathName* __dosearch__ *string* *direction*](#5) [*pathName* __edittext__ *cmd* ?*options*?](#6) |
︙ | ︙ |
Changes to idoc/man/files/modules/ico/ico.n.
1 2 3 | '\" '\" Generated from file 'ico\&.man' by tcllib/doctools with format 'nroff' '\" | | | 1 2 3 4 5 6 7 8 9 10 11 | '\" '\" Generated from file 'ico\&.man' by tcllib/doctools with format 'nroff' '\" .TH "ico" n 1\&.1\&.2 tklib "Windows ICO handling" .\" The -*- nroff -*- definitions below are for supplemental macros used .\" in Tcl/Tk manual entries. .\" .\" .AP type name in/out ?indent? .\" Start paragraph describing an argument to a library procedure. .\" type is type of argument (int, etc.), in/out is either "in", "out", .\" or "in/out" to describe whether procedure reads or modifies arg, |
︙ | ︙ | |||
271 272 273 274 275 276 277 | .. .BS .SH NAME ico \- Reading and writing windows icons .SH SYNOPSIS package require \fBTcl 8\&.4\fR .sp | | | 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 | .. .BS .SH NAME ico \- Reading and writing windows icons .SH SYNOPSIS package require \fBTcl 8\&.4\fR .sp package require \fBico ?1\&.1\&.2?\fR .sp \fB::ico::icons\fR \fIfile\fR ?\fIoption\fR \fIvalue\fR\&.\&.\&.? .sp \fB::ico::iconMembers\fR \fIfile\fR \fIname\fR ?\fIoption\fR \fIvalue\fR\&.\&.\&.? .sp \fB::ico::getIcon\fR \fIfile\fR \fIname\fR ?\fIoption\fR \fIvalue\fR\&.\&.\&.? .sp |
︙ | ︙ |
Changes to idoc/man/files/modules/ipentry/ipentry.n.
1 2 3 | '\" '\" Generated from file 'ipentry\&.man' by tcllib/doctools with format 'nroff' '\" | | | 1 2 3 4 5 6 7 8 9 10 11 | '\" '\" Generated from file 'ipentry\&.man' by tcllib/doctools with format 'nroff' '\" .TH "ipentry" n 0\&.3\&.1 tklib "An IP address entry widget" .\" The -*- nroff -*- definitions below are for supplemental macros used .\" in Tcl/Tk manual entries. .\" .\" .AP type name in/out ?indent? .\" Start paragraph describing an argument to a library procedure. .\" type is type of argument (int, etc.), in/out is either "in", "out", .\" or "in/out" to describe whether procedure reads or modifies arg, |
︙ | ︙ | |||
273 274 275 276 277 278 279 | .SH NAME ipentry \- An IP address entry widget .SH SYNOPSIS package require \fBTcl 8\&.4\fR .sp package require \fBTk 8\&.4\fR .sp | | | 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 | .SH NAME ipentry \- An IP address entry widget .SH SYNOPSIS package require \fBTcl 8\&.4\fR .sp package require \fBTk 8\&.4\fR .sp package require \fBipentry ?0\&.3\&.1?\fR .sp \fB::ipentry::ipentry\fR \fIpathName\fR ?\fIoption\fR \fIvalue\fR\&.\&.\&.? .sp \fB::ipentry::ipentry6\fR \fIpathName\fR ?\fIoption\fR \fIvalue\fR\&.\&.\&.? .sp \fIpathName\fR \fBcomplete\fR .sp |
︙ | ︙ |
Changes to idoc/man/files/modules/khim/khim.n.
1 2 3 | '\" '\" Generated from file 'khim\&.man' by tcllib/doctools with format 'nroff' '\" | | | 1 2 3 4 5 6 7 8 9 10 11 | '\" '\" Generated from file 'khim\&.man' by tcllib/doctools with format 'nroff' '\" .TH "khim" n 1\&.0\&.2 tklib "Kevin's Hacky Input Method" .\" The -*- nroff -*- definitions below are for supplemental macros used .\" in Tcl/Tk manual entries. .\" .\" .AP type name in/out ?indent? .\" Start paragraph describing an argument to a library procedure. .\" type is type of argument (int, etc.), in/out is either "in", "out", .\" or "in/out" to describe whether procedure reads or modifies arg, |
︙ | ︙ | |||
271 272 273 274 275 276 277 | .. .BS .SH NAME khim \- Provides key bindings for entering international characters on a keyboard that does not support them .SH SYNOPSIS package require \fBTcl \fR .sp | | | 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 | .. .BS .SH NAME khim \- Provides key bindings for entering international characters on a keyboard that does not support them .SH SYNOPSIS package require \fBTcl \fR .sp package require \fBkhim ?1\&.0\&.2?\fR .sp \fB::khim::getOptions\fR \fIpath\fR .sp \fB::khim::getConfig\fR .sp \fB::khim::setConfig\fR \fIversion\fR \fIenabled\fR \fIcompose\fR \fImap\fR .sp |
︙ | ︙ |
Changes to idoc/man/files/modules/shtmlview/shtmlview.n.
1 2 3 4 5 6 7 | '\" '\" Generated from file 'shtmlview\&.man' by tcllib/doctools with format 'nroff' '\" Copyright (c) 2018-2022, Detlef Groth <detlef(at)dgroth(dot)de> '\" Copyright (c) 2009, Robert Heller '\" Copyright (c) 2000, Clif Flynt '\" Copyright (c) 1995-1999, Stephen Uhler '\" | | | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | '\" '\" Generated from file 'shtmlview\&.man' by tcllib/doctools with format 'nroff' '\" Copyright (c) 2018-2022, Detlef Groth <detlef(at)dgroth(dot)de> '\" Copyright (c) 2009, Robert Heller '\" Copyright (c) 2000, Clif Flynt '\" Copyright (c) 1995-1999, Stephen Uhler '\" .TH "shtmlview" n 1\&.1\&.1 tklib "Basic HTML and Markdown viewer widget" .\" The -*- nroff -*- definitions below are for supplemental macros used .\" in Tcl/Tk manual entries. .\" .\" .AP type name in/out ?indent? .\" Start paragraph describing an argument to a library procedure. .\" type is type of argument (int, etc.), in/out is either "in", "out", .\" or "in/out" to describe whether procedure reads or modifies arg, |
︙ | ︙ | |||
281 282 283 284 285 286 287 | .sp package require \fBsnit \fR .sp package require \fBMarkdown ;# optional Markdown support \fR .sp package require \fBimg::jpeg ;# optional jpeg image support \fR .sp | | | 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 | .sp package require \fBsnit \fR .sp package require \fBMarkdown ;# optional Markdown support \fR .sp package require \fBimg::jpeg ;# optional jpeg image support \fR .sp package require \fBshtmlview::shtmlview ?1\&.1\&.1?\fR .sp \fB::shtmlview::converter\fR \fIextension\fR \fIdescription\fR \fIcmdprefix\fR .sp \fB::shtmlview::shtmlview\fR \fIpathName\fR ?\fIoptions\fR? .sp \fIpathName\fR \fBback\fR .sp |
︙ | ︙ |
Changes to idoc/www/tklib/files/modules/ico/ico.html.
︙ | ︙ | |||
101 102 103 104 105 106 107 | | <a href="../../../toc.html">Table Of Contents</a> | <a href="../../../../index.html">Keyword Index</a> | <a href="../../../../toc0.html">Categories</a> | <a href="../../../../toc1.html">Modules</a> | <a href="../../../../toc2.html">Applications</a> ] <hr> <div class="doctools"> | | | | 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 | | <a href="../../../toc.html">Table Of Contents</a> | <a href="../../../../index.html">Keyword Index</a> | <a href="../../../../toc0.html">Categories</a> | <a href="../../../../toc1.html">Modules</a> | <a href="../../../../toc2.html">Applications</a> ] <hr> <div class="doctools"> <h1 class="doctools_title">ico(n) 1.1.2 tklib "Windows ICO handling"</h1> <div id="name" class="doctools_section"><h2><a name="name">Name</a></h2> <p>ico - Reading and writing windows icons</p> </div> <div id="toc" class="doctools_section"><h2><a name="toc">Table Of Contents</a></h2> <ul class="doctools_toc"> <li class="doctools_section"><a href="#toc">Table Of Contents</a></li> <li class="doctools_section"><a href="#synopsis">Synopsis</a></li> <li class="doctools_section"><a href="#section1">Description</a></li> <li class="doctools_section"><a href="#section2">API</a></li> <li class="doctools_section"><a href="#section3">EXAMPLE</a></li> <li class="doctools_section"><a href="#section4">LIMITATIONS</a></li> <li class="doctools_section"><a href="#section5">Bugs, Ideas, Feedback</a></li> <li class="doctools_section"><a href="#keywords">Keywords</a></li> </ul> </div> <div id="synopsis" class="doctools_section"><h2><a name="synopsis">Synopsis</a></h2> <div class="doctools_synopsis"> <ul class="doctools_requirements"> <li>package require <b class="pkgname">Tcl 8.4</b></li> <li>package require <b class="pkgname">ico <span class="opt">?1.1.2?</span></b></li> </ul> <ul class="doctools_syntax"> <li><a href="#1"><b class="cmd">::ico::icons</b> <i class="arg">file</i> <span class="opt">?<i class="arg">option</i> <i class="arg">value</i>...?</span></a></li> <li><a href="#2"><b class="cmd">::ico::iconMembers</b> <i class="arg">file</i> <i class="arg">name</i> <span class="opt">?<i class="arg">option</i> <i class="arg">value</i>...?</span></a></li> <li><a href="#3"><b class="cmd">::ico::getIcon</b> <i class="arg">file</i> <i class="arg">name</i> <span class="opt">?<i class="arg">option</i> <i class="arg">value</i>...?</span></a></li> <li><a href="#4"><b class="cmd">::ico::getIconByName</b> <i class="arg">file</i> <i class="arg">name</i> <span class="opt">?<i class="arg">option</i> <i class="arg">value</i>...?</span></a></li> <li><a href="#5"><b class="cmd">::ico::getFileIcon</b> <i class="arg">file</i> <span class="opt">?<i class="arg">option</i> <i class="arg">value</i>...?</span></a></li> |
︙ | ︙ |
Changes to idoc/www/tklib/files/modules/ipentry/ipentry.html.
︙ | ︙ | |||
101 102 103 104 105 106 107 | | <a href="../../../toc.html">Table Of Contents</a> | <a href="../../../../index.html">Keyword Index</a> | <a href="../../../../toc0.html">Categories</a> | <a href="../../../../toc1.html">Modules</a> | <a href="../../../../toc2.html">Applications</a> ] <hr> <div class="doctools"> | | | | 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 | | <a href="../../../toc.html">Table Of Contents</a> | <a href="../../../../index.html">Keyword Index</a> | <a href="../../../../toc0.html">Categories</a> | <a href="../../../../toc1.html">Modules</a> | <a href="../../../../toc2.html">Applications</a> ] <hr> <div class="doctools"> <h1 class="doctools_title">ipentry(n) 0.3.1 tklib "An IP address entry widget"</h1> <div id="name" class="doctools_section"><h2><a name="name">Name</a></h2> <p>ipentry - An IP address entry widget</p> </div> <div id="toc" class="doctools_section"><h2><a name="toc">Table Of Contents</a></h2> <ul class="doctools_toc"> <li class="doctools_section"><a href="#toc">Table Of Contents</a></li> <li class="doctools_section"><a href="#synopsis">Synopsis</a></li> <li class="doctools_section"><a href="#section1">Description</a></li> <li class="doctools_section"><a href="#section2">Widget options</a></li> <li class="doctools_section"><a href="#section3">Bugs, Ideas, Feedback</a></li> <li class="doctools_section"><a href="#keywords">Keywords</a></li> <li class="doctools_section"><a href="#category">Category</a></li> </ul> </div> <div id="synopsis" class="doctools_section"><h2><a name="synopsis">Synopsis</a></h2> <div class="doctools_synopsis"> <ul class="doctools_requirements"> <li>package require <b class="pkgname">Tcl 8.4</b></li> <li>package require <b class="pkgname">Tk 8.4</b></li> <li>package require <b class="pkgname">ipentry <span class="opt">?0.3.1?</span></b></li> </ul> <ul class="doctools_syntax"> <li><a href="#1"><b class="cmd">::ipentry::ipentry</b> <i class="arg">pathName</i> <span class="opt">?<i class="arg">option</i> <i class="arg">value</i>...?</span></a></li> <li><a href="#2"><b class="cmd">::ipentry::ipentry6</b> <i class="arg">pathName</i> <span class="opt">?<i class="arg">option</i> <i class="arg">value</i>...?</span></a></li> <li><a href="#3"><i class="arg">pathName</i> <b class="method">complete</b></a></li> <li><a href="#4"><i class="arg">pathName</i> <b class="method">get</b></a></li> <li><a href="#5"><i class="arg">pathName</i> <b class="method">insert</b> <i class="arg">iplist</i></a></li> |
︙ | ︙ |
Changes to idoc/www/tklib/files/modules/khim/khim.html.
︙ | ︙ | |||
101 102 103 104 105 106 107 | | <a href="../../../toc.html">Table Of Contents</a> | <a href="../../../../index.html">Keyword Index</a> | <a href="../../../../toc0.html">Categories</a> | <a href="../../../../toc1.html">Modules</a> | <a href="../../../../toc2.html">Applications</a> ] <hr> <div class="doctools"> | | | | 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 | | <a href="../../../toc.html">Table Of Contents</a> | <a href="../../../../index.html">Keyword Index</a> | <a href="../../../../toc0.html">Categories</a> | <a href="../../../../toc1.html">Modules</a> | <a href="../../../../toc2.html">Applications</a> ] <hr> <div class="doctools"> <h1 class="doctools_title">khim(n) 1.0.2 tklib "Kevin's Hacky Input Method"</h1> <div id="name" class="doctools_section"><h2><a name="name">Name</a></h2> <p>khim - Provides key bindings for entering international characters on a keyboard that does not support them</p> </div> <div id="toc" class="doctools_section"><h2><a name="toc">Table Of Contents</a></h2> <ul class="doctools_toc"> <li class="doctools_section"><a href="#toc">Table Of Contents</a></li> <li class="doctools_section"><a href="#synopsis">Synopsis</a></li> <li class="doctools_section"><a href="#section1">Description</a></li> <li class="doctools_section"><a href="#section2">PROCEDURES</a></li> <li class="doctools_section"><a href="#section3">LOCALISATION</a></li> <li class="doctools_section"><a href="#section4">ACKNOWLEDGMENTS</a></li> <li class="doctools_section"><a href="#section5">Bugs, Ideas, Feedback</a></li> <li class="doctools_section"><a href="#keywords">Keywords</a></li> </ul> </div> <div id="synopsis" class="doctools_section"><h2><a name="synopsis">Synopsis</a></h2> <div class="doctools_synopsis"> <ul class="doctools_requirements"> <li>package require <b class="pkgname">Tcl</b></li> <li>package require <b class="pkgname">khim <span class="opt">?1.0.2?</span></b></li> </ul> <ul class="doctools_syntax"> <li><a href="#1"><b class="cmd">::khim::getOptions</b> <i class="arg">path</i></a></li> <li><a href="#2"><b class="cmd">::khim::getConfig</b></a></li> <li><a href="#3"><b class="cmd">::khim::setConfig</b> <i class="arg">version</i> <i class="arg">enabled</i> <i class="arg">compose</i> <i class="arg">map</i></a></li> <li><a href="#4"><b class="cmd">::khim::showHelp</b> <i class="arg">path</i></a></li> </ul> |
︙ | ︙ |
Changes to idoc/www/tklib/files/modules/shtmlview/shtmlview.html.
︙ | ︙ | |||
103 104 105 106 107 108 109 | | <a href="../../../toc.html">Table Of Contents</a> | <a href="../../../../index.html">Keyword Index</a> | <a href="../../../../toc0.html">Categories</a> | <a href="../../../../toc1.html">Modules</a> | <a href="../../../../toc2.html">Applications</a> ] <hr> <div class="doctools"> | | | 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 | | <a href="../../../toc.html">Table Of Contents</a> | <a href="../../../../index.html">Keyword Index</a> | <a href="../../../../toc0.html">Categories</a> | <a href="../../../../toc1.html">Modules</a> | <a href="../../../../toc2.html">Applications</a> ] <hr> <div class="doctools"> <h1 class="doctools_title">shtmlview(n) 1.1.1 tklib "Basic HTML and Markdown viewer widget"</h1> <div id="name" class="doctools_section"><h2><a name="name">Name</a></h2> <p>shtmlview - Extended Tcl/Tk text widget with basic support for rendering of HTML and Markdown</p> </div> <div id="toc" class="doctools_section"><h2><a name="toc">Table Of Contents</a></h2> <ul class="doctools_toc"> <li class="doctools_section"><a href="#toc">Table Of Contents</a></li> <li class="doctools_section"><a href="#synopsis">Synopsis</a></li> |
︙ | ︙ | |||
135 136 137 138 139 140 141 | <div id="synopsis" class="doctools_section"><h2><a name="synopsis">Synopsis</a></h2> <div class="doctools_synopsis"> <ul class="doctools_requirements"> <li>package require <b class="pkgname">Tk</b></li> <li>package require <b class="pkgname">snit</b></li> <li>package require <b class="pkgname">Markdown ;# optional Markdown support</b></li> <li>package require <b class="pkgname">img::jpeg ;# optional jpeg image support</b></li> | | | 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 | <div id="synopsis" class="doctools_section"><h2><a name="synopsis">Synopsis</a></h2> <div class="doctools_synopsis"> <ul class="doctools_requirements"> <li>package require <b class="pkgname">Tk</b></li> <li>package require <b class="pkgname">snit</b></li> <li>package require <b class="pkgname">Markdown ;# optional Markdown support</b></li> <li>package require <b class="pkgname">img::jpeg ;# optional jpeg image support</b></li> <li>package require <b class="pkgname">shtmlview::shtmlview <span class="opt">?1.1.1?</span></b></li> </ul> <ul class="doctools_syntax"> <li><a href="#1"><b class="cmd">::shtmlview::converter</b> <i class="arg">extension</i> <i class="arg">description</i> <i class="arg">cmdprefix</i></a></li> <li><a href="#2"><b class="cmd">::shtmlview::shtmlview</b> <i class="arg">pathName</i> <span class="opt">?<i class="arg">options</i>?</span></a></li> <li><a href="#3"><i class="arg">pathName</i> <b class="method">back</b></a></li> <li><a href="#4"><i class="arg">pathName</i> <b class="method">browse</b> <i class="arg">filename</i> <span class="opt">?args?</span></a></li> <li><a href="#5"><i class="arg">pathName</i> <b class="method">dosearch</b> <i class="arg">string</i> <i class="arg">direction</i></a></li> |
︙ | ︙ |
Changes to modules/canvas/canvas_pdf.tcl.
1 2 3 4 5 6 7 8 9 | # *- tcl -*- # ### ### ### ######### ######### ######### # Copyright (c) 2014 andreas Kupries, Arjen Markus # OLL licensed (http://wiki.tcl.tk/10892). # ### ### ### ######### ######### ######### ## Requisites | | | | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | # *- tcl -*- # ### ### ### ######### ######### ######### # Copyright (c) 2014 andreas Kupries, Arjen Markus # OLL licensed (http://wiki.tcl.tk/10892). # ### ### ### ######### ######### ######### ## Requisites package require Tcl 8.5- package require Tk 8.5- package require pdf4tcl package require fileutil namespace eval ::canvas {} # ### ### ### ######### ######### ######### ## Implementation. |
︙ | ︙ |
Changes to modules/ico/ico.man.
1 | [comment {-*- tcl -*- doctools manpage}] | | | 1 2 3 4 5 6 7 8 9 | [comment {-*- tcl -*- doctools manpage}] [vset VERSION 1.1.2] [manpage_begin ico n [vset VERSION]] [keywords dll] [keywords entry] [keywords exe] [keywords ico] [keywords icon] [moddesc {Windows ICO handling}] |
︙ | ︙ |
Changes to modules/ico/ico.tcl.
1 2 3 4 5 6 | # ico.tcl -- # # Win32 ico manipulation code # # Copyright (c) 2003-2007 Aaron Faupell # Copyright (c) 2003-2011 ActiveState | < < | 1 2 3 4 5 6 7 8 9 10 11 12 13 | # ico.tcl -- # # Win32 ico manipulation code # # Copyright (c) 2003-2007 Aaron Faupell # Copyright (c) 2003-2011 ActiveState # Sample usage: # set file bin/wish.exe # set icos [::ico::icons $file] # set img [::ico::getIcon $file [lindex $icos 1] -format image -res 32] package require Tcl 8.4- |
︙ | ︙ | |||
429 430 431 432 433 434 435 | } set file [file normalize $exeFile] FindResources $file if {$icoDir == ""} { set icoDir [file dirname $file] } | | < | < | 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 | } set file [file normalize $exeFile] FindResources $file if {$icoDir == ""} { set icoDir [file dirname $file] } set fh [open $file rb] foreach group $RES($file,group,names) { set dir {} set data {} foreach icon $RES($file,group,$group,members) { seek $fh $RES($file,icon,$icon,offset) start set ico $RES($file,icon,$icon,data) eval [list lappend dir] $ico append data [read $fh [eval calcSize $ico 40]] } # write them out to a file set ifh [open [file join $icoDir [file tail $exeFile]-$group.ico] wb+] bputs $ifh sss 0 1 [llength $RES($file,group,$group,members)] set offset [expr {6 + ([llength $RES($file,group,$group,members)] * 16)}] foreach {w h bpp} $dir { set len [calcSize $w $h $bpp 40] lappend fix $offset $len bputs $ifh ccccssii $w $h [expr {$bpp <= 8 ? 1 << $bpp : 0}] 0 1 $bpp $len $offset |
︙ | ︙ | |||
851 852 853 854 855 856 857 | append and $tmp } return [list $w $h $bpp $palette $xor $and] } proc ::ico::getIconListICO {file} { | | < | 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 | append and $tmp } return [list $w $h $bpp $palette $xor $and] } proc ::ico::getIconListICO {file} { set fh [open $file rb] if {"[getword $fh] [getword $fh]" ne "0 1"} { return -code error "not an icon file" } close $fh return 0 } |
︙ | ︙ | |||
901 902 903 904 905 906 907 | set ret "" foreach x $RES($file,group,$name,members) { lappend ret [linsert $RES($file,icon,$x,data) 0 $x] } return $ret } | | < | 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 | set ret "" foreach x $RES($file,group,$name,members) { lappend ret [linsert $RES($file,icon,$x,data) 0 $x] } return $ret } set fh [open $file rb] # both words must be read to keep in sync with later reads if {"[getword $fh] [getword $fh]" ne "0 1"} { close $fh return -code error "not an icon file" } |
︙ | ︙ | |||
992 993 994 995 996 997 998 | } return $ret } # returns an icon in the form: # {width height depth palette xor_mask and_mask} proc ::ico::getRawIconDataICO {file name} { | | < | 986 987 988 989 990 991 992 993 994 995 996 997 998 999 1000 | } return $ret } # returns an icon in the form: # {width height depth palette xor_mask and_mask} proc ::ico::getRawIconDataICO {file name} { set fh [open $file rb] # both words must be read to keep in sync with later reads if {"[getword $fh] [getword $fh]" ne "0 1"} { close $fh return -code error "not an icon file" } set num [getword $fh] |
︙ | ︙ | |||
1070 1071 1072 1073 1074 1075 1076 | proc ::ico::getRawIconDataEXE {file name} { variable RES set file [file normalize $file] FindResources $file if {![info exists RES($file,icon,$name,offset)]} { error "No icon \"$name\"" } | | < | < | < | 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 | proc ::ico::getRawIconDataEXE {file name} { variable RES set file [file normalize $file] FindResources $file if {![info exists RES($file,icon,$name,offset)]} { error "No icon \"$name\"" } set fh [open $file rb] seek $fh $RES($file,icon,$name,offset) start # readDIB returns: {w h bpp palette xor and} set dib [readDIB $fh] close $fh return $dib } proc ::ico::writeIconICO {file name w h bpp palette xor and} { if {![file exists $file]} { set fh [open $file wb+] set num 0 } else { set fh [open $file rb+] if {"[getword $fh] [getword $fh]" ne "0 1"} { close $fh return -code error "not an icon file" } set num [getword $fh] seek $fh [expr {6 + (16 * $num)}] start } |
︙ | ︙ | |||
1171 1172 1173 1174 1175 1176 1177 | set input $new append input [join $data {}] return $name } proc ::ico::writeIconBMP {file name w h bpp palette xor and} { | | < | 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 | set input $new append input [join $data {}] return $name } proc ::ico::writeIconBMP {file name w h bpp palette xor and} { set fh [open $file wb+] set size [expr {[string length $palette] + [string length $xor]}] # bitmap header: magic, file size, reserved, reserved, offset of bitmap data bputs $fh a2issi BM [expr {14 + 40 + $size}] 0 0 54 bputs $fh iiissiiiiii 40 $w $h 1 $bpp 0 $size 0 0 0 0 puts -nonewline $fh $palette$xor close $fh } |
︙ | ︙ | |||
1194 1195 1196 1197 1198 1199 1200 | if {![info exists RES($file,icon,$name,data)]} { return -code error "no icon \"$name\"" } if {"$w $h $bpp" != $RES($file,icon,$name,data)} { return -code error "icon format differs from original" } | | < | < | 1183 1184 1185 1186 1187 1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 1200 1201 1202 1203 1204 1205 1206 1207 1208 1209 1210 1211 | if {![info exists RES($file,icon,$name,data)]} { return -code error "no icon \"$name\"" } if {"$w $h $bpp" != $RES($file,icon,$name,data)} { return -code error "icon format differs from original" } set fh [open $file rb+] seek $fh [expr {$RES($file,icon,$name,offset) + 40}] start puts -nonewline $fh $palette$xor$and close $fh } proc ::ico::FindResources {file} { variable RES if {[info exists RES($file,group,names)]} { return [llength $RES($file,group,names)] } set fh [open $file rb] if {[read $fh 2] ne "MZ"} { close $fh return -code error "file is not a valid executable" } seek $fh 60 start seek $fh [getword $fh] start set sig [read $fh 4] |
︙ | ︙ | |||
1460 1461 1462 1463 1464 1465 1466 | interp alias {} ::ico::getRawIconDataDLL {} ::ico::getRawIconDataEXE interp alias {} ::ico::writeIconDLL {} ::ico::writeIconEXE interp alias {} ::ico::getIconListICL {} ::ico::getIconListEXE interp alias {} ::ico::getIconMembersICL {} ::ico::getIconMembersEXE interp alias {} ::ico::getRawIconDataICL {} ::ico::getRawIconDataEXE interp alias {} ::ico::writeIconICL {} ::ico::writeIconEXE | | | 1447 1448 1449 1450 1451 1452 1453 1454 | interp alias {} ::ico::getRawIconDataDLL {} ::ico::getRawIconDataEXE interp alias {} ::ico::writeIconDLL {} ::ico::writeIconEXE interp alias {} ::ico::getIconListICL {} ::ico::getIconListEXE interp alias {} ::ico::getIconMembersICL {} ::ico::getIconMembersEXE interp alias {} ::ico::getRawIconDataICL {} ::ico::getRawIconDataEXE interp alias {} ::ico::writeIconICL {} ::ico::writeIconEXE package provide ico 1.1.2 |
Changes to modules/ico/ico0.tcl.
︙ | ︙ | |||
278 279 280 281 282 283 284 | variable ICONS set file [file normalize $exeFile] set cnt [SearchForIcos $file] set dir {} set data {} | | < | < | 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 | variable ICONS set file [file normalize $exeFile] set cnt [SearchForIcos $file] set dir {} set data {} set fh [open $file rb] for {set i 0} {$i <= $cnt} {incr i} { seek $fh $ICONS($file,$i) start set ico $ICONS($file,$i,data) eval [list lappend dir] $ico append data [read $fh [eval calcSize $ico 40]] } close $fh # write them out to a file set ifh [open $icoFile wb+] bputs $ifh sss 0 1 [expr {$cnt + 1}] set offset [expr {6 + (($cnt + 1) * 16)}] foreach {w h bpp} $dir { set colors 0 if {$bpp <= 8} {set colors [expr {1 << $bpp}]} set s [calcSize $w $h $bpp 40] |
︙ | ︙ | |||
693 694 695 696 697 698 699 | append and $tmp } return [list $w $h $bpp $palette $xor $and] } proc ::ico::getIconListICO {file} { | | < | 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 | append and $tmp } return [list $w $h $bpp $palette $xor $and] } proc ::ico::getIconListICO {file} { set fh [open $file rb] # both words must be read to keep in sync with later reads if {"[getword $fh] [getword $fh]" ne "0 1"} { return -code error "not an icon file" } set num [getword $fh] set r {} |
︙ | ︙ | |||
775 776 777 778 779 780 781 | return $icons } # returns an icon in the form: # {width height depth palette xor_mask and_mask} proc ::ico::getRawIconDataICO {file index} { | | < | 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 | return $icons } # returns an icon in the form: # {width height depth palette xor_mask and_mask} proc ::ico::getRawIconDataICO {file index} { set fh [open $file rb] # both words must be read to keep in sync with later reads if {"[getword $fh] [getword $fh]" ne "0 1"} { close $fh return -code error "not an icon file" } if {$index < 0 || $index >= [getword $fh]} { |
︙ | ︙ | |||
853 854 855 856 857 858 859 | variable ICONS set file [file normalize $file] set cnt [SearchForIcos $file $index] if {$cnt < $index} { return -code error "index out of range" } | | < | < | < | 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 | variable ICONS set file [file normalize $file] set cnt [SearchForIcos $file $index] if {$cnt < $index} { return -code error "index out of range" } set fh [open $file rb] seek $fh $ICONS($file,$index) start # readDIB returns: {w h bpp palette xor and} set dib [readDIB $fh] close $fh return $dib } proc ::ico::writeIconICO {file index w h bpp palette xor and} { if {![file exists $file]} { set fh [open $file wb+] bputs $fh sss 0 1 0 seek $fh 0 start } else { set fh [open $file rb+] } if {[file size $file] > 4 && "[getword $fh] [getword $fh]" ne "0 1"} { close $fh return -code error "not an icon file" } set num [getword $fh] if {$index eq "end"} { set index $num } |
︙ | ︙ | |||
961 962 963 964 965 966 967 | append data [binary format ccccssii $w $h $colors 0 0 $bpp [expr {$size + 40}] 22] append data [binary format iiissiiiiii 40 $w [expr {$h * 2}] 1 $bpp 0 $size 0 0 0 0] append data $palette $xor $and } proc ::ico::writeIconBMP {file index w h bpp palette xor and} { if {$index != 0} {return -code error "index out of range"} | | < | 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 | append data [binary format ccccssii $w $h $colors 0 0 $bpp [expr {$size + 40}] 22] append data [binary format iiissiiiiii 40 $w [expr {$h * 2}] 1 $bpp 0 $size 0 0 0 0] append data $palette $xor $and } proc ::ico::writeIconBMP {file index w h bpp palette xor and} { if {$index != 0} {return -code error "index out of range"} set fh [open $file wb+] set size [expr {[string length $palette] + [string length $xor]}] # bitmap header: magic, file size, reserved, reserved, offset of bitmap data bputs $fh a2issi BM [expr {14 + 40 + $size}] 0 0 54 bputs $fh iiissiiiiii 40 $w $h 1 $bpp 0 $size 0 0 0 0 puts -nonewline $fh $palette$xor close $fh } |
︙ | ︙ | |||
984 985 986 987 988 989 990 | if {$index eq "end"} {set index $cnt} if {$cnt < $index} { return -code error "index out of range" } if {[list $w $h $bpp] != $ICONS($file,$index,data)} { return -code error "icon format differs from original" } | | < | < | 976 977 978 979 980 981 982 983 984 985 986 987 988 989 990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 | if {$index eq "end"} {set index $cnt} if {$cnt < $index} { return -code error "index out of range" } if {[list $w $h $bpp] != $ICONS($file,$index,data)} { return -code error "icon format differs from original" } set fh [open $file rb+] seek $fh [expr {$ICONS($file,$index) + 40}] start puts -nonewline $fh $palette$xor$and close $fh } proc ::ico::SearchForIcos {file {index -1}} { variable ICONS ; # stores icos offsets by index, and [list w h bpp] if {[info exists ICONS($file,$index)]} { return $ICONS($file,$index) } set fh [open $file rb] if {[read $fh 2] ne "MZ"} { close $fh return -code error "unknown file format" } seek $fh 60 start seek $fh [getword $fh] start set sig [read $fh 4] |
︙ | ︙ | |||
1186 1187 1188 1189 1190 1191 1192 | update idletasks } } grid rowconfigure $parent 0 -weight 1 grid columnconfigure $parent 0 -weight 1 } | | | 1176 1177 1178 1179 1180 1181 1182 1183 | update idletasks } } grid rowconfigure $parent 0 -weight 1 grid columnconfigure $parent 0 -weight 1 } package provide ico 0.3.4 |
Changes to modules/ico/pkgIndex.tcl.
1 2 3 4 5 | # pkgIndex.tcl -- # # Copyright (c) 2003 ActiveState Corporation. # All rights reserved. | | | | 1 2 3 4 5 6 7 | # pkgIndex.tcl -- # # Copyright (c) 2003 ActiveState Corporation. # All rights reserved. package ifneeded ico 0.3.4 [list source [file join $dir ico0.tcl]] package ifneeded ico 1.1.2 [list source [file join $dir ico.tcl]] |
Changes to modules/ipentry/ipentry.man.
1 | [comment {-*- tcl -*- doctools manpage}] | > | | | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | [vset VERSION 0.3.1] [comment {-*- tcl -*- doctools manpage}] [manpage_begin ipentry n [vset VERSION]] [keywords entry] [keywords {ip address}] [keywords network] [moddesc {An IP address entry widget}] [titledesc {An IP address entry widget}] [category Widget] [require Tcl 8.4] [require Tk 8.4] [require ipentry [opt [vset VERSION]]] [description] This package provides a widget for the entering of a IP address. [para] [list_begin definitions] |
︙ | ︙ |
Changes to modules/ipentry/ipentry.tcl.
1 2 3 4 5 6 7 8 9 | # ipentry.tcl -- # # An entry widget for IP addresses. # # Copyright (c) 2003-2008 Aaron Faupell <[email protected]> # Copyright (c) 2008 Pat Thoyts <[email protected]> # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. | | < < | > > | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 | # ipentry.tcl -- # # An entry widget for IP addresses. # # Copyright (c) 2003-2008 Aaron Faupell <[email protected]> # Copyright (c) 2008 Pat Thoyts <[email protected]> # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. package require Tk package provide ipentry 0.3.1 namespace eval ::ipentry { namespace export ipentry ipentry6 # copy all the bindings from Entry class to our own IPEntrybindtag class variable x foreach x [bind Entry] { bind IPEntrybindtag $x [bind Entry $x] } # then replace certain keys we are interested in with our own bind IPEntrybindtag <KeyPress> {::ipentry::keypress %W %K} bind IPEntrybindtag <BackSpace> {::ipentry::backspace %W} bind IPEntrybindtag <period> {::ipentry::dot %W} bind IPEntrybindtag <Key-Right> {::ipentry::arrow %W %K} bind IPEntrybindtag <Key-Left> {::ipentry::arrow %W %K} bind IPEntrybindtag <FocusIn> {::ipentry::FocusIn %W} |
︙ | ︙ | |||
45 46 47 48 49 50 51 52 53 54 55 56 57 58 | # IPEntryFrame.padding -sticky news # } # } # bind [winfo class .] <<ThemeChanged>> \ # [list +ttk::style layout IPEntryFrame \ # [ttk::style layout IPEntryFrame]] # } } # ipentry -- # # main entry point - construct a new ipentry widget # # ARGS: | > > | 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 | # IPEntryFrame.padding -sticky news # } # } # bind [winfo class .] <<ThemeChanged>> \ # [list +ttk::style layout IPEntryFrame \ # [ttk::style layout IPEntryFrame]] # } unset x } # ipentry -- # # main entry point - construct a new ipentry widget # # ARGS: |
︙ | ︙ |
Changes to modules/ipentry/pkgIndex.tcl.
1 | if { ![package vsatisfies [package provide Tcl] 8.4-] } { return } | | | 1 2 3 | if { ![package vsatisfies [package provide Tcl] 8.4-] } { return } package ifneeded ipentry 0.3.1 [list source [file join $dir ipentry.tcl]] |
Changes to modules/khim/khim.man.
1 | [comment {-*- tcl -*- doctools manpage}] | > | | | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | [vset VERSION 1.0.2] [comment {-*- tcl -*- doctools manpage}] [manpage_begin khim n [vset VERSION]] [keywords character] [keywords i18n] [keywords input] [keywords international] [keywords method] [moddesc {Kevin's Hacky Input Method}] [titledesc {Provides key bindings for entering international characters on a keyboard that does not support them}] [require Tcl] [require khim [opt [vset VERSION]]] [description] This package provides a set of key bindings to allow a user to enter arbitrary characters on a keyboard that does not support them. It works by designating some seldom-used key of the keyboard as a "Compose" key (this key is distinct from any key so labeled, and is often "Pause," "F12" or "L2"), and having the |
︙ | ︙ |
Changes to modules/khim/khim.tcl.
︙ | ︙ | |||
13 14 15 16 17 18 19 | # replaced with a Unicode character, which is inserted into the widget. # # Copyright (c) 2006 by Kevin B. Kenny. All rights reserved. # # Refer to the file "license.terms" for the terms and conditions of # use and redistribution of this file, and a DISCLAIMER OF ALL WARRANTEES. # | < < < | | 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 | # replaced with a Unicode character, which is inserted into the widget. # # Copyright (c) 2006 by Kevin B. Kenny. All rights reserved. # # Refer to the file "license.terms" for the terms and conditions of # use and redistribution of this file, and a DISCLAIMER OF ALL WARRANTEES. # #---------------------------------------------------------------------- package require Tcl 8.4- package require Tk 8.4- package require msgcat 1.2 package require autoscroll 1.0 package provide khim 1.0.2 namespace eval khim [list variable KHIMDir [file dirname [info script]]] namespace eval khim { namespace import ::msgcat::mc |
︙ | ︙ | |||
294 295 296 297 298 299 300 | wm title $w [mc "KHIM Controls"] bind $w <Destroy> [list ::khim::HandleDestroy $w %W] # Create GUI and manage geometry checkbutton $w.v -variable ::khim::inputUse -text [mc "Use KHIM"] label $w.l1 -text [mc "Compose key:"] | | | 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 | wm title $w [mc "KHIM Controls"] bind $w <Destroy> [list ::khim::HandleDestroy $w %W] # Create GUI and manage geometry checkbutton $w.v -variable ::khim::inputUse -text [mc "Use KHIM"] label $w.l1 -text [mc "Compose key:"] button $w.b1 -textvariable ::khim::inputComposeKey \ -command [list ::khim::GetComposeKey $w.b1] labelframe $w.lf1 -text [mc "Key sequences"] -padx 5 -pady 5 -width 400 listbox $w.lf1.lb -height 20 -yscroll [list $w.lf1.y set] \ -font {Courier 12} -width 8 -height 10 \ -exportselection 0 bind $w.lf1.lb <<ListboxSelect>> [list ::khim::Select %W] scrollbar $w.lf1.y -orient vertical -command [list $w.lf1.lb yview] |
︙ | ︙ | |||
1637 1638 1639 1640 1641 1642 1643 | if { ![info exists CMapInputCodePage($map)] } { set CMapInputCodePage($map) 0 set CMapCodePage($map) 0 } grid [label $map.l1 -text [mc {Select code page:}]] \ -row 0 -column 0 -sticky e | | | 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 | if { ![info exists CMapInputCodePage($map)] } { set CMapInputCodePage($map) 0 set CMapCodePage($map) 0 } grid [label $map.l1 -text [mc {Select code page:}]] \ -row 0 -column 0 -sticky e grid [spinbox $map.spin -textvariable ::khim::CMapInputCodePage($map) \ -width 4] \ -row 0 -column 1 -sticky w # Get canvas background from the background that a text widget would # have had. text $map.text set CMapBackground($map) [$map.text cget -background] |
︙ | ︙ | |||
2013 2014 2015 2016 2017 2018 2019 | [button .bload -text "Load config" -command "testLoadConfig"] \ [button .bsave -text "Save config" -command "testSaveConfig"] \ [button .bhelp -text "Help" -command "khim::showHelp .help"] \ [button .bquit -text "Quit" -command "exit"] \ -padx 5 -pady 5 proc testLoadConfig {} { | | | | 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 | [button .bload -text "Load config" -command "testLoadConfig"] \ [button .bsave -text "Save config" -command "testSaveConfig"] \ [button .bhelp -text "Help" -command "khim::showHelp .help"] \ [button .bquit -text "Quit" -command "exit"] \ -padx 5 -pady 5 proc testLoadConfig {} { source $::env(HOME)/.khimrc } proc testSaveConfig {} { set f [open $::env(HOME)/.khimrc w] puts $f [khim::getConfig] close $f } } |
Changes to modules/khim/pkgIndex.tcl.
|
| < < < < < < < < < < | | 1 | package ifneeded khim 1.0.2 [list source [file join $dir khim.tcl]] |
Changes to modules/shtmlview/pkgIndex.tcl.
|
| | | 1 2 3 | package ifneeded shtmlview::shtmlview 1.1.1 [list source [file join $dir shtmlview.tcl]] package ifneeded shtmlview::doctools 0.1 [list source [file join $dir shtmlview-doctools.tcl]] package ifneeded shtmlview::mkdoc 0.1 [list source [file join $dir shtmlview-mkdoc.tcl]] |
Changes to modules/shtmlview/shtmlview.man.
|
| | | 1 2 3 4 5 6 7 8 | [vset VERSION 1.1.1] [comment {-*- mode: tcl; fill-column: 80 -*- doctools manpage}] [manpage_begin shtmlview n [vset VERSION]] [see_also text] [keywords text] [keywords html] [keywords widget] [copyright {2018-2022, Detlef Groth <detlef(at)dgroth(dot)de>}] |
︙ | ︙ |
Changes to modules/shtmlview/shtmlview.tcl.
︙ | ︙ | |||
102 103 104 105 106 107 108 | lappend auto_path [file join [file dirname [info script]] .. libs] } package require Tcl 8.5- package require Tk package require snit | | | 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 | lappend auto_path [file join [file dirname [info script]] .. libs] } package require Tcl 8.5- package require Tk package require snit package provide shtmlview::shtmlview 1.1.1 # Optional packages supporting various features (jpeg images, tile/themes) # Markdown support - See bottom catch { package require img::jpeg } catch { package require tile } if {[info command luniq] eq ""} { |
︙ | ︙ | |||
1903 1904 1905 1906 1907 1908 1909 | # #} } $win insert $var(S_insert) "\n" set var(tabletext) "" set var(tablecols) [list] set var(tablemode) false | | | 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917 | # #} } $win insert $var(S_insert) "\n" set var(tabletext) "" set var(tablecols) [list] set var(tablemode) false } proc HMtag_tr {selfns win param text} { upvar #0 HM$win var upvar $text data append var(tabletext) "\n" if {[info exists var(tablemode)] && !$var(tablemode)} { $win insert $var(S_insert) "" } |
︙ | ︙ | |||
3244 3245 3246 3247 3248 3249 3250 3251 | namespace eval ::svgconvert { # collect all the include directories catch { package require critcl } if {[info command ::critcl::compiling] ne "" && [critcl::compiling]} { catch { | > > > > > > | | | | | | | | | | | | | | | | | < | | | | | | | 3244 3245 3246 3247 3248 3249 3250 3251 3252 3253 3254 3255 3256 3257 3258 3259 3260 3261 3262 3263 3264 3265 3266 3267 3268 3269 3270 3271 3272 3273 3274 3275 3276 3277 3278 3279 3280 3281 3282 3283 3284 3285 3286 3287 3288 | namespace eval ::svgconvert { # collect all the include directories catch { package require critcl } if {[info command ::critcl::compiling] ne "" && [critcl::compiling]} { # ensure that these are in the namespace, and not global variable options variable dirs variable dir variable i catch { set options [regsub -all -- -I [exec pkg-config --cflags --libs cairo --libs librsvg-2.0] "I "] set dirs [list] foreach {i dir} $options { if {$i eq "I"} { lappend dirs $dir } } critcl::clibraries -lrsvg-2 -lm -lgio-2.0 -lgdk_pixbuf-2.0 -lgobject-2.0 -lglib-2.0 -lcairo -pthread critcl::config I $dirs critcl::ccode { #include <string.h> #include <stdio.h> #include <cairo.h> #include <cairo/cairo-pdf.h> #include <cairo/cairo-svg.h> #include <librsvg/rsvg.h> } critcl::cproc svgconvert {char* svgfile char* outfile double scalex double scaley} void { // new char *epdf = ".pdf"; char *esvg = ".svg"; char *pdf = strstr(outfile, epdf); char *svg = strstr(outfile, esvg); RsvgHandle *handle; //RsvgDimensionData dimension_data; // deprecated gdouble width = 0.0; gdouble height = 0.0; GError* err = NULL; handle = rsvg_handle_new_from_file(svgfile, &err); |
︙ | ︙ |
Changes to modules/tablelist/scripts/tablelistEdit.tcl.
︙ | ︙ | |||
3291 3292 3293 3294 3295 3296 3297 | return 1 } else { set bindTags [bindtags $w] return [expr {([lsearch -exact $bindTags "MentryDateTime"] >= 0 || [lsearch -exact $bindTags "MentryMeridian"] >= 0 || [lsearch -exact $bindTags "MentryIPAddr"] >= 0 || [lsearch -exact $bindTags "MentryIPv6Addr"] >= 0) && | | | 3291 3292 3293 3294 3295 3296 3297 3298 3299 3300 3301 3302 3303 3304 3305 | return 1 } else { set bindTags [bindtags $w] return [expr {([lsearch -exact $bindTags "MentryDateTime"] >= 0 || [lsearch -exact $bindTags "MentryMeridian"] >= 0 || [lsearch -exact $bindTags "MentryIPAddr"] >= 0 || [lsearch -exact $bindTags "MentryIPv6Addr"] >= 0) && ($::mentry::version >= 3.2)}] } } } #------------------------------------------------------------------------------ # tablelist::isComboTopMapped # |
︙ | ︙ |
Changes to support/releases/history/README-0.8.md.
1 2 3 4 5 6 | Overview ======== |||||| |---:|:---|:---|---:|:---| |50|new packages|in|6|modules| | | | | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | Overview ======== |||||| |---:|:---|:---|---:|:---| |50|new packages|in|6|modules| |18|changed packages|in|15|modules| |40|internally changed packages|in|17|modules| |7|unchanged packages|in|2|modules| |122|packages, total|in|35|modules, total| Legend ====== |Change|Details|Comments| |
︙ | ︙ | |||
59 60 61 62 63 64 65 | ||map::track::map-display|0.1|| ||map::track::store::fs|0.1|| ||map::track::store::memory|0.1|| ||map::track::table-display|0.1|| ||||| |shtmlview|shtmlview::doctools|0.1|| ||shtmlview::mkdoc|0.1|| | | | 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 | ||map::track::map-display|0.1|| ||map::track::store::fs|0.1|| ||map::track::store::memory|0.1|| ||map::track::table-display|0.1|| ||||| |shtmlview|shtmlview::doctools|0.1|| ||shtmlview::mkdoc|0.1|| ||shtmlview::shtmlview|1.1.1|| ||||| |text|dgw::txmixins|0.2.0|| |treeview|dgw::tvmixins|0.3|| |widget|widget|3.1|| ||widget::arrowbutton|1.0|| ||widget::calendar|1.0.1|| ||widget::dateentry|0.97|| |
︙ | ︙ | |||
93 94 95 96 97 98 99 | ||canvas::edit::quadrilateral|0.1|0.2|D EF I| |||||| |chatwidget|chatwidget|1.1.0|1.1.4|B EF I| |crosshair|crosshair|1.2|1.2.1|B D I| |diagrams|diagram::application|1.2|1.3|EF I| |history|history|0.1|0.2|D EF I| |||||| | | | > > > | 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 | ||canvas::edit::quadrilateral|0.1|0.2|D EF I| |||||| |chatwidget|chatwidget|1.1.0|1.1.4|B EF I| |crosshair|crosshair|1.2|1.2.1|B D I| |diagrams|diagram::application|1.2|1.3|EF I| |history|history|0.1|0.2|D EF I| |||||| |ico|ico|0.3.2|0.3.4|B D I| ||ico|1.1|1.1.2|B D I| |||||| |ipentry|ipentry|0.3|0.3.1|D I| |khim|khim|1.0.1|1.0.2|I| |||||| |mentry|mentry::common|3.10||B D EF| ||mentry::common||4.2|B D EF| |||||| |notifywindow|notifywindow|1.0|1.0.1|B D I| |plotchart|Plotchart|2.4.1|2.6.2|B D EF I T| |||||| |
︙ | ︙ | |||
151 152 153 154 155 156 157 | ||diagram::core|1|1|I| ||diagram::direction|1|1|I| ||diagram::element|1|1|I| ||diagram::navigation|1|1|I| ||diagram::point|1|1|I| |||||| |getstring|getstring|0.1|0.1|D I| | < < | 154 155 156 157 158 159 160 161 162 163 164 165 166 167 | ||diagram::core|1|1|I| ||diagram::direction|1|1|I| ||diagram::element|1|1|I| ||diagram::navigation|1|1|I| ||diagram::point|1|1|I| |||||| |getstring|getstring|0.1|0.1|D I| |||||| |menubar|menubar|0.5|0.5|D I| ||menubar::debug|0.5|0.5|I| ||menubar::node|0.5|0.5|I| ||menubar::tree|0.5|0.5|I| |||||| |persistentSelection|persistentSelection|1.0b1|1.0b1|D I| |
︙ | ︙ |
Changes to support/releases/history/README-0.8.txt.
1 2 3 4 | Overview ======== 50 new packages in 6 modules | | | | 1 2 3 4 5 6 7 8 9 10 11 12 13 | Overview ======== 50 new packages in 6 modules 18 changed packages in 15 modules 40 internally changed packages in 17 modules 7 unchanged packages in 2 modules 122 packages, total in 35 modules, total Legend ====== Change Details Comments |
︙ | ︙ | |||
58 59 60 61 62 63 64 | map::track::map-display 0.1 map::track::store::fs 0.1 map::track::store::memory 0.1 map::track::table-display 0.1 ----------- --------------------------- ------------- ---------- shtmlview shtmlview::doctools 0.1 shtmlview::mkdoc 0.1 | | | 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 | map::track::map-display 0.1 map::track::store::fs 0.1 map::track::store::memory 0.1 map::track::table-display 0.1 ----------- --------------------------- ------------- ---------- shtmlview shtmlview::doctools 0.1 shtmlview::mkdoc 0.1 shtmlview::shtmlview 1.1.1 ----------- --------------------------- ------------- ---------- text dgw::txmixins 0.2.0 treeview dgw::tvmixins 0.3 ----------- --------------------------- ------------- ---------- widget widget 3.1 widget::arrowbutton 1.0 widget::calendar 1.0.1 |
︙ | ︙ | |||
93 94 95 96 97 98 99 | canvas::edit::quadrilateral 0.1 0.2 D EF I -------------- ----------------------------- ---------- -------- ------------ chatwidget chatwidget 1.1.0 1.1.4 B EF I crosshair crosshair 1.2 1.2.1 B D I diagrams diagram::application 1.2 1.3 EF I history history 0.1 0.2 D EF I -------------- ----------------------------- ---------- -------- ------------ | | | > > > | 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 | canvas::edit::quadrilateral 0.1 0.2 D EF I -------------- ----------------------------- ---------- -------- ------------ chatwidget chatwidget 1.1.0 1.1.4 B EF I crosshair crosshair 1.2 1.2.1 B D I diagrams diagram::application 1.2 1.3 EF I history history 0.1 0.2 D EF I -------------- ----------------------------- ---------- -------- ------------ ico ico 0.3.2 0.3.4 B D I ico 1.1 1.1.2 B D I -------------- ----------------------------- ---------- -------- ------------ ipentry ipentry 0.3 0.3.1 D I khim khim 1.0.1 1.0.2 I -------------- ----------------------------- ---------- -------- ------------ mentry mentry::common 3.10 B D EF mentry::common 4.2 B D EF -------------- ----------------------------- ---------- -------- ------------ notifywindow notifywindow 1.0 1.0.1 B D I plotchart Plotchart 2.4.1 2.6.2 B D EF I T -------------- ----------------------------- ---------- -------- ------------ |
︙ | ︙ | |||
152 153 154 155 156 157 158 | diagram::core 1 1 I diagram::direction 1 1 I diagram::element 1 1 I diagram::navigation 1 1 I diagram::point 1 1 I --------------------- ---------------------- ---------- -------- ---------- getstring getstring 0.1 0.1 D I | < < | 155 156 157 158 159 160 161 162 163 164 165 166 167 168 | diagram::core 1 1 I diagram::direction 1 1 I diagram::element 1 1 I diagram::navigation 1 1 I diagram::point 1 1 I --------------------- ---------------------- ---------- -------- ---------- getstring getstring 0.1 0.1 D I --------------------- ---------------------- ---------- -------- ---------- menubar menubar 0.5 0.5 D I menubar::debug 0.5 0.5 I menubar::node 0.5 0.5 I menubar::tree 0.5 0.5 I --------------------- ---------------------- ---------- -------- ---------- persistentSelection persistentSelection 1.0b1 1.0b1 D I |
︙ | ︙ |