HDTenEightyP/NetNews huggingface dataset:
From: fuer@nessie.gud.siemens.co.at (Gerhard Fuernkranz)
Subject: Re: tclMotif, any info?
Date: Fri, 18 Dec 1992 10:08:27 GMT
Organization: SIEMENS Austria Corp., A-1100 Wien, Gudrunstr. 11
X-Newsreader: Tin 1.1 PL5

"David Herron" (david@twg.com) wrote:
: 
: In any case my answer/query is:
:
: >I got hold of a version of tcl with Motif extensions.
: 
: Where did you pick this up?  How can I get a copy?

I would be interrested in tclMotif too.
Is it free software ?
If so, where can I get it ?

Thanks in advance

g.f.

--
Gerhard Fuernkranz		SIEMENS Austria Corp.
Email: fuer@siemens.co.at	Gudrunstr. 11
Phone: +43-1-60171-5716		A-1100 Wien
Newsgroups: comp.lang.tcl
From: "David Herron" <david@twg.com>
Subject: Further tk3.0 problems
Sensitivity: Personal
Encoding:  23 TEXT , 4 TEXT 
Conversion: Prohibited
Organization: The Wollongong Group, Inc., Palo Alto, CA
Conversion-With-Loss: Prohibited
Date: Sat, 19 Dec 1992 02:03:29 GMT

These are not specific to Sun 386i:

- tk3.0/Makefile wants to install wish as /usr/local/wish.  The superior
  place to install `local' things is /usr/local/bin!

- After cp'ing the .a files it doesn't ranlib them.

The biggie though is this sequence (which isn't discovered by the tests):

boomer# tclTest
% set blue 0
0
% set min 0.0
0.0
% if {$blue < $min} { set min $blue.0 }
Error: floating-point value "0.0" too small to represent
% 

I discovered this while trying to get tcolor to run.  This sequence is
in rgbToHsv{} when red=65535 green=0 blue=0.  The error comes from
tclExpr.c right after a strtod() which made errno == ERANGE.  The
string passed to strtod() *is* "0.0", BTW.


<- David Herron <david@twg.com> (work) <david@davids.mmdf.com> (home)
<-
<- During the '80s Usenet's mantra was: "Not all the world's a VAX".
<- During the '90s I hope it becomes:   "Not all the world's DOS (ick)".
Newsgroups: comp.lang.tcl
From: tjj@thumper..bellcore.com (J Tim Jordan)
Subject: Can't withdraw too soon
Reply-To: tjj@thumper.UUCP (J Tim Jordan)
Organization: Bellcore MRE
Distribution: comp
Date: Sat, 19 Dec 92 01:41:44 GMT

I use to be able to create toplevels and then withdraw them
before they are displayed and let the user deiconify them 
by hitting a button. But now I can't deiconify them.
Here's an example

proc q {} {
toplevel .qq -geo 100x100
wm w .qq
}
q
wm deiconify .qq

******** NOTHING HAPPENS ********

Tim
Newsgroups: comp.lang.tcl
From: schendr@drssparc.eptd.Texaco.COM (Dan R. Schenck)
Subject: tcl/tk Ability to Trap X Atoms
Organization: Texaco EPTD - Data Management
Date: Tue, 15 Dec 1992 16:36:37 GMT

I have the need to develop an application that can trap X atoms coming from a 
standard X-Windows/Motif application and, based on the X events, "send" commands 
to a tcl/tk application.  Is there a way to do this using tcl/tk?  If not, what 
is the best way to proceed in C?

If anyone has done this and has an example it would be much appreciated.


-- 
+--------------- Dan R. Schenck - Data Management - TEXACO EPTD ---------------+
|  External Email:  schendr@Texaco.COM        Texaco Email:  schendr@texhrc    |
|    _   __         Voice:    (713) 954-6053  Fax:  (713) 954-6911  	       |
|   /_) /-/ /\/     US Mail:  Texaco, Inc., 3901 Briarpark, Houston, TX 77042  |
+------------------------------------------------------------------------------+
From: raines@bohr.physics.upenn.edu (Paul Raines)
Newsgroups: comp.lang.tcl
Subject: Possible Map problem with Tk3.0
Date: 18 Dec 92 22:35:16 GMT

I have tried running Jay Sekora's browser app under the new
Tk3.0 wish put found that it mapped all children toplevel
windows off the screen.  The problem seems to be with the
binds to the Map event. The relevant code is below.  By commenting
out the bind calls and explicity calling dowindowpos from windowpos,
the window will show up with its left top corder in the middle.
I couldn't find anything in the changes file that would seem to 
relate to this difference.

######################################################################
# windowpos w - arrange to position window w near ctr of screen
######################################################################

proc windowpos { w } {
# when this is called, the window hasn't been mapped yet, so
# [winfo reqwidth $w] and [...reqheight...] would both report zero.
# we set initial geometry off the screen, so the window won't appear
# to jump when we change the geometry (it will initially be mapped off
# the screen, but then `dowindowpos' will move it to the middle).

  set swidth [winfo screenwidth $w]
  set sheight [winfo screenheight $w]

# first, put it off screen.  (actually, a corner of the titlebar will
# show, even if I specify coordinates that should be further off the
# screen.)

  wm geometry $w +${swidth}+${sheight}

# and arrange for `dowindowpos', which will actually put it in the middle,
# to be called later.

  bind $w <Map> "dowindowpos $w"
}
#
# dowindowpos w - used by windowpos
#
proc dowindowpos { w } {
  set wwidth [winfo reqwidth $w]
  set wheight [winfo reqheight $w]
  set swidth [winfo screenwidth $w]
  set sheight [winfo screenheight $w]

# centred horizontally; 1/3 down vertically

  set hpos [expr { ( $swidth - $wwidth ) / 2 }]
  set vpos [expr { ( $sheight - $wheight ) / 3 }]

  wm geometry $w +${hpos}+${vpos}

# now unbind <Map>, so window doesn't jump around if it's unmapped (eg
# iconified) and then remapped.

  bind $w <Map> {}
}



-- 
____________________________________________________________________
Paul Raines	raines@bohr.physics.upenn.edu	215-898-8832
Dept. of Physics
University of Pennsylvania
From: ouster@sprite.Berkeley.EDU (John Ousterhout)
Newsgroups: comp.lang.tcl
Subject: Re: Commercial applications in Tcl?
Date: 12 Dec 1992 00:33:16 GMT
Organization: U.C. Berkeley Sprite Project
Distribution: world
NNTP-Posting-Host: tyranny.berkeley.edu

In article <1gb1spINNicu@agate.berkeley.edu>, joel@saffron.CS.Berkeley.EDU (Joel A. Fine) writes:
|> Hi,
|> 
|> Has anyone given any thought to what it might take to create a
|> restrictable commercial application in Tk/Tcl? Suppose that I want
|> to do all of my programming in tcl, and just use "wish" as the binary,
|> since others have already done all of the work to port it to various
|> machines, make it robust, etc. But if I do that, I have to distribute
|> source code. It's not clear to me how I could then restrict its use
|> to those who have paid for it.
|> 
|> Is there such a thing as compiled tcl, for example? Are there companies
|> actually doing commercial tk software? What do they do about this?
|> 
|> Perhaps this is a non-issue: since tk is a research project; is it
|> unreasonable to expect that programmers will actually generate non-
|> shareware tcl/tk applications?
|> 
|> - Joel Fine

I've occasionally thought about this, and here's an arrangement that I think
would work (I haven't actually tried it, though):

(a) Change Tcl so that it can source encrypted files using some reasonable
    encryption algorithm. Then a company could encrypt its Tcl scripts.

(b) Add a "secretproc" command to Tcl (or a -secret swith to "proc") which
    makes a procedure definition secret, in that Tcl won't return its body
    in "info" requests.  The encrypted source files would create their
    procedures in "secret" mode so that they couldn't be extracted from the
    interpreter.

(c) Finally, provide some sort of key distribution mechanism, e.g. add support
    in Tcl for one or more of the standard UNIX license servers, so that Tcl
    would only decrypt source files with a particular key after receiving an
    OK from a license server.  Alternatively, it should be possible to use
    a machine-id-based key system where a company could give a user a key that
    would only work on a particular machine, but this would be a bit of a
    hassle.

This involves a non-trivial amount of work in Tcl, but it isn't a huge task
and it requires very few changes to the Tcl core (the -secret switch is the
only change to the core, and that's a trivial change);  most of it could be
done as an add-on file that provides the encryption support.
Newsgroups: comp.lang.tcl
From: nlane@well.sf.ca.us (Nathan D. Lane)
Subject: xf1.4 on IBM RS/6000 - fails in "make misc"
Organization: Whole Earth 'Lectronic Link
Date: Thu, 17 Dec 1992 06:48:59 GMT

I have retrieved xf-1.4 from barkley.berekeley.edu and am trying to
compile (?) it on the IBM RS-6000.  I have tk2.3 and tcl6.4 compiled
and working just fine on the IBM.  However, when the makefile for 
xf gets to "installing: makexf", I get a raft of errors:

installing: makexf
"xf.sh", line 1.1: 1288-218 (W) Unknown preprocessing directive !.
"xf.sh", line 2.3: 1288-218 (W) Unknown preprocessing directive This.
"xf.sh", line 8.3: 1288-218 (W) Unknown preprocessing directive configure.
"xf.sh", line 10.3: 1288-218 (W) Unknown preprocessing directive where.

Then, one it gets down to making misc, it says "don't know how to make
misc" - checked the makefile and it looks fine (e.g., it's there) and
looks the same as the other targets.

Has anyone out there gotten this to work on the RS-6000?  I'm running
AIX 3.2.0 (or .1 - can't tell with AIX).

Thanks in advance.

-Nathan Lane
Trico Title Company, Santa Barbara, CA
nlane@well.sf.ca.us

Newsgroups: comp.lang.tcl
From: omar@wucs1.wustl.edu (Omar El-Ghazzawy)
Subject: Re: Commercial applications in Tcl?
Organization: Washington University, St. Louis MO
Date: Fri, 11 Dec 1992 22:47:41 GMT

In article <1gb1spINNicu@agate.berkeley.edu> joel@saffron.CS.Berkeley.EDU (Joel A. Fine) writes:
>Hi,
>
>Has anyone given any thought to what it might take to create a
>restrictable commercial application in Tk/Tcl? Suppose that I want
>to do all of my programming in tcl, and just use "wish" as the binary,
>since others have already done all of the work to port it to various
>machines, make it robust, etc. But if I do that, I have to distribute
>source code. It's not clear to me how I could then restrict its use
>to those who have paid for it.
>
>Is there such a thing as compiled tcl, for example? Are there companies
>actually doing commercial tk software? What do they do about this?
>
>Perhaps this is a non-issue: since tk is a research project; is it
>unreasonable to expect that programmers will actually generate non-
>shareware tcl/tk applications?
>
>- Joel Fine


Joel,

I am writing a commercial product using Tcl/Tk.  I do not wish to discuss
the details because we don't want to give our competition advanced notice
that we are coming.

The heart of our code is written in C with the GUI in Tcl/Tk.  Everything
is proceeding quite well (Thanks John Ousterhout for a wonderful package!).

If you plan on writing the entire application in Tcl then I believe you have
a bit of a problem.  However, if you create a few objects in C and register
them as Tcl commands your problem may be solved.  Just make sure your GUI
makes plenty of calls to C code, and people will not be able to "steal" it.

Good Luck!

Newsgroups: comp.lang.tcl
From: ellson@ontap.att.com (John Ellson)
Subject: tk3.0 - menu strangeness in widget demo
Reply-To: ellson@hotsand.att.com
Organization: AT&T
Distribution: na
Date: Fri, 18 Dec 1992 19:38:00 GMT


When I hold the left-mouse-button down over a menu in the "widget" demo
and drag it along to another menu the cursor alternates rapidly between 
pointing NW and NE.  The menu area is blocked out but the menu items are 
not shown until the button is released. 

This happens with or without John's version of the tkWm.c patch.  
The environment is SunOS 4.1.1, OpenWindows 3, olvwm 3.0.

John Ellson
AT&T Bell Labs

P.S. Minor problem with the Makefiles, our default version of "cp" doesn't 
support the "-f" flag used in "make install".  I just removed all the
"-f"s and it worked fine.
Newsgroups: comp.lang.tcl
From: lwv26@cas.org (Larry W. Virden)
Subject: Re: Commercial applications in Tcl?
Followup-To: comp.lang.tcl
Reply-To: lvirden@cas.org (Larry W. Virden)
Organization: Nedriv Software and Shoe Shiners, Uninc.
Date: Sun, 13 Dec 1992 03:48:02 GMT

There is at least one shareware package mentioned in Part 3 of the FAQ -
a Mac programmable text editor.
-- 
Larry W. Virden                 UUCP: osu-cis!chemabs!lvirden
Same Mbox: BITNET: lvirden@cas  INET: lvirden@cas.org
Personal: 674 Falls Place,   Reynoldsburg, OH 43068-1614
From: trier@odin.ins.cwru.edu (Stephen C. Trier)
Newsgroups: comp.lang.tcl
Subject: Re: Commercial applications in Tcl?
Date: 12 Dec 1992 17:39:26 GMT
Organization: Case Western Reserve University, Cleveland OH (USA)
NNTP-Posting-Host: odin.ins.cwru.edu

In article <Bz4pJv.8zM@rufous.cs.unm.edu> seiferth@rufous.cs.unm.edu (Justin Seiferth) writes:
>Alternatively, you could write a Tcl compiler....

You could also write a routine that encrypts your TCL code into C source
(that consists of a large array of strings?), then link in a routine that
decrypts the strings and hands them to TCL.  This would work only if you
don't give your clients access to the TCL programming interface.

You could just distribute it with the TCL code exposed or semi-exposed and
make it clear to your customers that they are buying source code, and that
they must agree to non-disclosure as part of the deal.

By the way, one minor clarification: It's NOT "shareware", as the original
poster wrote.  "Shareware" is when someone writes an application and
depends on others to distribute it (for free), then begs the ultimate user
to send him money.  Shareware is quite popular in the Mac and MS-DOS worlds,
but I have never seen a TCL-related program distributed as shareware.

Appropriate words are "freeware", "freely distributable", and others.
"Public domain" is not appropriate, since TCL is copyrighted.

-- 
Stephen Trier                                    It's either very surprising
Network Services Engineering, IRIS/INS/Telecom    or not surprising at all.
Case Western Reserve University                    Let me think about it.
trier@ins.cwru.edu                                       - Palmer Davis
Newsgroups: comp.lang.tcl
From: olav@eddy.gmd.de (Olav Schettler)
Subject: Re: desktop app?
Organization: GMD, Sankt Augustin, Germany
X-Newsreader: Tin 1.1 PL5
Date: Sun, 13 Dec 1992 14:54:01 GMT

I have copied some of the functionality of MS windows desktop and
combined it with a little file browser. Need to clean up the code
and clarify the legal status but probably will be able to post the beast 
soon.

 -- Olav Schettler

Framework Integration Technology (FIT)
Institute for System Design Technology (SET)
German National Research Center for Computer Science (GMD)
P.O. Box 1316                            phone: +49 (2241) 14-2291
Schloss Birlinghoven                     fax:   +49 (2241) 14-2342/2823
W-5205 Sankt Augustin 1                  email: olav@borneo.gmd.de
Newsgroups: bnr.lang.tcl,comp.lang.tcl
From: shmdgljd@rchland.vnet.ibm.com (Jay Schmidgall)
Subject: Re: toplevel message widgets problem
Date: Wed, 16 Dec 1992 12:58:06 GMT
Reply-To: jay@vnet.ibm.com
Disclaimer: This posting represents the poster's views, not necessarily those of IBM
Organization: IBM Rochester, MN

In article <1992Dec15.233825.18609@bcars6a8.bnr.ca>, norm@bnr.ca (Norm MacNeil) writes:
|> MsgCntl BEGIN "Processing - please wait..."
|> #life happens here
|> MsgCntl END ""
|> 
|> Anyway, sometimes the text appears in the message window and sometimes it
|> doesn't.

It could be that the events haven't finished processing before you start
your other processing.  Try putting an `update' right after MsgCntl BEGIN

-- 
: jay          jay@vnet.ibm.com    My opinions and ideas, not my employer's.
: shmdgljd@rchland.vnet.ibm.com    (c) Copyright 1992.  All rights reserved.
From: ouster@sprite.Berkeley.EDU (John Ousterhout)
Newsgroups: comp.lang.tcl
Subject: Re: toplevel message widgets problem
Date: 16 Dec 1992 16:35:17 GMT
Organization: U.C. Berkeley Sprite Project
Distribution: world
NNTP-Posting-Host: tyranny.berkeley.edu

In article <1992Dec15.233825.18609@bcars6a8.bnr.ca>, norm@bnr.ca (Norm MacNeil) writes:
|> I wanted to be able to put up a "dialog" box with a message (like "Processing -
|> Please wait...") and then allow the program to continue on until such time as
|> the internal processing was complete at which time the message box would
|> disappear.  So I wrote a little procedure...
|> 
|> So in the program, it would be used like...
|> 
|> MsgCntl BEGIN "Processing - please wait..."
|> #life happens here
|> MsgCntl END ""
|> 
|> Anyway, sometimes the text appears in the message window and sometimes it
|> doesn't.  The above code is littled hacked up from the number of iterations of
|> trying to get this to work.  One test, I got the message windows to display the
|> text, exited from the program, and restarted it, and this time the text did NOT
|> appear so I know it's not from code-fiddling.
|> 
|> What gives on the apparent inconsistency in displaying the text?
|> 
|> Thanks much in advance,
|>   Norm.
|> -- 
|> +-----------------------------------------------------------------------+
|>  Norm MacNeil                     Phone: (613) 763-7497
|>  Data Systems                     Fax:   (613) 765-2854
|>  Bell-Northern Research Ltd.      EMail: norm@bnr.ca (INTERNET)
|>  #include <disclaimer.std>       "Roller bladers do it in-line!"

The inconsistency occurs because window creation and redisplay are delayed
operations.  They don't occur until the application runs out of other work
to do;  if you immediately go off to do something else after creating the
window, the application doesn't run out of work to do so the window doesn't
appears on the screen.  Putting an "update" after you've created the window
will help, but even that isn't enough, since that will only *initiate* the
process of creating the window.  The window redisplay is also delayed, so
it might not complete before the update runs out of things to do (there's
a round-trip to the server and/or window manager involved, so the application
may think it's caught up before the window manager has actually mapped the
window).

The bottom line is that you have to explicitly wait until you *know* that
the window has been displayed.  The way to do this is with the tkwait command.
Set up a binding for <Expose> on the window you want to see, with the
binding set to modify a particular variable.  Then use tkwait to wait for
the variable to change to the given value.  Once you know the window's up,
then you can go off and do your other work.  Be sure to do one more update
so that the window gets displayed, and also be sure to remove the binding
when you're done.  Sorry this is so complicated... there should probably
be a procedure in the Tk script library to do this automatically.
From: mharriso@digi.lonestar.org (Mark Harrison)
Newsgroups: comp.lang.tcl
Subject: Re: Is there a C++ interface to tcl?
Date: 14 Dec 92 15:13:49 GMT
Organization: DSC Communications Corp, Plano, TX

In article <1992Dec10.184740.5628@leland.Stanford.EDU>
denisb@leland.Stanford.EDU (Denis Bohm) writes:

>Is there a C++ interface to tcl?  Maybe just a set of wrapper classes?

We were able to do it with these changes:

In main.c, put an 'extern "C"' wrapper around the tk header files:

extern "C" {
#include "tkConfig.h"
#include "tkInt.h"
}

and in tkConfig.h, comment out the select() declaration. (This is on
SunOS, where it seems to conflict with some system declaration.)

#if 0
extern int              select _ANSI_ARGS_((int nfds, int *readfds,
                            int *writefds, int *exceptfds,
                            struct timeval *timeout));
#endif

-- 
Mark Harrison, mharriso@dsccc.com
Newsgroups: comp.lang.tcl
From: tdoan@bnr.ca (Tuan Doan)
Subject: Accessing Widget class?
Keywords: TCL/TK,class,widget,configure,button
Organization: Bell-Northern Research, Richardson, Tx.
Date: Sat, 19 Dec 1992 03:57:42 GMT

Hello,

   I was wondering if there is a way to access widget on the class level    
instead on the individual level.  For example, I would like to set all of
the buttons' borderwidth to a certain value without manually setting it one
by one.  The man pages mention class name for various options/attributes but
I could not find any info on widget class name.

Thanks,

 __  __/  /   /   __  /    |   /    Tuan T. Doan
    /    /   /   /   /   / |  /     Advance Signalling Design
   /    /   /   __  /   /  | /      2201 Lakeside Blvd.  P.O. Box 833871
__/  ______/ __/ __/ __/  __/       Richardson, TX 75083-3871
                                    Phone: 6-444-4575/214-684-4575
Internet:  tdoan@bnr.ca             Fax:   6-444-3716/214-684-3716
      or   tdoan@x400gate.bnr.ca    
Newsgroups: comp.lang.tcl
From: trones@dxcern.cern.ch (Jostein Lodve Trones)
Subject: Re: Changing a menuitem while selected
Reply-To: trones@dxcern.cern.ch (Jostein Lodve Trones)
Organization: CERN, European Laboratory for Particle Physics, Geneva
Date: Fri, 18 Dec 1992 09:51:35 GMT



Sorry, folks! Seems like I hit the target with my second question in my
earlier posting. I finally found a way to work around it, so that I do not
have to change the command bound to the menuitem-selection-event while I
am executing the command currently bound to that event. (What a sentence!)

And I have not yet got an error, after several tests, so I think that is it.

So, do not change the command bound to an event while executing the command
currantly bound to the same event!

But I guess most of you already knew that...


Cheers,
	Jostein
From: ouster@sprite.Berkeley.EDU (John Ousterhout)
Newsgroups: comp.lang.tcl
Subject: Re: CAPS LOCK
Date: 16 Dec 1992 16:24:10 GMT
Organization: U.C. Berkeley Sprite Project
Distribution: world
NNTP-Posting-Host: tyranny.berkeley.edu
Keywords: keysyms, CAPS LOCK

In article <2060@tfd.tfd.com>, bret@tfd.COM (Bret Weinraub) writes:
|> My users are complaining to me:
|> 
|> Blah blah blah this TK Application doesn't work when CAPS LOCK has been
|> hit.
|> 
|> I've tried the following:
|> 1.  Tell customer to turn off CAPS LOCK when using application.
|> 2.  After they continued to complain, tried to add a <Lock-???> bind
|>     for every existing bind call.
|> 3.  Realized that I would need all the default bindings to be simulated
|>     with bind <Lock-whatever> calls.  Since #2 didn't work for mouse-clicking,
|>     this wouldn't work.
|> 4.  Started hacking up the tk code.  After ensuing headache, decided 
|>     to punt, risk flames, and post problem to comp.lang.tcl.  What can it 
|>     hurt?
|>     
|> Any suggestions? (platform is a SUN SPARC 2 running 4.1.1.)
|> 
|> bret@tfd.com

One of the things I've done for Tk 3.0 is to overhaul the binding code
to handle CAPS LOCK correctly and also to handle Mode_switch for people
using international character sets.  Sorry for the problems you've been
having.... please let me know if there are still problems with the 3.0
release.  By the way, barring a major catastrophe, 3.0 will be released
by the end of this week.
From: scot@calusa.eel.ufl.edu (Scott Miller)
Newsgroups: comp.lang.tcl
Subject: canvas, entry and fork questions
Date: 16 Dec 92 18:10:34 GMT
Reply-To: scot@eel.ee.ufl.edu
Organization: UF EE Department (Graduate Student)


Hello,

First I would like to say that I am very impressed with
tcl/tk. I am currently working on a interface builder for
canvases. I have run into a few problems.

Scott Miller


Question #1  

When a line has an arrow and I save the canvas, after I
load the canvas the line is not the same size. It has been
decreased by the size of the arrow. Why?


Question #2

I would like to resize the checkbutton. I am able to resize
the button using -width and -height but I cannot resize the
on/off square. Currently I just use an blank bitmap to resize
the square. 

Question #3

I have a entry box for text and a listbox for font on the same
frame. When someone selects a font I configure the entry box to the new font. 
When this occurs the whole frame is resized, since the entry box is
resized to accomidate the new font. It appears the entry box sizes
to whatever font is place in it. I would like to make a large entry
box and not have it reconfigured for each font. Is this possible?


Question #4

We would like to fork off a tcl process within a tcl script.
Newsgroups: comp.lang.tcl