From 00c838a42a27458e2b70f8d40658f49bcc2a3e43 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?IOhannes=20m=20zm=C3=B6lnig?= Date: Tue, 1 Mar 2011 09:58:24 +0000 Subject: search cfg-file in currect_plugin_loadpath svn path=/trunk/scripts/guiplugins/kiosk-plugin/; revision=14986 --- kiosk-plugin.tcl | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/kiosk-plugin.tcl b/kiosk-plugin.tcl index a47d7c6..ce3cd94 100644 --- a/kiosk-plugin.tcl +++ b/kiosk-plugin.tcl @@ -30,7 +30,13 @@ proc ::kiosk::readconfig {{fname kiosk.cfg}} { if {[file exists $fname]} { set fp [open $fname r] } else { - return False + set fname [file join $::current_plugin_loadpath $fname] + if {[file exists $fname]} { + set fp [open $fname r] + } else { + puts "kiosk.cfg not found" + return False + } } while {![eof $fp]} { set data [gets $fp] -- cgit v1.2.1