/[ascend]/trunk/tcltk98/TK/ascend.tcl
ViewVC logotype

Diff of /trunk/tcltk98/TK/ascend.tcl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 10 by aw0a, Sat Nov 13 16:40:11 2004 UTC revision 89 by johnpye, Wed Dec 7 15:44:43 2005 UTC
# Line 216  puts "tk sourced" Line 216  puts "tk sourced"
216  # The plot window and the solver window require the  # The plot window and the solver window require the
217  # TkTable exension package by Roland King  # TkTable exension package by Roland King
218  # mthomas 98.05.07: require 1.8 until we debug the memory errors in 2.0  # mthomas 98.05.07: require 1.8 until we debug the memory errors in 2.0
219  if {[catch {package require Tktable } err]} {  if {[catch {package require Tktable 2.8} err]} {
220    # print a message to stderr since a catch further up the call stack    # print a message to stderr since a catch further up the call stack
221    # eats the call to "error"    # eats the call to "error"
222    puts stderr "ASCEND cannot locate the tkTable package."    puts stderr "ASCEND cannot locate the tkTable package."
223    puts stderr "internal message: $err"    puts stderr "internal message: $err"
224      puts stderr "tck_pkgPath: $tcl_pkgPath"
225      puts stderr "auto_path: $auto_path"
226    error "ASCEND cannot locate the tkTable package.\ninternal message: $err"    error "ASCEND cannot locate the tkTable package.\ninternal message: $err"
227  }  }
228    

Legend:
Removed from v.10  
changed lines
  Added in v.89

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22