====== What: tclxosd Where: http://sourceforge.net/projects/tclxosd/ http://www.ignavus.net/software.html Description: Tcl bindings for libxosd (On Screen Display) Updated: 12/2008 Contact: See in tclxosd package ====== ---- [AMG]: I like the configure script. ;^) It starts out as a shell script then transforms into a Tcl script. Here's an excerpt: ====== #!/bin/sh # \ TCL_NAME=tclsh;\ FIND_PATH=`echo -n $PATH | sed 's|:| |g' | tail -n 1`; \ TCL_SHELL=`find $FIND_PATH -name $TCL_NAME -ignore_readdir_race` #\ echo -n "checking for tclsh... " # ... *snip* ...\ # give control to tclsh\ exec tclsh "$0" "$@" puts -nonewline "cheking for libdl... " ====== [kdl]: This is my first extension for tcl, so not be very strict. Configure script liked me too :), but it is not versatile, I think. Any suggestions are wellcome. I have a question about interface - in version 0.1 of tclxosd we has: ====== set osd [xosd::create] xosd::display $osd 0 XOSD_string {text to display} ====== Would it better to make "osd-command" (as in [image]) ?: ====== xosd::create osd1 $osd1 set_align XOSD_left $osd1 display 0 XOSD_string {text to display} ====== ---- !!!!!! %| [Category Desktop] |% !!!!!!