in reply to A Drag and Drop (perl/Tk) question.

Unfortunately I cannot run your script to debug it as I do not have all the required modules installed. Also I cannot profess to have a great deal of knowledge in this area. However IMHO I cannot see how this sub actually adds anything. 
sub AddGroupToDir{
    my ($group,$dir)=@_;}

[download]
I wish I knew enough to suggest a fix 
<A HREF="/index.pl?lastnode_id=1072&node_id=24885">Ay_Bee</A>
-_-_-_-_-_-_-_-_-_-_-_-
My memory concerns me
- but I forget why !!!

[download]

Replies are listed 'Best First'.
Re: Re: A Drag and Drop (perl/Tk) question.
by blackadder (Hermit) on Jul 29, 2002 at 14:02 UTC
    The AddGroupToDir is not the issue , my problem is the drag and drop action (the subs Drop and DragStart).
    Initially, I was helped by a monk called .dave. and I assumed that the help from him will continue so I committed my self to this script at work and I can't get out of it now, unless I change my job. Unfortunately, the monk ‘.dave.’ who helped me in the beginning did not get back to me at all, and I am stuck BIG TIME. If I know that I was going to get abandoned as the script develops, I wouldn't have pursued this option, now it’s too late to revert back to where ever I was.
    OHHH What a predicament.
[reply]

In Section Seekers of Perl Wisdom