Posted to tcl by colin at Sun Feb 17 21:53:16 GMT 2013view pretty

*** yeti-0.4.1/ylex.tcl	2004-07-06 09:46:49.000000000 +1000
--- yeti/ylex.tcl	2013-02-18 08:38:01.019084469 +1100
***************
*** 18,34 ****
  # Can work with Itcl 3.0 or Tcl++ 2.3. We prefer the former, but don't
  # complain if the latter is already available.
  #
! 
! if {[catch {package present tcl++ 2.3}]} {
!     if {[catch {package require Itcl 3.0}]} {
! 	if {[catch {package require tcl++ 2.3}]} {
! 	    error "Oops in YETI initialization: neither \[incr Tcl\] nor tcl++ available"
! 	}
!     } else {
! 	namespace import -force itcl::*
!     }
! }
! 
  package provide ylex 0.4
  
  #
--- 18,24 ----
  # Can work with Itcl 3.0 or Tcl++ 2.3. We prefer the former, but don't
  # complain if the latter is already available.
  #
! package require itcl
  package provide ylex 0.4
  
  #
***************
*** 38,43 ****
--- 28,34 ----
  #
  
  namespace eval yeti {
+     namespace import -force ::itcl::*
  
      class ylex {
  	#