Diskussion:KNotify

Wer auf (k)notify verzichten möchte, dem könnte als Ausgangspunkt folgendes kleine tcl-Script dienen, das ich benutze mich beim Eintreffen neuer Emails benachrichtigen zu lassen:

#!/bin/sh
#\
exec wish "$0"

set FLAGFILE {/tmp/new_mail.flag~}

if [file exists $FLAGFILE] {
    exit 1
}

set fh [open $FLAGFILE {CREAT WRONLY}]
close $fh

button .new_mail\
    -fg white \
    -bg green \
    -width 12 \
    -height 3 \
    -font "Helvetica 16 " \
    -text "There's new mail!" \
    -command {file delete -force -- $FLAGFILE; exit} 
pack .new_mail

Da mir der schlichte Hinweis "Irgendetwas ist passiert..." reicht, habe ich mich um eine Parameter-Übergabe wie bei der notify-Lösung nicht weiter gekümmert. Das Anlegen der temporären Datei dient nur dazu, nicht mehr als ein Benachrichtigungsfenster zuzulassen.

Mach doch eine "richtige" Parameterübergabe und einen eigenen Artikel raus, find das gut :) - Bodo 07:10, 8. Feb 2006 (CET)

nagut, mach ich - ich brauchte lediglich noch die vom browser ausgegebenen infos ausser {title} - zumindest startzeit & sender wären sinnig. und da ich naturfaul bin: hinweise am besten an rff@gegendrucker.de (rené, 16/02/06)

hier wäre denn die version, die aktuell bei mir läuft:

#!/bin/sh
#\
exec wish "$0" "$@"

#this is just a little frontend to tv-browser-reminder plugin
#using tcl/tk 8.4.7-3
#it displays some information top-level on the active virtual screen
#it is called with parameters
#{leadingZero(start_hour, "2")} {leadingZero(start_minute, "2")} {clean(channel_name)} {title}
#from the plugin|reminder|configuration-section
#there may be problems with special charcters within the {titel}-parameter
#i didn't find out yet
#
#rené.f.franke - 02/2006 - rff@gegendrucker.de

set progStartHour [lindex $argv 0]
set progStartMinute [lindex $argv 1]
#the next lines assume the channel-parameter to be given WITHOUT whitespaces
set progChannel [lindex $argv 2]
set progTitle [lrange $argv 3 end]

wm title . "TV Browser Reminder"

button .closeWindow\
   -fg black \
   -bg red \
   -width 22\
   -height 1\
   -font "Helvetica 13"\
   -text "Coming up next:"\
   -command {exit}
pack .closeWindow -fill x -expand yes

label .progTime\
    -font "Helvetica 13"\
    -text "$progStartHour : $progStartMinute"     
pack .progTime

label .progTitle\
     -font "Helvetica 15"\
     -text "$progTitle"
pack .progTitle

label .progChannel\
   -font "Helvetica 13"\
   -text "$progChannel"
pack .progChannel

in der hoffnung, dass es irgend jemandem hilft,

rené