tcl-core — Tcl Core Team discussions about Tcl development

Re: [TCLCORE] TIP 727: toggleswitch

[Csaba N. <csa...@t-...>]

Hi Harald,

I will return soon to your comments concerning the third-party themes.

Why tk_cargo rather than tk::cargo?  We have tk_dialog, tk_messageBox, 
tk_optionMenu, tk_popup, tk_setPalette, etc. rather than tk::dialog, 
tk::messageBox, tk::optionMenu, etc. (to mention just a few Tk core 
procs).  I share your opinion that tk::cargo would be nicer, but OTOH it 
would break the tradition. :-)

Best regards,

Csaba


Am 09.09.25 um 21:30 schrieb Harald Oehlmann:
> Hi Csaba,
> 
> I would prefer, that anything concerning other themes go to this theme 
> and not to the core.
> I would also love to get awdark and awlight to the tcl-depot repository, 
> as they are unmaintained, but so useful.
> Can the droid stuff go to the androwish repository?
> 
> Thanks for all,
> Harald
> 
> ---
> And thanks for tk_cargo, great ! Great Tip.
> May the command name not be named tk::cargo ?
> 
> Thanks for all,
> Harald
> 
> Am 09.09.2025 um 13:37 schrieb Csaba Nemethi:
>> Update:  Before starting the CFV for TIP 727 ("Add a ttk::toggleswitch 
>> widget to the core"), I would much appreciate if we could decide which 
>> themes should/may be _explicitly_ supported by the ttk::toggleswitch 
>> command.
>>
>> Currently the implementation creates the trough and slider elements 
>> when needed not only for the built-in themes, but also for droid 
>> (which is the default theme in AndroWish), plastik (which droid is 
>> derived from), awarc, awbreeze, awbreezedark, awlight, and awdark.  
>> Any other theme will import these elements from the "default" theme 
>> (or a dark variant of it), or the application can add explicit support 
>> for it by providing an appropriate command of the name 
>> ttk::toggleswitch::CreateElements_<theme>.
>>
>> Since the TIP proposes to add a new widget _to the core_, I am not 
>> sure whether it is OK if the implementation provides _explicit_ 
>> support for all these third-party themes.
>>
>> In case we decide to make the above list of themes smaller, my 
>> personal proposal would be to keep the explicit support for the themes 
>> droid, awlight, and awdark.  Rationale: droid is the default in 
>> AndroWish, and awlight and awdark seem to be the most popular themes 
>> of the awthemes package.  The plastik theme has the drawback that it 
>> is not scalable, while awarc, awbreeze, and awbreezedark have a 
>> suboptimal performance.
>>
>> Any feedback (not only from TCT members) is highly appreciated.
>>
>> Best regards,
>>
>> Csaba
>>
>>
>> Am 08.09.25 um 14:55 schrieb Csaba Nemethi:
>>> Hi Harald,
>>>
>>> I, too, think that the opinion of a few Tk wizards would be important 
>>> and highly welcomed.  In the next step we could then call for vote.
>>>
>>> Best regards,
>>>
>>> Csaba
>>>
>>>
>>> Am 08.09.25 um 14:08 schrieb Harald Oehlmann:
>>>> Dear Tk team, dear Csaba,
>>>>
>>>> TIP 727
>>>> https://core.tcl-lang.org/tips/doc/trunk/tip/727.md
>>>> introduces the new widget "ttk::toggleswitch".
>>>> For me, this is a great improvement.
>>>> Csaba has developped this IMHO to a mature state.
>>>>
>>>> Now, Csaba continues with the next project from the conference, the 
>>>> "cargo" possibility, that each tk widget may have a variable store.
>>>>
>>>> Csaba, if you intend to call the vote of 727, I am ready to sponsor.
>>>> Unfortunately, I will be offline from next Saturday until 2025-10-07.
>>>>
>>>> Please ping me, if I can don anything this week.
>>>> I am on travel but still reachable.
>>>> I would love a 2nd tk Wizard opinion on the TIP and implementation 
>>>> like Mark, Brian, Francois or Kevin.
>>>>
>>>> Thanks for all the action, we all highly appreciate!
>>>>
>>>> Take care,
>>>> Harald
>>>>
> 
> 
> _______________________________________________
> Tcl-Core mailing list
> Tcl...@li...
> https://lists.sourceforge.net/lists/listinfo/tcl-core

-- 
Csaba Nemethi  https://www.nemethi.de  mailto:csa...@t-...

Re: [TCLCORE] Looking for Tcl 2014 paper pdfs

[Andreas K. <and...@gm...>]

> I have been in the process of resurrecting the Tcl Community Association
> and it’s web site, www.tclcommunityassociation.org within the Tcl wiki, and
> I am unable to find online versions of the papers and slides from the 2014
> conference.
> 
> Does anyone have them squirreled away somewhere, or perhaps have a USB
> drive that has them?

Do you have access to the core.tcl-lang.org box ? (aka core.tcl.tk)
If yes, see

	/home/conference/1.Parts.Archive.Past.Proceedings

I also have most of it (and EuroTcl), I believe, here on my personal machine.

-- 
Happy Tcling,
	Andreas Kupries <and...@gm...>
			<https://core.tcl-lang.org/akupries/>
			<https://akupries.tclers.tk/>
	Developer @	SUSE Software Solutions Germany GmbH
-------------------------------------------------------------------------------

Re: [TCLCORE] Looking for Tcl 2014 paper pdfs

[Phillip B. <phi...@um...>]

That's got what I am looking for.  Thanks!

On Tue, Sep 9, 2025 at 4:58 PM Steve Landers <st...@di...>
wrote:

> Phil,
>
> That's in /srv/ftp/pub/tcl/conferences on the server. I had a quite look
> and it is promising, so perhaps browse around in there.  There is a lot of
> other material that might be worth preserving too.
>
> -- Steve
> On 10 Sep 2025 at 7:41 AM +0800, Paul Obermeier <pa...@po...>, wrote:
>
> Hi Phil,
>
> take at look at ftp://ftp.tcl.tk/pub/tcl/conferences/
>
> If also interested in the EuroTcl conferences, see
> https://www.eurotcl.eu/pastevents.html
>
> Regards,
> Paul
>
> Am 10.09.2025 um 01:18 schrieb Phillip Brooks:
>
> I have been in the process of resurrecting the Tcl Community Association
> and it’s web site, www.tclcommunityassociation.org within the Tcl wiki,
> and I am unable to find online versions of the papers and slides from the
> 2014 conference.
>
> Does anyone have them squirreled away somewhere, or perhaps have a USB
> drive that has them?
>
> You can see my work in progress at
>
> https://wiki.tcl-lang.org/page/Tcl+Association
>
> and under the year by year conference entries on
>
> https://wiki.tcl-lang.org/page/Tcl+Conferences
>
> So far, I have at least gotten a start on creating links to all of the
> papers from 2005-2013 and 2015-2019.  I am now working on updating the
> pages from before 2005, but I would like to find those 2014 papers.
>
> As noted in the wiki page,
> www.tclcommunityassociation.org currently runs into a dead end on
> Cloudflare.  Steve Landers and I are also working on getting that web
> address working again.
>
> Phil
>
>
> _______________________________________________
> Tcl-Core mailing lis...@li...https://lists.sourceforge.net/lists/listinfo/tcl-core
>
>
> _______________________________________________
> Tcl-Core mailing list
> Tcl...@li...
> https://lists.sourceforge.net/lists/listinfo/tcl-core
>
>

Re: [TCLCORE] Looking for Tcl 2014 paper pdfs

[Steve L. <st...@di...>]

Phil,

That's in /srv/ftp/pub/tcl/conferences on the server. I had a quite look and it is promising, so perhaps browse around in there.  There is a lot of other material that might be worth preserving too.

-- Steve
On 10 Sep 2025 at 7:41 AM +0800, Paul Obermeier <pa...@po...>, wrote:
> Hi Phil,
>
> take at look at ftp://ftp.tcl.tk/pub/tcl/conferences/
>
> If also interested in the EuroTcl conferences, see https://www.eurotcl.eu/pastevents.html
>
> Regards,
> Paul
>
> Am 10.09.2025 um 01:18 schrieb Phillip Brooks:
> > I have been in the process of resurrecting the Tcl Community Association and it’s web site, www.tclcommunityassociation.org within the Tcl wiki, and I am unable to find online versions of the papers and slides from the 2014 conference.
> >
> > Does anyone have them squirreled away somewhere, or perhaps have a USB drive that has them?
> >
> > You can see my work in progress at
> >
> > https://wiki.tcl-lang.org/page/Tcl+Association
> >
> > and under the year by year conference entries on
> >
> > https://wiki.tcl-lang.org/page/Tcl+Conferences
> >
> > So far, I have at least gotten a start on creating links to all of the papers from 2005-2013 and 2015-2019.  I am now working on updating the pages from before 2005, but I would like to find those 2014 papers.
> >
> > As noted in the wiki page,
> > www.tclcommunityassociation.org currently runs into a dead end on Cloudflare.  Steve Landers and I are also working on getting that web address working again.
> >
> > Phil
> >
> >
> > _______________________________________________
> > Tcl-Core mailing list
> > Tcl...@li...
> > https://lists.sourceforge.net/lists/listinfo/tcl-core
>
> _______________________________________________
> Tcl-Core mailing list
> Tcl...@li...
> https://lists.sourceforge.net/lists/listinfo/tcl-core

Re: [TCLCORE] Looking for Tcl 2014 paper pdfs

[Paul O. <pa...@po...>]

Hi Phil,

take at look at ftp://ftp.tcl.tk/pub/tcl/conferences/

If also interested in the EuroTcl conferences, see https://www.eurotcl.eu/pastevents.html

Regards,
Paul

Am 10.09.2025 um 01:18 schrieb Phillip Brooks:
> I have been in the process of resurrecting the Tcl Community Association and it’s web site, www.tclcommunityassociation.org <http://www.tclcommunityassociation.org> within the Tcl wiki, and I am unable to find online versions of the papers and slides from the 2014 conference.
>
> Does anyone have them squirreled away somewhere, or perhaps have a USB drive that has them?
>
> You can see my work in progress at
>
> https://wiki.tcl-lang.org/page/Tcl+Association
>
> and under the year by year conference entries on
>
> https://wiki.tcl-lang.org/page/Tcl+Conferences
>
> So far, I have at least gotten a start on creating links to all of the papers from 2005-2013 and 2015-2019.  I am now working on updating the pages from before 2005, but I would like to find those 2014 papers.
>
> As noted in the wiki page,
> www.tclcommunityassociation.org <http://www.tclcommunityassociation.org> currently runs into a dead end on Cloudflare.  Steve Landers and I are also working on getting that web address working again.
>
> Phil
>
>
> _______________________________________________
> Tcl-Core mailing list
> Tcl...@li...
> https://lists.sourceforge.net/lists/listinfo/tcl-core

[TCLCORE] Looking for Tcl 2014 paper pdfs

[Phillip B. <phi...@um...>]

I have been in the process of resurrecting the Tcl Community Association
and it’s web site, www.tclcommunityassociation.org within the Tcl wiki, and
I am unable to find online versions of the papers and slides from the 2014
conference.

Does anyone have them squirreled away somewhere, or perhaps have a USB
drive that has them?

You can see my work in progress at

https://wiki.tcl-lang.org/page/Tcl+Association

and under the year by year conference entries on

https://wiki.tcl-lang.org/page/Tcl+Conferences

So far, I have at least gotten a start on creating links to all of the
papers from 2005-2013 and 2015-2019.  I am now working on updating the
pages from before 2005, but I would like to find those 2014 papers.

As noted in the wiki page,
www.tclcommunityassociation.org currently runs into a dead end on
Cloudflare.  Steve Landers and I are also working on getting that web
address working again.

Phil

Re: [TCLCORE] TIP 730: Switching by Integers

[Harald O. <har...@el...>]

Am 09.09.2025 um 22:02 schrieb Donal Fellows:
> Another TIP, this for the feature I've been muttering about doing for 
> ages; adding a *-integer* option to *switch*. It does what it says on 
> the tin. I'm pretty happy with how this one's come together; it feels 
> like a natural extension of what we had and took little code to bring to 
> fruition, so I'll probably call a vote on it at the same time as 728.
> 
> Donal.
Great, I really appreciate! This is a very large use-case!

As I will not be online until 2025-10-07, here are my eventual votes:
TIP 727,728,729,730: yes

Thanks for all,
Harald

Re: [TCLCORE] TIP 727: toggleswitch

[Harald O. <har...@el...>]

Hi Csaba,
it would be great to move AWDark to the core themes ;-).
It would be great to have one native dark theme.
I know, that basically all non-native themes support coloring and thus 
dark theme on Mac-OS. But only there.
So, having a real dark theme would solve this for the other platforms.

Thanks for all,
Harald

Am 09.09.2025 um 21:30 schrieb Harald Oehlmann:
> Hi Csaba,
> 
> I would prefer, that anything concerning other themes go to this theme 
> and not to the core.
> I would also love to get awdark and awlight to the tcl-depot repository, 
> as they are unmaintained, but so useful.
> Can the droid stuff go to the androwish repository?
> 
> Thanks for all,
> Harald
> 
> ---
> And thanks for tk_cargo, great ! Great Tip.
> May the command name not be named tk::cargo ?
> 
> Thanks for all,
> Harald
> 
> Am 09.09.2025 um 13:37 schrieb Csaba Nemethi:
>> Update:  Before starting the CFV for TIP 727 ("Add a ttk::toggleswitch 
>> widget to the core"), I would much appreciate if we could decide which 
>> themes should/may be _explicitly_ supported by the ttk::toggleswitch 
>> command.
>>
>> Currently the implementation creates the trough and slider elements 
>> when needed not only for the built-in themes, but also for droid 
>> (which is the default theme in AndroWish), plastik (which droid is 
>> derived from), awarc, awbreeze, awbreezedark, awlight, and awdark.  
>> Any other theme will import these elements from the "default" theme 
>> (or a dark variant of it), or the application can add explicit support 
>> for it by providing an appropriate command of the name 
>> ttk::toggleswitch::CreateElements_<theme>.
>>
>> Since the TIP proposes to add a new widget _to the core_, I am not 
>> sure whether it is OK if the implementation provides _explicit_ 
>> support for all these third-party themes.
>>
>> In case we decide to make the above list of themes smaller, my 
>> personal proposal would be to keep the explicit support for the themes 
>> droid, awlight, and awdark.  Rationale: droid is the default in 
>> AndroWish, and awlight and awdark seem to be the most popular themes 
>> of the awthemes package.  The plastik theme has the drawback that it 
>> is not scalable, while awarc, awbreeze, and awbreezedark have a 
>> suboptimal performance.
>>
>> Any feedback (not only from TCT members) is highly appreciated.
>>
>> Best regards,
>>
>> Csaba
>>
>>
>> Am 08.09.25 um 14:55 schrieb Csaba Nemethi:
>>> Hi Harald,
>>>
>>> I, too, think that the opinion of a few Tk wizards would be important 
>>> and highly welcomed.  In the next step we could then call for vote.
>>>
>>> Best regards,
>>>
>>> Csaba
>>>
>>>
>>> Am 08.09.25 um 14:08 schrieb Harald Oehlmann:
>>>> Dear Tk team, dear Csaba,
>>>>
>>>> TIP 727
>>>> https://core.tcl-lang.org/tips/doc/trunk/tip/727.md
>>>> introduces the new widget "ttk::toggleswitch".
>>>> For me, this is a great improvement.
>>>> Csaba has developped this IMHO to a mature state.
>>>>
>>>> Now, Csaba continues with the next project from the conference, the 
>>>> "cargo" possibility, that each tk widget may have a variable store.
>>>>
>>>> Csaba, if you intend to call the vote of 727, I am ready to sponsor.
>>>> Unfortunately, I will be offline from next Saturday until 2025-10-07.
>>>>
>>>> Please ping me, if I can don anything this week.
>>>> I am on travel but still reachable.
>>>> I would love a 2nd tk Wizard opinion on the TIP and implementation 
>>>> like Mark, Brian, Francois or Kevin.
>>>>
>>>> Thanks for all the action, we all highly appreciate!
>>>>
>>>> Take care,
>>>> Harald
>>>>
> 

[TCLCORE] TIP 730: Switching by Integers

[Donal F. <don...@ma...>]

Another TIP, this for the feature I've been muttering about doing for ages; adding a -integer option to switch. It does what it says on the tin. I'm pretty happy with how this one's come together; it feels like a natural extension of what we had and took little code to bring to fruition, so I'll probably call a vote on it at the same time as 728.

Donal.

Re: [TCLCORE] TIP 727: toggleswitch

[Harald O. <har...@el...>]

Hi Csaba,

I would prefer, that anything concerning other themes go to this theme 
and not to the core.
I would also love to get awdark and awlight to the tcl-depot repository, 
as they are unmaintained, but so useful.
Can the droid stuff go to the androwish repository?

Thanks for all,
Harald

---
And thanks for tk_cargo, great ! Great Tip.
May the command name not be named tk::cargo ?

Thanks for all,
Harald

Am 09.09.2025 um 13:37 schrieb Csaba Nemethi:
> Update:  Before starting the CFV for TIP 727 ("Add a ttk::toggleswitch 
> widget to the core"), I would much appreciate if we could decide which 
> themes should/may be _explicitly_ supported by the ttk::toggleswitch 
> command.
> 
> Currently the implementation creates the trough and slider elements when 
> needed not only for the built-in themes, but also for droid (which is 
> the default theme in AndroWish), plastik (which droid is derived from), 
> awarc, awbreeze, awbreezedark, awlight, and awdark.  Any other theme 
> will import these elements from the "default" theme (or a dark variant 
> of it), or the application can add explicit support for it by providing 
> an appropriate command of the name 
> ttk::toggleswitch::CreateElements_<theme>.
> 
> Since the TIP proposes to add a new widget _to the core_, I am not sure 
> whether it is OK if the implementation provides _explicit_ support for 
> all these third-party themes.
> 
> In case we decide to make the above list of themes smaller, my personal 
> proposal would be to keep the explicit support for the themes droid, 
> awlight, and awdark.  Rationale: droid is the default in AndroWish, and 
> awlight and awdark seem to be the most popular themes of the awthemes 
> package.  The plastik theme has the drawback that it is not scalable, 
> while awarc, awbreeze, and awbreezedark have a suboptimal performance.
> 
> Any feedback (not only from TCT members) is highly appreciated.
> 
> Best regards,
> 
> Csaba
> 
> 
> Am 08.09.25 um 14:55 schrieb Csaba Nemethi:
>> Hi Harald,
>>
>> I, too, think that the opinion of a few Tk wizards would be important 
>> and highly welcomed.  In the next step we could then call for vote.
>>
>> Best regards,
>>
>> Csaba
>>
>>
>> Am 08.09.25 um 14:08 schrieb Harald Oehlmann:
>>> Dear Tk team, dear Csaba,
>>>
>>> TIP 727
>>> https://core.tcl-lang.org/tips/doc/trunk/tip/727.md
>>> introduces the new widget "ttk::toggleswitch".
>>> For me, this is a great improvement.
>>> Csaba has developped this IMHO to a mature state.
>>>
>>> Now, Csaba continues with the next project from the conference, the 
>>> "cargo" possibility, that each tk widget may have a variable store.
>>>
>>> Csaba, if you intend to call the vote of 727, I am ready to sponsor.
>>> Unfortunately, I will be offline from next Saturday until 2025-10-07.
>>>
>>> Please ping me, if I can don anything this week.
>>> I am on travel but still reachable.
>>> I would love a 2nd tk Wizard opinion on the TIP and implementation 
>>> like Mark, Brian, Francois or Kevin.
>>>
>>> Thanks for all the action, we all highly appreciate!
>>>
>>> Take care,
>>> Harald
>>>

Re: [TCLCORE] TIP 727: toggleswitch

[Donal F. <don...@ma...>]

I also don't think there needs to be explicit support, but it's probably extremely wise to check that the widget is still able to be themed by the key third-party themes listed. In particular, some action may be wanted if there are regions of the widget that ought to exist without actually being rendered by any of our default themes.

I don't know enough about theming or this specific widget to say if this is a big problem, but it's a good idea to check for that at this stage when it is still very easy to fix.

Donal.

________________________________
From: Kevin Walzer <kw...@co...>
Sent: Tuesday, September 09, 2025 13:22
To: Csaba Nemethi <csa...@t-...>
Cc: tcl...@li... <tcl...@li...>
Subject: Re: [TCLCORE] TIP 727: toggleswitch

My view is that it should provide an API for third-party themes to add support but should stick to themes in the core. I favor a clean separation of core vs. extension libraries.

> On Sep 9, 2025, at 7:37 AM, Csaba Nemethi <csa...@t-...> wrote:
>
> Update:  Before starting the CFV for TIP 727 ("Add a ttk::toggleswitch widget to the core"), I would much appreciate if we could decide which themes should/may be _explicitly_ supported by the ttk::toggleswitch command.
>

Re: [TCLCORE] TIP 728: Reliable Read and Write of Child Interpreter Variables

[Patrick M. <dus...@gm...>]

Hi Donal,

That sounds like a useful and important feature, and a really good idea.

Regards,
PM

On Mon, 8 Sept 2025, 15:03 Donal Fellows, <don...@ma...>
wrote:

> Hi everyone!
>
> I've just done a new little TIP for 9.1 that adds *interp set* so that we
> can more easily read and write variables in child interpreters *even when
> the child interpreter is playing games with the **set **global command*.
> It's really a very simple implementation, given that it's cross-interpreter
> functionality (and uses the same general access control rules as for *interp
> eval*). I'm not proposing to add any fancy compilation or other things
> like that, so the functionality's now done and it's passing its tests. This
> is one of those things where I woke up this morning thinking "but why has
> nobody ever bothered to do this before?" 😁
>
> Because of that, this is notice that I'll call a vote in a week or so
> unless there's some sort of fundamental objection.
>
> Donal.
> _______________________________________________
> Tcl-Core mailing list
> Tcl...@li...
> https://lists.sourceforge.net/lists/listinfo/tcl-core
>

Re: [TCLCORE] TIP 727: toggleswitch

[Kevin W. <kw...@co...>]

My view is that it should provide an API for third-party themes to add support but should stick to themes in the core. I favor a clean separation of core vs. extension libraries. 

> On Sep 9, 2025, at 7:37 AM, Csaba Nemethi <csa...@t-...> wrote:
> 
> Update:  Before starting the CFV for TIP 727 ("Add a ttk::toggleswitch widget to the core"), I would much appreciate if we could decide which themes should/may be _explicitly_ supported by the ttk::toggleswitch command.
> 
> Currently the implementation creates the trough and slider elements when needed not only for the built-in themes, but also for droid (which is the default theme in AndroWish), plastik (which droid is derived from), awarc, awbreeze, awbreezedark, awlight, and awdark.  Any other theme will import these elements from the "default" theme (or a dark variant of it), or the application can add explicit support for it by providing an appropriate command of the name ttk::toggleswitch::CreateElements_<theme>.
> 
> Since the TIP proposes to add a new widget _to the core_, I am not sure whether it is OK if the implementation provides _explicit_ support for all these third-party themes.
> 
> In case we decide to make the above list of themes smaller, my personal proposal would be to keep the explicit support for the themes droid, awlight, and awdark.  Rationale: droid is the default in AndroWish, and awlight and awdark seem to be the most popular themes of the awthemes package.  The plastik theme has the drawback that it is not scalable, while awarc, awbreeze, and awbreezedark have a suboptimal performance.
> 
> Any feedback (not only from TCT members) is highly appreciated.
> 
> Best regards,
> 
> Csaba
> 
> 
>> Am 08.09.25 um 14:55 schrieb Csaba Nemethi:
>> Hi Harald,
>> I, too, think that the opinion of a few Tk wizards would be important and highly welcomed.  In the next step we could then call for vote.
>> Best regards,
>> Csaba
>>> Am 08.09.25 um 14:08 schrieb Harald Oehlmann:
>>> Dear Tk team, dear Csaba,
>>> 
>>> TIP 727
>>> https://core.tcl-lang.org/tips/doc/trunk/tip/727.md
>>> introduces the new widget "ttk::toggleswitch".
>>> For me, this is a great improvement.
>>> Csaba has developped this IMHO to a mature state.
>>> 
>>> Now, Csaba continues with the next project from the conference, the "cargo" possibility, that each tk widget may have a variable store.
>>> 
>>> Csaba, if you intend to call the vote of 727, I am ready to sponsor.
>>> Unfortunately, I will be offline from next Saturday until 2025-10-07.
>>> 
>>> Please ping me, if I can don anything this week.
>>> I am on travel but still reachable.
>>> I would love a 2nd tk Wizard opinion on the TIP and implementation like Mark, Brian, Francois or Kevin.
>>> 
>>> Thanks for all the action, we all highly appreciate!
>>> 
>>> Take care,
>>> Harald
>>> 
>>> 
>>> _______________________________________________
>>> Tcl-Core mailing list
>>> Tcl...@li...
>>> https://lists.sourceforge.net/lists/listinfo/tcl-core
> 
> --
> Csaba Nemethi  https://www.nemethi.de  mailto:csa...@t-...
> 
> 
> 
> _______________________________________________
> Tcl-Core mailing list
> Tcl...@li...
> https://lists.sourceforge.net/lists/listinfo/tcl-core

Re: [TCLCORE] TIP 727: toggleswitch

[Csaba N. <csa...@t-...>]

Update:  Before starting the CFV for TIP 727 ("Add a ttk::toggleswitch 
widget to the core"), I would much appreciate if we could decide which 
themes should/may be _explicitly_ supported by the ttk::toggleswitch 
command.

Currently the implementation creates the trough and slider elements when 
needed not only for the built-in themes, but also for droid (which is 
the default theme in AndroWish), plastik (which droid is derived from), 
awarc, awbreeze, awbreezedark, awlight, and awdark.  Any other theme 
will import these elements from the "default" theme (or a dark variant 
of it), or the application can add explicit support for it by providing 
an appropriate command of the name 
ttk::toggleswitch::CreateElements_<theme>.

Since the TIP proposes to add a new widget _to the core_, I am not sure 
whether it is OK if the implementation provides _explicit_ support for 
all these third-party themes.

In case we decide to make the above list of themes smaller, my personal 
proposal would be to keep the explicit support for the themes droid, 
awlight, and awdark.  Rationale: droid is the default in AndroWish, and 
awlight and awdark seem to be the most popular themes of the awthemes 
package.  The plastik theme has the drawback that it is not scalable, 
while awarc, awbreeze, and awbreezedark have a suboptimal performance.

Any feedback (not only from TCT members) is highly appreciated.

Best regards,

Csaba


Am 08.09.25 um 14:55 schrieb Csaba Nemethi:
> Hi Harald,
> 
> I, too, think that the opinion of a few Tk wizards would be important 
> and highly welcomed.  In the next step we could then call for vote.
> 
> Best regards,
> 
> Csaba
> 
> 
> Am 08.09.25 um 14:08 schrieb Harald Oehlmann:
>> Dear Tk team, dear Csaba,
>>
>> TIP 727
>> https://core.tcl-lang.org/tips/doc/trunk/tip/727.md
>> introduces the new widget "ttk::toggleswitch".
>> For me, this is a great improvement.
>> Csaba has developped this IMHO to a mature state.
>>
>> Now, Csaba continues with the next project from the conference, the 
>> "cargo" possibility, that each tk widget may have a variable store.
>>
>> Csaba, if you intend to call the vote of 727, I am ready to sponsor.
>> Unfortunately, I will be offline from next Saturday until 2025-10-07.
>>
>> Please ping me, if I can don anything this week.
>> I am on travel but still reachable.
>> I would love a 2nd tk Wizard opinion on the TIP and implementation 
>> like Mark, Brian, Francois or Kevin.
>>
>> Thanks for all the action, we all highly appreciate!
>>
>> Take care,
>> Harald
>>
>>
>> _______________________________________________
>> Tcl-Core mailing list
>> Tcl...@li...
>> https://lists.sourceforge.net/lists/listinfo/tcl-core
> 

-- 
Csaba Nemethi  https://www.nemethi.de  mailto:csa...@t-...

Re: [TCLCORE] TIP Contribution Bug in Tcl 9.0.2

[Kevin W. <kw...@co...>]

<html><head><meta http-equiv="content-type" content="text/html; charset=utf-8"></head><body dir="auto"><div dir="ltr"></div><div dir="ltr">Thanks, I will look into this as soon as I can.&nbsp;</div><div dir="ltr"><br><blockquote type="cite">On Sep 8, 2025, at 5:56 PM, Alexandru Dadalau &lt;ale...@me...&gt; wrote:<br><br></blockquote></div><blockquote type="cite"><div dir="ltr">

<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<meta name="Generator" content="Microsoft Word 15 (filtered medium)">
<!--[if !mso]><style>v\:* {behavior:url(#default#VML);}
o\:* {behavior:url(#default#VML);}
w\:* {behavior:url(#default#VML);}
.shape {behavior:url(#default#VML);}
</style><![endif]-->
<title>Email Signature</title>
<style>@font-face { font-family: Wingdings; }
@font-face { font-family: "Cambria Math"; }
@font-face { font-family: DengXian; }
@font-face { font-family: Calibri; }
@font-face { font-family: Verdana; }
@font-face { font-family: Aptos; }
@font-face { font-family: "Segoe UI Light"; }
@font-face { font-family: "@DengXian"; }
p.MsoNormal, li.MsoNormal, div.MsoNormal { margin: 0cm; font-size: 11pt; font-family: Calibri, sans-serif; }
a:link, span.MsoHyperlink { color: blue; text-decoration: underline; }
p.MsoListParagraph, li.MsoListParagraph, div.MsoListParagraph { margin: 0cm 0cm 0cm 36pt; font-size: 11pt; font-family: Calibri, sans-serif; }
span.E-MailFormatvorlage22 { font-family: Aptos, sans-serif; color: windowtext; }
.MsoChpDefault { font-size: 10pt; }
@page WordSection1 { size: 612pt 792pt; margin: 70.85pt 70.85pt 2cm; }
div.WordSection1 { page: WordSection1; }
ol { margin-bottom: 0cm; }
ul { margin-bottom: 0cm; }</style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->


<div class="WordSection1">
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif;mso-fareast-language:EN-US">Hi Kevin,<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif;mso-fareast-language:EN-US"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif;mso-fareast-language:EN-US">the code contains actually only 3 parts:<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif;mso-fareast-language:EN-US"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif;mso-fareast-language:EN-US">1. Create an image<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif;mso-fareast-language:EN-US">2. Initialize the systray item (only once, that’s why the “first” variable is needed) using “</span><span lang="EN-US">&nbsp;tk systray create”</span><span lang="EN-US" style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif;mso-fareast-language:EN-US"><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif;mso-fareast-language:EN-US">3. Send a notification using “</span><span lang="EN-US">tk sysnotify</span><span lang="EN-US" style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif;mso-fareast-language:EN-US">”<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif;mso-fareast-language:EN-US"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif;mso-fareast-language:EN-US">I hope it’s clear now.<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif;mso-fareast-language:EN-US"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif;mso-fareast-language:EN-US">BTW: The issue occurs in Wondows 11 64bit<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif;mso-fareast-language:EN-US"><o:p>&nbsp;</o:p></span></p>
<div>
<div style="border:none;border-top:solid #E1E1E1 1.0pt;padding:3.0pt 0cm 0cm 0cm">
<p class="MsoNormal"><b>Von:</b> Kevin Walzer &lt;kw...@co...&gt; <br>
<b>Gesendet:</b> Montag, 8. September 2025 23:51<br>
<b>An:</b> Alexandru Dadalau &lt;ale...@me...&gt;<br>
<b>Cc:</b> tcl...@li...<br>
<b>Betreff:</b> Re: [TCLCORE] TIP Contribution Bug in Tcl 9.0.2<o:p></o:p></p>
</div>
</div>
<p class="MsoNormal"><o:p>&nbsp;</o:p></p>
<div>
<p class="MsoNormal">Hi Alexandru,<span style="font-size:12.0pt"><o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal"><o:p>&nbsp;</o:p></p>
</div>
<div>
<p class="MsoNormal">I don’t understand what this code is doing?<o:p></o:p></p>
</div>
<div>
<p class="MsoNormal"><o:p>&nbsp;</o:p></p>
</div>
<div>
<p class="MsoNormal">Thanks,<o:p></o:p></p>
</div>
<div>
<p class="MsoNormal">Kevin<o:p></o:p></p>
</div>
<div>
<p class="MsoNormal"><br>
<br>
<o:p></o:p></p>
<blockquote style="margin-top:5.0pt;margin-bottom:5.0pt">
<p class="MsoNormal" style="margin-bottom:12.0pt">On Sep 8, 2025, at 5:20 PM, Alexandru Dadalau &lt;<a href="mailto:ale...@me...">ale...@me...</a>&gt; wrote:<o:p></o:p></p>
</blockquote>
</div>
<blockquote style="margin-top:5.0pt;margin-bottom:5.0pt">
<div>
<p class="MsoNormal"> <span style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif">
<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">Hi,</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US">&nbsp;</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US">In Tcl 9.0.2 there is a bug in the “tk sysnotify” command.</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US">The bug leads to a complete crash of the Tcl/Tk app, which closes.</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US">It feels like an issue in the underlying C code.</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US">I could not identify what exactly causes the crash, but it’s related only to the message string that is passed to the “tk sysnotify” command.</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US">&nbsp;</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US">Below you can find 3 examples of strings that causes crashes.</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US">Interestingly, the examples lead to slightly different behavior:</span><o:p></o:p></p>
<ol style="margin-top:0cm" start="1" type="1">
<li class="MsoListParagraph" style="margin-left:0cm;mso-list:l1 level1 lfo3"><span lang="EN-US">In first example, the message gets to be show by the sys tray and the crash happens seconds afterwords.</span><o:p></o:p></li><li class="MsoListParagraph" style="margin-left:0cm;mso-list:l1 level1 lfo3"><span lang="EN-US">In the first example, the message is displayed but with some other image, that could be some default image of the system.</span><o:p></o:p></li><li class="MsoListParagraph" style="margin-left:0cm;mso-list:l1 level1 lfo3"><span lang="EN-US">In the thirds example, no message is displayed.</span><o:p></o:p></li></ol>
<p class="MsoNormal"><span lang="EN-US">&nbsp;</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US">See also the online discussion on news.tota-refugium.de.</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US">&nbsp;</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US">Thanks</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US">Alexandru</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US">&nbsp;</span><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US">&nbsp;</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">if {![info exists first]} {</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp; image create photo book -data \</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">R0lGODlhDwAPAKIAAP//////AP8AAMDAwICAgAAAAAAAAAAAACwAAAAADwAPAAADSQhA2u5ksPeKABKSCaya29d4WKgERFF0l1IMQCAKatvBJ0OTdzzXI1xMB3TBZAvATtB6NSLKleXi3OBoLqrVgc0yv+DVSEUuFxIAOw==</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp; tk systray create -image book -text "tk systray sample" \</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -button1 {puts "Here is the tk systray output"} \</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -button3 {puts "here is alternate output"}</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp; set first 1</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">}</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp;</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">tk sysnotify Warning {START OF ERROR MESSAGE</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">bad index "": must be integer?[+-]integer? or end?[+-]integer?</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">lsearch -nocase -start start values value</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">END OF ERROR MESSAGE }</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp;</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp;</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">tk sysnotify Warning { START OF ERROR MESSAGE</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">bad index "": must be integer?[+-]integer? or end?[+-]integer?</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">lsearch -nocase -start start values value</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** END OF ERROR MESSAGE ***}</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp;</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">tk sysnotify Warning {*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">bad index "": must be integer?[+-]integer? or end?[+-]integer?</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">"lsearch -nocase -start $start $values $value*"</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** END OF ERROR MESSAGE ***}</span><o:p></o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp;</span><o:p></o:p></p>
<div class="MsoNormal" align="center" style="text-align:center"><span style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif">
<hr size="2" width="100%" align="center">
</span></div>
<table class="MsoNormalTable" border="0" cellspacing="0" cellpadding="0">
<tbody>
<tr>
<td valign="top" style="border:none;border-right:solid #BD272D 1.5pt;padding:0cm 11.25pt 0cm 0cm">
<div align="right">
<table class="MsoNormalTable" border="0" cellspacing="0" cellpadding="0">
<tbody>
<tr style="height:41.25pt">
<td valign="top" style="padding:0cm 0cm 0cm 0cm;height:41.25pt">
<p class="MsoNormal" align="right" style="text-align:right"><b><span style="font-size:14.0pt;font-family:&quot;Verdana&quot;,sans-serif">Alexandru Dadalau<br>
</span></b><span style="font-size:10.0pt;font-family:&quot;Verdana&quot;,sans-serif">Geschäftsführer Entwicklung
<br>
Managing Director Development</span><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif">
<o:p></o:p></span></p>
</td>
</tr>
<tr style="height:30.0pt">
<td valign="top" style="padding:0cm 0cm 0cm 0cm;height:30.0pt">
<p class="MsoNormal" align="right" style="text-align:right"><span style="font-size:10.0pt;font-family:&quot;Verdana&quot;,sans-serif">phone: +49 711 9958 7001</span><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif"><br>
</span><span style="font-size:10.0pt;font-family:&quot;Verdana&quot;,sans-serif">mobile: +49 1522 4841115</span><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif"><br>
</span><span style="font-size:10.0pt;font-family:&quot;Verdana&quot;,sans-serif">fax: +49 711 9958 7199</span><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif">
<o:p></o:p></span></p>
</td>
</tr>
<tr style="height:15.0pt">
<td style="padding:0cm 0cm 0cm 0cm;height:15.0pt">
<p class="MsoNormal" align="right" style="text-align:right"><a href="https://www.facebook.com/Meshparts-1816360291987562/" target="_blank"><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif;text-decoration:none"><img border="0" width="19" height="19" style="width:.1979in;height:.1979in" id="_x0000_i1038" src="https://www.meshparts.de/img/icons/facebook.png" alt="Facebook icon" data-unique-identifier=""></span></a><a href="https://www.twitter.com/Meshparts" target="_blank"><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif;text-decoration:none"><img border="0" width="19" height="19" style="width:.1979in;height:.1979in" id="_x0000_i1037" src="https://www.meshparts.de/img/icons/twitter.png" alt="Twitter icon" data-unique-identifier=""></span></a><a href="https://www.youtube.com/channel/UCCL0r-Bl5GG_pem3o6XCxAA" target="_blank"><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif;text-decoration:none"><img border="0" width="19" height="19" style="width:.1979in;height:.1979in" id="_x0000_i1036" src="https://www.meshparts.de/img/icons/youtube.png" alt="Youtube icon" data-unique-identifier=""></span></a><a href="https://www.linkedin.com/company/12805433/" target="_blank"><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif;text-decoration:none"><img border="0" width="19" height="19" style="width:.1979in;height:.1979in" id="_x0000_i1035" src="https://www.meshparts.de/img/icons/linkedin.png" alt="LinkedIn icon" data-unique-identifier=""></span></a><a href="https://www.instagram.com/meshparts/" target="_blank"><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif;text-decoration:none"><img border="0" width="19" height="19" style="width:.1979in;height:.1979in" id="_x0000_i1034" src="https://www.meshparts.de/img/icons/instagram.png" alt="Instagram icon" data-unique-identifier=""></span></a><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif"><o:p></o:p></span></p>
</td>
</tr>
</tbody>
</table>
</div>
</td>
<td valign="top" style="padding:0cm 0cm 0cm 11.25pt">
<table class="MsoNormalTable" border="0" cellspacing="0" cellpadding="0">
<tbody>
<tr style="height:42.0pt">
<td width="300" valign="top" style="width:225.0pt;padding:0cm 0cm 0cm 0cm;height:42.0pt">
<p class="MsoNormal"><a href="https://www.meshparts.de/" target="_blank"><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif;text-decoration:none"><img border="0" width="157" height="56" style="width:1.6354in;height:.5833in" id="_x0000_i1033" src="https://www.meshparts.de/assets/svg/logos/mp-logomotto-mail.png" alt="Logo" data-unique-identifier=""></span></a><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif"><o:p></o:p></span></p>
</td>
</tr>
<tr style="height:30.0pt">
<td valign="top" style="padding:0cm 0cm 0cm 0cm;height:30.0pt">
<p class="MsoNormal"><span style="font-size:10.0pt;font-family:&quot;Verdana&quot;,sans-serif">Meshparts GmbH</span><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif"><br>
</span><span style="font-size:10.0pt;font-family:&quot;Verdana&quot;,sans-serif">Hedelfinger Str. 103</span><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif"><br>
</span><span style="font-size:10.0pt;font-family:&quot;Verdana&quot;,sans-serif">D-70327 Stuttgart</span><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif"><br>
</span><span style="font-size:10.0pt;font-family:&quot;Verdana&quot;,sans-serif">Geschäftsführer: Alexandru Dadalau, Timo Ziegler</span><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif"><br>
</span><span style="font-size:10.0pt;font-family:&quot;Verdana&quot;,sans-serif">Amtsgericht Stuttgart / HRB 744694</span><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif"><br>
</span><span style="font-size:10.0pt;font-family:&quot;Verdana&quot;,sans-serif">USt.Id.Nr.: DE 289401711</span><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif"><o:p></o:p></span></p>
</td>
</tr>
<tr style="height:15.0pt">
<td style="padding:0cm 0cm 0cm 0cm;height:15.0pt">
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif"><a href="http://www.meshparts.de" target="_blank"><span style="font-size:10.0pt;color:#BD272D">www.meshparts.de</span></a>
<o:p></o:p></span></p>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
<div class="MsoNormal" align="center" style="text-align:center"><span style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif">
<hr size="2" width="100%" align="center">
</span></div>
<table class="MsoNormalTable" border="0" cellspacing="0" cellpadding="0">
<tbody>
<tr style="height:15.0pt">
<td valign="top" style="padding:0cm 0cm 0cm 0cm;height:15.0pt">
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:&quot;Verdana&quot;,sans-serif"><a href="https://www.meshparts.de/de/unsubscribe"><span style="font-size:9.0pt">Unsubscribe</span></a>
<o:p></o:p></span></p>
</td>
</tr>
</tbody>
</table>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:&quot;Aptos&quot;,sans-serif">_______________________________________________<br>
Tcl-Core mailing list<br>
<a href="mailto:Tcl...@li...">Tcl...@li...</a><br>
<a href="https://lists.sourceforge.net/lists/listinfo/tcl-core">https://lists.sourceforge.net/lists/listinfo/tcl-core</a><o:p></o:p></span></p>
</div>
</blockquote>
</div>


</div></blockquote></body></html>

Re: [TCLCORE] TIP Contribution Bug in Tcl 9.0.2

[Alexandru D. <ale...@me...>]

Hi Kevin,

the code contains actually only 3 parts:

1. Create an image
2. Initialize the systray item (only once, that’s why the “first” variable is needed) using “ tk systray create”
3. Send a notification using “tk sysnotify”

I hope it’s clear now.

BTW: The issue occurs in Wondows 11 64bit

Von: Kevin Walzer <kw...@co...>
Gesendet: Montag, 8. September 2025 23:51
An: Alexandru Dadalau <ale...@me...>
Cc: tcl...@li...
Betreff: Re: [TCLCORE] TIP Contribution Bug in Tcl 9.0.2

Hi Alexandru,

I don’t understand what this code is doing?

Thanks,
Kevin


On Sep 8, 2025, at 5:20 PM, Alexandru Dadalau <ale...@me...<mailto:ale...@me...>> wrote:

Hi,

In Tcl 9.0.2 there is a bug in the “tk sysnotify” command.
The bug leads to a complete crash of the Tcl/Tk app, which closes.
It feels like an issue in the underlying C code.
I could not identify what exactly causes the crash, but it’s related only to the message string that is passed to the “tk sysnotify” command.

Below you can find 3 examples of strings that causes crashes.
Interestingly, the examples lead to slightly different behavior:

  1.  In first example, the message gets to be show by the sys tray and the crash happens seconds afterwords.
  2.  In the first example, the message is displayed but with some other image, that could be some default image of the system.
  3.  In the thirds example, no message is displayed.

See also the online discussion on news.tota-refugium.de.

Thanks
Alexandru


if {![info exists first]} {
  image create photo book -data \
R0lGODlhDwAPAKIAAP//////AP8AAMDAwICAgAAAAAAAAAAAACwAAAAADwAPAAADSQhA2u5ksPeKABKSCaya29d4WKgERFF0l1IMQCAKatvBJ0OTdzzXI1xMB3TBZAvATtB6NSLKleXi3OBoLqrVgc0yv+DVSEUuFxIAOw==
  tk systray create -image book -text "tk systray sample" \
          -button1 {puts "Here is the tk systray output"} \
          -button3 {puts "here is alternate output"}
  set first 1
}

tk sysnotify Warning {START OF ERROR MESSAGE
bad index "": must be integer?[+-]integer? or end?[+-]integer?
lsearch -nocase -start start values value
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
END OF ERROR MESSAGE }


tk sysnotify Warning { START OF ERROR MESSAGE
bad index "": must be integer?[+-]integer? or end?[+-]integer?
lsearch -nocase -start start values value
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** END OF ERROR MESSAGE ***}

tk sysnotify Warning {*** START OF ERROR MESSAGE ***
bad index "": must be integer?[+-]integer? or end?[+-]integer?
"lsearch -nocase -start $start $values $value*"
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** END OF ERROR MESSAGE ***}

________________________________
Alexandru Dadalau
Geschäftsführer Entwicklung
Managing Director Development
phone: +49 711 9958 7001
mobile: +49 1522 4841115
fax: +49 711 9958 7199
[Facebook icon]<https://www.facebook.com/Meshparts-1816360291987562/>[Twitter icon]<https://www.twitter.com/Meshparts>[Youtube icon]<https://www.youtube.com/channel/UCCL0r-Bl5GG_pem3o6XCxAA>[LinkedIn icon]<https://www.linkedin.com/company/12805433/>[Instagram icon]<https://www.instagram.com/meshparts/>
[Logo]<https://www.meshparts.de/>
Meshparts GmbH
Hedelfinger Str. 103
D-70327 Stuttgart
Geschäftsführer: Alexandru Dadalau, Timo Ziegler
Amtsgericht Stuttgart / HRB 744694
USt.Id.Nr.: DE 289401711
www.meshparts.de<http://www.meshparts.de>
________________________________
Unsubscribe<https://www.meshparts.de/de/unsubscribe>
_______________________________________________
Tcl-Core mailing list
Tcl...@li...<mailto:Tcl...@li...>
https://lists.sourceforge.net/lists/listinfo/tcl-core

Re: [TCLCORE] TIP Contribution Bug in Tcl 9.0.2

[Kevin W. <kw...@co...>]

<html><head><meta http-equiv="content-type" content="text/html; charset=utf-8"></head><body dir="auto"><div dir="ltr"></div><div dir="ltr">Hi Alexandru,</div><div dir="ltr"><br></div><div dir="ltr">I don’t understand what this code is doing?</div><div dir="ltr"><br></div><div dir="ltr">Thanks,</div><div dir="ltr">Kevin</div><div dir="ltr"><br><blockquote type="cite">On Sep 8, 2025, at 5:20 PM, Alexandru Dadalau &lt;ale...@me...&gt; wrote:<br><br></blockquote></div><blockquote type="cite"><div dir="ltr">

<meta http-equiv="Content-Type" content="text/html; charset=us-ascii">
<meta name="Generator" content="Microsoft Word 15 (filtered medium)">
<style>@font-face { font-family: Wingdings; }
@font-face { font-family: "Cambria Math"; }
@font-face { font-family: Calibri; }
@font-face { font-family: Aptos; }
@font-face { font-family: "Segoe UI Light"; }
p.MsoNormal, li.MsoNormal, div.MsoNormal { margin: 0cm; font-size: 11pt; font-family: Calibri, sans-serif; }
p.MsoListParagraph, li.MsoListParagraph, div.MsoListParagraph { margin: 0cm 0cm 0cm 36pt; font-size: 11pt; font-family: Calibri, sans-serif; }
span.E-MailFormatvorlage18 { font-family: "Segoe UI Light", sans-serif; color: windowtext; }
.MsoChpDefault { font-size: 10pt; }
@page WordSection1 { size: 612pt 792pt; margin: 70.85pt 70.85pt 2cm; }
div.WordSection1 { page: WordSection1; }
ol { margin-bottom: 0cm; }
ul { margin-bottom: 0cm; }</style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->


<div class="WordSection1">
<p class="MsoNormal"><span lang="EN-US">Hi,<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">In Tcl 9.0.2 there is a bug in the “tk sysnotify” command.<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">The bug leads to a complete crash of the Tcl/Tk app, which closes.<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">It feels like an issue in the underlying C code.<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">I could not identify what exactly causes the crash, but it’s related only to the message string that is passed to the “tk sysnotify” command.<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">Below you can find 3 examples of strings that causes crashes.<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">Interestingly, the examples lead to slightly different behavior:<o:p></o:p></span></p>
<ul style="margin-top:0cm" type="square">
<li class="MsoListParagraph" style="margin-left:0cm;mso-list:l0 level1 lfo1"><span lang="EN-US">In first example, the message gets to be show by the sys tray and the crash happens seconds afterwords.<o:p></o:p></span></li><li class="MsoListParagraph" style="margin-left:0cm;mso-list:l0 level1 lfo1"><span lang="EN-US">In the first example, the message is displayed but with some other image, that could be some default image of the system.<o:p></o:p></span></li><li class="MsoListParagraph" style="margin-left:0cm;mso-list:l0 level1 lfo1"><span lang="EN-US">In the thirds example, no message is displayed.<o:p></o:p></span></li></ul>
<p class="MsoNormal"><span lang="EN-US"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">See also the online discussion on news.tota-refugium.de.<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">Thanks<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">Alexandru</span><span lang="EN-US" style="font-size:12.0pt;font-family:&quot;Segoe UI Light&quot;,sans-serif"><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">if {![info exists first]} {<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp; image create photo book -data \<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">R0lGODlhDwAPAKIAAP//////AP8AAMDAwICAgAAAAAAAAAAAACwAAAAADwAPAAADSQhA2u5ksPeKABKSCaya29d4WKgERFF0l1IMQCAKatvBJ0OTdzzXI1xMB3TBZAvATtB6NSLKleXi3OBoLqrVgc0yv+DVSEUuFxIAOw==<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp; tk systray create -image book -text "tk systray sample" \<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -button1 {puts "Here is the tk systray output"} \<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; -button3 {puts "here is alternate output"}<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">&nbsp; set first 1<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">}<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">tk sysnotify Warning {START OF ERROR MESSAGE<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">bad index "": must be integer?[+-]integer? or end?[+-]integer?<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">lsearch -nocase -start start values value<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">START OF ERROR MESSAGE<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">END OF ERROR MESSAGE }<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">tk sysnotify Warning { START OF ERROR MESSAGE<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">bad index "": must be integer?[+-]integer? or end?[+-]integer?<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">lsearch -nocase -start start values value<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US">*** END OF ERROR MESSAGE ***}<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US"><o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">tk sysnotify Warning {*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">bad index "": must be integer?[+-]integer? or end?[+-]integer?<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">"lsearch -nocase -start $start $values $value*"<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">*** START OF ERROR MESSAGE ***<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE">*** END OF ERROR MESSAGE ***}<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="mso-fareast-language:DE"><o:p>&nbsp;</o:p></span></p>
</div>

<title>Email Signature</title>
<hr>
<table style="font-family:Verdana, Helvetica, sans-serif;" cellspacing="0" cellpadding="0">
<tbody>
<tr>
<td style="font-family:Verdana;border-right:2px solid #BD272D;padding-right:15px;text-align: right;vertical-align:top;" valign="top">
<table style="font-family:Verdana;margin-right:0;margin-left:auto;" cellspacing="0" cellpadding="0">
<tbody>
<tr>
<td style="font-family:Verdana;height:55px;vertical-align:top;text-align:right;" align="right" valign="top">
<span style="font-family:Verdana;font-size:14pt;font-weight:bold">Alexandru Dadalau<span><br>
</span></span><span style="font-family:Verdana;font-size:10pt;">Geschäftsführer Entwicklung
<br>
Managing Director Development</span> </td>
</tr>
<tr>
<td style="font-family:Verdana;height:40px;vertical-align:top;padding:0;text-align:right;" align="right" valign="top">
<span style="font-family:Verdana;font-size:10pt;">phone: +49 711 9958 7001</span><br>
<span style="font-family:Verdana;font-size:10pt;">mobile: +49 1522 4841115</span><br>
<span style="font-family:Verdana;font-size:10pt;">fax: +49 711 9958 7199</span> </td>
</tr>
<tr>
<td style="font-family:Verdana;height:20px;vertical-align:middle;text-align:right;" align="right" valign="middle">
<span><a href="https://www.facebook.com/Meshparts-1816360291987562/" target="_blank"><img alt="Facebook icon" style="border:0;height:19px;width:19px" src="https://www.meshparts.de/img/icons/facebook.png" width="19" height="19" border="0" data-unique-identifier=""></a></span>
<span><a href="https://www.twitter.com/Meshparts" target="_blank"><img alt="Twitter icon" style="border:0;height:19px;width:19px" src="https://www.meshparts.de/img/icons/twitter.png" width="19" height="19" border="0" data-unique-identifier=""></a></span>
<span><a href="https://www.youtube.com/channel/UCCL0r-Bl5GG_pem3o6XCxAA" target="_blank"><img alt="Youtube icon" style="border:0;height:19px;width:19px" src="https://www.meshparts.de/img/icons/youtube.png" width="19" height="19" border="0" data-unique-identifier=""></a></span>
<span><a href="https://www.linkedin.com/company/12805433/" target="_blank"><img alt="LinkedIn icon" style="border:0;height:19px;width:19px" src="https://www.meshparts.de/img/icons/linkedin.png" width="19" height="19" border="0" data-unique-identifier=""></a></span>
<span><a href="https://www.instagram.com/meshparts/" target="_blank"><img alt="Instagram icon" style="border:0;height:19px;width:19px" src="https://www.meshparts.de/img/icons/instagram.png" width="19" height="19" border="0" data-unique-identifier=""></a>
</span></td>
</tr>
</tbody>
</table>
</td>
<td style="padding-left:15px;font-size:1pt;vertical-align:top;font-family:Verdana;" valign="top">
<table style="font-family:Verdana;" cellspacing="0" cellpadding="0">
<tbody>
<tr>
<td style="width:300px;height:56px;font-family:Verdana;vertical-align:top;" valign="top">
<a href="https://www.meshparts.de/" target="_blank"><img alt="Logo" style="width:auto;height:56px;border:0;" src="https://www.meshparts.de/assets/svg/logos/mp-logomotto-mail.png" width="157" height="56" border="0" data-unique-identifier=""></a>
</td>
</tr>
<tr>
<td style="height:40px;font-family:Verdana;vertical-align:top;padding:0;" valign="top">
<span style="font-family:Verdana;font-size:10pt;">Meshparts GmbH</span><br>
<span style="font-family:Verdana;font-size:10pt;">Hedelfinger Str. 103</span><br>
<span style="font-family:Verdana;font-size:10pt;">D-70327 Stuttgart</span><br>
<span style="font-family:Verdana;font-size:10pt;">Geschäftsführer: Alexandru Dadalau, Timo Ziegler</span><br>
<span style="font-family:Verdana;font-size:10pt;">Amtsgericht Stuttgart / HRB 744694</span><br>
<span style="font-family:Verdana;font-size:10pt;">USt.Id.Nr.: DE 289401711</span><br>
</td>
</tr>
<tr>
<td style="height:20px;font-family:Verdana;vertical-align:middle;" valign="middle">
<a href="http://www.meshparts.de" target="_blank" style="color:#BD272D;font-size:10pt;font-family:Verdana;">www.meshparts.de</a>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
<hr>
<table style="font-family:Verdana, Helvetica, sans-serif;" cellspacing="0" cellpadding="0">
<tbody>
<tr>
<td style="height:20px;font-family:Verdana;vertical-align:top;" valign="top"><a href="https://www.meshparts.de/de/unsubscribe"><span style="font-size: 0.75em">Unsubscribe</span></a>
</td>
</tr>
</tbody>
</table>


<span>_______________________________________________</span><br><span>Tcl-Core mailing list</span><br><span>Tcl...@li...</span><br><span>https://lists.sourceforge.net/lists/listinfo/tcl-core</span><br></div></blockquote></body></html>

[TCLCORE] TIP Contribution Bug in Tcl 9.0.2

[Alexandru D. <ale...@me...>]

Hi,

In Tcl 9.0.2 there is a bug in the "tk sysnotify" command.
The bug leads to a complete crash of the Tcl/Tk app, which closes.
It feels like an issue in the underlying C code.
I could not identify what exactly causes the crash, but it's related only to the message string that is passed to the "tk sysnotify" command.

Below you can find 3 examples of strings that causes crashes.
Interestingly, the examples lead to slightly different behavior:

  *   In first example, the message gets to be show by the sys tray and the crash happens seconds afterwords.
  *   In the first example, the message is displayed but with some other image, that could be some default image of the system.
  *   In the thirds example, no message is displayed.

See also the online discussion on news.tota-refugium.de.

Thanks
Alexandru


if {![info exists first]} {
  image create photo book -data \
R0lGODlhDwAPAKIAAP//////AP8AAMDAwICAgAAAAAAAAAAAACwAAAAADwAPAAADSQhA2u5ksPeKABKSCaya29d4WKgERFF0l1IMQCAKatvBJ0OTdzzXI1xMB3TBZAvATtB6NSLKleXi3OBoLqrVgc0yv+DVSEUuFxIAOw==
  tk systray create -image book -text "tk systray sample" \
          -button1 {puts "Here is the tk systray output"} \
          -button3 {puts "here is alternate output"}
  set first 1
}

tk sysnotify Warning {START OF ERROR MESSAGE
bad index "": must be integer?[+-]integer? or end?[+-]integer?
lsearch -nocase -start start values value
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
START OF ERROR MESSAGE
END OF ERROR MESSAGE }


tk sysnotify Warning { START OF ERROR MESSAGE
bad index "": must be integer?[+-]integer? or end?[+-]integer?
lsearch -nocase -start start values value
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** END OF ERROR MESSAGE ***}

tk sysnotify Warning {*** START OF ERROR MESSAGE ***
bad index "": must be integer?[+-]integer? or end?[+-]integer?
"lsearch -nocase -start $start $values $value*"
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** START OF ERROR MESSAGE ***
*** END OF ERROR MESSAGE ***}

________________________________
Alexandru Dadalau
Gesch?ftsf?hrer Entwicklung
Managing Director Development
phone: +49 711 9958 7001
mobile: +49 1522 4841115
fax: +49 711 9958 7199
[Facebook icon]<https://www.facebook.com/Meshparts-1816360291987562/> [Twitter icon] <https://www.twitter.com/Meshparts>  [Youtube icon] <https://www.youtube.com/channel/UCCL0r-Bl5GG_pem3o6XCxAA>  [LinkedIn icon] <https://www.linkedin.com/company/12805433/>  [Instagram icon] <https://www.instagram.com/meshparts/>
[Logo]<https://www.meshparts.de/>
Meshparts GmbH
Hedelfinger Str. 103
D-70327 Stuttgart
Gesch?ftsf?hrer: Alexandru Dadalau, Timo Ziegler
Amtsgericht Stuttgart / HRB 744694
USt.Id.Nr.: DE 289401711
www.meshparts.de<http://www.meshparts.de>
________________________________
Unsubscribe<https://www.meshparts.de/de/unsubscribe>

[TCLCORE] TIP 728: Reliable Read and Write of Child Interpreter Variables

[Donal F. <don...@ma...>]

Hi everyone!

I've just done a new little TIP for 9.1 that adds interp set so that we can more easily read and write variables in child interpreters even when the child interpreter is playing games with the set global command. It's really a very simple implementation, given that it's cross-interpreter functionality (and uses the same general access control rules as for interp eval). I'm not proposing to add any fancy compilation or other things like that, so the functionality's now done and it's passing its tests. This is one of those things where I woke up this morning thinking "but why has nobody ever bothered to do this before?" 😁

Because of that, this is notice that I'll call a vote in a week or so unless there's some sort of fundamental objection.

Donal.

Re: [TCLCORE] TIP 727: toggleswitch

[Csaba N. <csa...@t-...>]

Hi Harald,

I, too, think that the opinion of a few Tk wizards would be important 
and highly welcomed.  In the next step we could then call for vote.

Best regards,

Csaba


Am 08.09.25 um 14:08 schrieb Harald Oehlmann:
> Dear Tk team, dear Csaba,
> 
> TIP 727
> https://core.tcl-lang.org/tips/doc/trunk/tip/727.md
> introduces the new widget "ttk::toggleswitch".
> For me, this is a great improvement.
> Csaba has developped this IMHO to a mature state.
> 
> Now, Csaba continues with the next project from the conference, the 
> "cargo" possibility, that each tk widget may have a variable store.
> 
> Csaba, if you intend to call the vote of 727, I am ready to sponsor.
> Unfortunately, I will be offline from next Saturday until 2025-10-07.
> 
> Please ping me, if I can don anything this week.
> I am on travel but still reachable.
> I would love a 2nd tk Wizard opinion on the TIP and implementation like 
> Mark, Brian, Francois or Kevin.
> 
> Thanks for all the action, we all highly appreciate!
> 
> Take care,
> Harald
> 
> 
> _______________________________________________
> Tcl-Core mailing list
> Tcl...@li...
> https://lists.sourceforge.net/lists/listinfo/tcl-core

-- 
Csaba Nemethi  https://www.nemethi.de  mailto:csa...@t-...

Re: [TCLCORE] TIP 727: toggleswitch

[Kevin W. <kw...@co...>]

PS - I forgot to say, GREAT WORK CSABA!  This will be a nice addition to Tk. 

> On Sep 8, 2025, at 8:45 AM, Kevin Walzer <kw...@co...> wrote:
> 
> Hi Harald,
> 
> I reviewed the TIP and tested the widget on macOS.
> 
> It appears this widget role “switch” is available on most platforms in their accessibility API, so if this TIP is approved, I’ll add this to my project.
> 
>> On Sep 8, 2025, at 8:09 AM, Harald Oehlmann <har...@el...> wrote:
>> 
>> Dear Tk team, dear Csaba,
>> 
>> TIP 727
>> https://core.tcl-lang.org/tips/doc/trunk/tip/727.md
>> introduces the new widget "ttk::toggleswitch".
>> For me, this is a great improvement.
>> Csaba has developped this IMHO to a mature state.
>> 
>> Now, Csaba continues with the next project from the conference, the "cargo" possibility, that each tk widget may have a variable store.
>> 
>> Csaba, if you intend to call the vote of 727, I am ready to sponsor.
>> Unfortunately, I will be offline from next Saturday until 2025-10-07.
>> 
>> Please ping me, if I can don anything this week.
>> I am on travel but still reachable.
>> I would love a 2nd tk Wizard opinion on the TIP and implementation like Mark, Brian, Francois or Kevin.
>> 
>> Thanks for all the action, we all highly appreciate!
>> 
>> Take care,
>> Harald
>> _______________________________________________
>> Tcl-Core mailing list
>> Tcl...@li...
>> https://lists.sourceforge.net/lists/listinfo/tcl-core
>> <OpenPGP_signature.asc>
> 
> 
> _______________________________________________
> Tcl-Core mailing list
> Tcl...@li...
> https://lists.sourceforge.net/lists/listinfo/tcl-core

Re: [TCLCORE] TIP 727: toggleswitch

[Kevin W. <kw...@co...>]

Hi Harald,

I reviewed the TIP and tested the widget on macOS. 

It appears this widget role “switch” is available on most platforms in their accessibility API, so if this TIP is approved, I’ll add this to my project. 

> On Sep 8, 2025, at 8:09 AM, Harald Oehlmann <har...@el...> wrote:
> 
> Dear Tk team, dear Csaba,
> 
> TIP 727
> https://core.tcl-lang.org/tips/doc/trunk/tip/727.md
> introduces the new widget "ttk::toggleswitch".
> For me, this is a great improvement.
> Csaba has developped this IMHO to a mature state.
> 
> Now, Csaba continues with the next project from the conference, the "cargo" possibility, that each tk widget may have a variable store.
> 
> Csaba, if you intend to call the vote of 727, I am ready to sponsor.
> Unfortunately, I will be offline from next Saturday until 2025-10-07.
> 
> Please ping me, if I can don anything this week.
> I am on travel but still reachable.
> I would love a 2nd tk Wizard opinion on the TIP and implementation like Mark, Brian, Francois or Kevin.
> 
> Thanks for all the action, we all highly appreciate!
> 
> Take care,
> Harald
> _______________________________________________
> Tcl-Core mailing list
> Tcl...@li...
> https://lists.sourceforge.net/lists/listinfo/tcl-core
> <OpenPGP_signature.asc>

[TCLCORE] TIP 727: toggleswitch

[Harald O. <har...@el...>]

Dear Tk team, dear Csaba,

TIP 727
https://core.tcl-lang.org/tips/doc/trunk/tip/727.md
introduces the new widget "ttk::toggleswitch".
For me, this is a great improvement.
Csaba has developped this IMHO to a mature state.

Now, Csaba continues with the next project from the conference, the 
"cargo" possibility, that each tk widget may have a variable store.

Csaba, if you intend to call the vote of 727, I am ready to sponsor.
Unfortunately, I will be offline from next Saturday until 2025-10-07.

Please ping me, if I can don anything this week.
I am on travel but still reachable.
I would love a 2nd tk Wizard opinion on the TIP and implementation like 
Mark, Brian, Francois or Kevin.

Thanks for all the action, we all highly appreciate!

Take care,
Harald

Re: [TCLCORE] valgrind exceptions

[Rolf A. <tcl...@po...>]

apnmbx-public--- via Tcl-Core writes:
> (CC’ing tcl-core as it is a broader discussion and others may have suggestions)
>
>  
>
> The issue is not the Tcl_Free() one line call, it is more about *when*
> that call should be made. There are multiple threads sharing that
> initialized value, including potentially threads that do not create
> interpreters at all. There are at least two things to be taken care of
> before freeing
>
>  
>
> *	ensuring all other threads have exited
> * ensuring the *current* thread, the last one exiting, that frees the
> value does not subsequently try and access the file system as part of
> some other clean up after the value is freed, further complicated in
> this particular case because zipfs has an incestuous relationship with
> the native file system
>
>  
>
> The first requires non-trivial machinery with locks and reference
> counting; the latter requires careful review and even then, given past
> experiences with Tcl finalization, carries risk. Both are doable but
> only increases bloat for questionable gain. Note that in practice, Tcl
> does not do finalization at all, unless a specific environment
> variable is set. So the value of all that machinery is doubtful.

It is true that Tcl by default does no finalization. But it is very
helpful and valuable for debugging and developemnt that it does if asked
for (or tricked into).

I'm sure you agree. Otherwise you would not ask for adding a valgrind
exception to let the finalization (if done) look well and graceful.

What you describe is one of the rare legitimate reasons for a valgrind
exception. 

rolf

Re: [TCLCORE] Verge of Merge Warning

[Marc C. <cul...@gm...>]

It is not as if we are starting from scratch here. The syntax and the
expected behavior of the send command have not changed and we already have
a full set of tests which were deemed adequate not long ago.  The issues as
far as I can tell are that there were serious bugs in the macOS port, which
need non-regression tests, and that according to Erik some of the tests
were cooked to make them pass on macOS in spite of non-compliant behavior.
Those need to be fixed so they actually test what they were intended to
test. The last part can be tricky because it is often not clear what tests
are intended to test, especially when the test code is full of timeouts and
updates which are needed to get a test to pass on all platforms.

- Marc

On Thu, Sep 4, 2025, 6:10 AM Donal Fellows <don...@ma...>
wrote:

> In all of these things, you start by doing the bits you can see how to do.
> I suggest writing some "happy path" tests first to check for a lack of
> surprises for users using things simply and as they are intended to be
> used. Then check for syntax errors in the command(s) and other basic bits,
> and then try to characterise known bugs or places you suspect tricky
> callbacks might cause trouble. The very energetic can try to get code
> coverage up... but that's generally quite hard to do, especially full path
> coverage, and I don't know of good tooling for that in either Tcl or C.
>
> Donal.
>
> -------- Original message --------
> From: Erik Leunissen via Tcl-Core <tcl...@li...>
> Date: 04/09/2025 08:19 (GMT+00:00)
> To: Marc Culler <cul...@gm...>, Tcl Core List <
> tcl...@li...>
> Subject: Re: [TCLCORE] Verge of Merge Warning
>
> What concerns me is that someone has to be responsible for:
> * deciding what tests are appropriate/necessary to test the functionality
> of the
>    mac_send branch in general. That is, regardless of any existing tests
> (flawed or
>    not). IMO that includes a test for the bug in ticket #ff2ca8b34c .
> * create new tests and modify existing ones, and exercise them
> specifically on macOS
> * making the necessary changes to the test suite in fossil
>
> I'm not in a position to do that [*].
>
>     (I understand very well that it's sometimes difficult to see through
> the
>      workings/purpose of existing tests. I experience that regularly. Maybe
>      others can help?)
>
> My contribution:
> * I can provide straightforward versions for the tests winfo-5.4 and
> winfo-5.5.
> * In ticket #ff2ca8b34c, I already supplied a test script that exercises
> the
>    bug reported there. That script can be used as a basis for a test.
>
> If you take the lead (insofar as you have opportunity of course), I'm
> happy to
> proceed and provide you with the straightforward versions of tests
> winfo-5.4 and
> winfo-5.5.
>
> Do you think that we could proceed in a useful way along these lines?
>
> Erik.
> --
> [*] I'm not familiar with the code in branch mac_send, and no dev
> environment
>      (yet) for macOS, I can run stand-alone scripts on macOS for Tk8.6.16)
>
>       B.t.w. sorry for screwing up your last name below. I just found out
> that that's
>       the result of an overly ambitious spell-checker :-(
>
>