Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re^2: PicWoodPecker -- a Tk program to choose and modify your photos

by Discipulus (Canon)
on Dec 01, 2016 at 09:15 UTC ( [id://1177027]=note: print w/replies, xml ) Need Help??


in reply to Re: PicWoodPecker -- a Tk program to choose and modify your photos
in thread picwoodpecker -- a Tk program to choose and modify your photos

Hello kcott,

first of all thanks for the feedback! Having someone else spending his time looking at my code is something make me happy.

There are three issues:

1-the population of pic list

2-the bad event type or keysym "?" at..

3-the ERROR creating a thumbnail for file one

About the second i need to investigate a bit, because i do not understand it. The application has a binding to the ? key to popup a new mainwindow with the rendered POD. It also has some special unbinding for key ? for all Entry widgets.

This issue possibly resolve itself changing in the code all <KeyRelease-?> declaration into <KeyRelease-question> ones.

About the first issue you pose it is related to the list population: maybe i've badly explained in the documentation.

By default the app search the current directory for jpeg files: ie it globs ./*.jpg and build the list. If no image are found it complains about in the console.

perl c:\SCRIPTS\resized\picwoodpecker-v10.10.pl -s c:/scripts/resized/ +user -debug build_list received [c:/scripts/resized/user] DIR found: [c:/scripts/resized/user] will be converted to [c:/scripts/ +resized/user/*.jpg] No file to process

If so you can select a new directory to search using the GUI: the button browse to choose the dir and new list one to populate it. Or you could simply write the dir or the glob expression into the source entry.

In the docs i put the phrase: Note the that the browse does not fill the list; you need to use new list or add to list after using it.

The app is already able to process png files: you must tell it using the source/glob expression:

perl c:\SCRIPTS\resized\picwoodpecker-v10.10.pl -s c:/scripts/*.png -d +ebug build_list received [c:/scripts/*.png] Please wait while processing 6 files.... adding c:/scripts/colorRamp.png adding c:/scripts/Mandelbrot_Love_by_sya.png adding c:/scripts/out.png adding c:/scripts/test.png adding c:/scripts/testHEX.png adding c:/scripts/testHEX2.png

Finally the thumbnail errors: the application search for and embedded thumbnail that usually is present in jpg photos but not in other files formats. If the embedded thumb is not present the program emit the error (maybe is better a warning?) and creates an empty one ie a black one using GD.

Perhaps the best behaviour is search for an embedded thumb and make it up a new one if not found. I'll put the program on github and I'll try to add suche feature.

thanks again

L*

There are no rules, there are no thumbs..
Reinvent the wheel, then learn The Wheel; may be one day you reinvent one of THE WHEELS.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1177027]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others imbibing at the Monastery: (6)
As of 2024-04-23 21:35 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found