Code: Select all
alias gettext='_g'printf(gettext("My name is %s.\n"), my_name);
would become:
printf(_("My name is %s.\n"), my_name);
Sigmund, that's awesome, thank you. Does that work for width as well? If so it's exactly what I need.zigbert wrote:Hello Nathan
I haven't looked into the code, but want to mention that it is not necessary to use imagemagic or something else to resize images. gtkdialog does that internally. Maybe you have other reasons for keeping a separate buffer of all previews...
This code is taken from pMusic - how it shows the album art. Basically, it is the same as what you want.Putting the pixmap inside an eventbox, makes it clickable and it gives a fake prelight.Code: Select all
<hbox height-request="90"> <eventbox tooltip-text="'$(gettext 'Show track-info window')'" above-child="true" visible-window="true" spacing="0" space-expand="false" space-fill="false"> <pixmap> <variable>ARTWORK</variable> <input file>'$WORKDIR'/albumart.jpg</input> <height>90</height> </pixmap> <action signal="enter-notify-event">disable:ARTWORK</action> <action signal="leave-notify-event">enable:ARTWORK</action> <action signal="button-release-event">trackinfo</action> </eventbox> <hbox>
The <height> defines the resizing, while the height-request defines the widget height in the gui. I see that you don't rely on Puppy, but I find it cruelto depend on imagemagic just for a wallpaper switcher.
Sigmund
Code: Select all
ln -sf \$WP_DIR/\$WP $USERCONFIGDIR/current.pngNo need of a .pot file. MoManager creates the .pot file for any script - not for compiled binaries, of course.Nathan F wrote:I'll try and gettext this app when it's closer to a release and add a .pot file.
Code: Select all
#!/bin/sh
# Determine the path to this application.
CURDIR="`pwd`"
APPDIR=`dirname "$0"`
cd "${APPDIR}"
APPDIR="`pwd`"
cd "${CURDIR}"
IMAGE="$1"
[ "$1" = "-clear" ] && IMAGE=""
MODE="`cat $HOME/.config/wallpaper/backgroundmode`"
[ "$MODE" = "" ] && MODE="Stretch"
[ "$MODE" = "Centred" ] && MODE="Centre"
[ "$MODE" = "Scaled" ] && MODE="Scale"
rox --RPC << EOF
<?xml version="1.0"?>
<env:Envelope xmlns:env="http://www.w3.org/2001/12/soap-envelope">
<env:Body xmlns="http://rox.sourceforge.net/SOAP/ROX-Filer">
<SetBackdrop>
<Filename>$IMAGE</Filename>
<Style>$MODE</Style>
</SetBackdrop>
</env:Body>
</env:Envelope>
EOF
echo "$IMAGE" > $HOME/.config/wallpaper/bg_imgCode: Select all
'### WallPuppy: Wallpaper setter. Terry Becker SunBurnt Aug. 5 2013
INCLUDE "/root/0_BaCon/BaCon/hug.bac",INIT,DISPLAY,WINDOW,BUTTON,COMBO,IMAGE \
,HUGENTRY,FILEDIALOG,ATTACH,CALLBACK,TEXT,GRAB$
INIT
'### Exit this app.
SUB btnCLOSE
END
END SUB
'### Show wallpaper.
SUB IMG
thumb$ = "/root/.config/wallpaper/thumb.png"
SYSTEM "picscale -i " & PF$ & " -o " & thumb$ & " 400 200 9"
TEXT(img_, thumb$)
END SUB
'### Run FileDialog.
SUB btnFILER
PF$ = CHOP$(EXEC$("stdDlgs -fo"))
TEXT(txt_, PF$)
IMG
END SUB
'### Show the filer.
SUB btnAPPLY
'# PF$ = Wallpaper: /path/file
IF NOT(FILEEXISTS(PF$)) THEN EXIT SUB
' write mode to config.
SYSTEM "echo " & GRAB$(cbo_) & " > $HOME/.config/wallpaper/backgroundmode"
' set wallpaper & mode
SYSTEM "/usr/local/apps/wallpaper-setter/AppRun " & PF$
END SUB
' read image /path/file
PF$ = CHOP$(EXEC$("cat $HOME/.config/wallpaper/bg_img"))
'======================================================= Start GUI Code.
winW = 400
winH = 300
win_ = WINDOW(" WallPuppy", winW, winH)
img_ = IMAGE(PF$, winW-20, winH-90) : ATTACH(win_, img_, 10, 10)
txt_ = HUGENTRY(PF$, winW-20, 25) : ATTACH(win_, txt_, 10, winH-70)
Y = winH - 35
btnFiler_ = BUTTON("Filer", 60, 25)
ATTACH(win_, btnFiler_, 10, Y) : CALLBACK(btnFiler_, btnFILER)
cbo_ = COMBO("Stretch", 100, 25) : ATTACH(win_, cbo_, winW-250, Y)
btnApply_ = BUTTON("Apply", 60, 25)
ATTACH(win_, btnApply_, winW-140, Y) : CALLBACK(btnApply_, btnAPPLY)
btnClose_ = BUTTON("Close", 60, 25)
ATTACH(win_, btnClose_, winW-70, Y) : CALLBACK(btnClose_, btnCLOSE)
'==================== Fill the rest of the Combo Box items.
TEXT(cbo_, "Centered")
TEXT(cbo_, "Tiled")
TEXT(cbo_, "Scaled")
'=================== SUB to resize image and show in Image Box.
IMG
DISPLAYCode: Select all
pngtopnm (file) | pamscale -width=200 | pnmtopng > (outfile)Code: Select all
jpegtopnm (file) | pamscale -height=200 | pnmtojpeg > (outfile)Code: Select all
rsvg-convert (file) | pngtopnm | pamscale -width=200 | pnmtopng > (outfile)Code: Select all
picscale image resizer/converter - v.0.1b by vovchik, Puppy Linux Forum, July 2011
Input formats supported: pnm, pbm, pgm, ppm, tga, xpm, tiff, pcx, gif,
xbm, wmf, icns, bmp, png, jpg and ico.
Output formats supported: png, jpg, bmp, tiff and ico.
Input parameters: -i oldfilename -o newfilename height width quality/compression/depth
Example: picscale -i old.png -o new.png 128 128 9
Quality/compression/depth settings:
bmp (N/A): 0 - 100
jpeg (quality): 0 - 100
png (compression): 0 - 9
tiff (compression type): 1 - 8
ico (depth): 16, 24 or 32
Check out BaCon at www.basic-converter.org