The tcl version

metroid · Post by **metroid** » Sat Mar 05, 2005 5:51 am

I want to make a 'you need tcl version 8.4 for this script to work' but i don't remember how it's done.

I made a sloppy attempt at it, but ofcourse this is useless with different tcl version

Code: Select all

if {![regexp {.*/tcl8.4|.*/tcl8.5} [info library]]} {
  putlog "ERROR: You cannot run mute.tcl without tcl version 8.4 or higher"
  } else {
  # execute script

What i'm looking for is someone to tell me how it's done properly

I remember there was something with package require, but i can't remember what exactly.

greenbear · Post by **greenbear** » Sat Mar 05, 2005 10:55 am

Maybe something like this

Code: Select all

if {![info tclversion]>="8.4"} {
  putlog "ERROR: You cannot run mute.tcl without tcl version 8.4 or higher"
  return
}

metroid · Post by **metroid** » Sat Mar 05, 2005 11:10 am

I think that was the one, Thanks