Skip to content

Commit c618ba6

Browse files
author
Poor Yorick
committed
Add tcl::oo for Tcl 9.
1 parent 5629114 commit c618ba6

File tree

3 files changed

+9
-3
lines changed

3 files changed

+9
-3
lines changed

modules/virtchannel_base/string.tcl

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -26,7 +26,9 @@
2626
# # ## ### ##### ######## #############
2727

2828
package require Tcl 8.5 9
29-
package require TclOO
29+
if {[catch {package require tcl::oo}]} {
30+
package require TclOO
31+
}
3032
package require tcl::chan::events
3133

3234
# # ## ### ##### ######## #############

modules/virtchannel_core/core.tcl

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -22,7 +22,9 @@
2222
# # ## ### ##### ######## #############
2323

2424
package require Tcl 8.5 9
25-
package require TclOO
25+
if {[catch {package require tcl::oo}]} {
26+
package require TclOO
27+
}
2628

2729
# # ## ### ##### ######## #############
2830

modules/virtchannel_core/events.tcl

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -27,7 +27,9 @@
2727
# # ## ### ##### ######## #############
2828

2929
package require Tcl 8.5 9
30-
package require TclOO
30+
if {[catch {package require tcl::oo}]} {
31+
package require TclOO
32+
}
3133
package require tcl::chan::core
3234

3335
# # ## ### ##### ######## #############

0 commit comments

Comments
 (0)