aboutsummaryrefslogtreecommitdiff
path: root/kiosk-plugin.tcl
diff options
context:
space:
mode:
authorIOhannes m zmölnig <zmoelnig@users.sourceforge.net>2011-03-01 09:58:24 +0000
committerIOhannes m zmölnig <zmoelnig@users.sourceforge.net>2011-03-01 09:58:24 +0000
commit00c838a42a27458e2b70f8d40658f49bcc2a3e43 (patch)
tree8479713de706ff4a5ca79c3b6b9e6f3d6d379b40 /kiosk-plugin.tcl
parentaa13f6c9443a2449b53c4a9b3808aea247119a3b (diff)
search cfg-file in currect_plugin_loadpath
svn path=/trunk/scripts/guiplugins/kiosk-plugin/; revision=14986
Diffstat (limited to 'kiosk-plugin.tcl')
-rw-r--r--kiosk-plugin.tcl8
1 files changed, 7 insertions, 1 deletions
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]