gentoo-mirror/gentoo
1
0
Fork 0
mirror of https://github.com/gentoo-mirror/gentoo.git synced 2026-09-24 04:59:14 -07:00
Code Issues Projects Releases Wiki Activity

dev-tcltk/tcllib: remove unused patch

Browse Source
This commit is contained in:
Michael Mair-Keimberger (asterix)
2016-09-29 18:50:55 +02:00
committed by Amy Winston
parent 0839dedf4f
commit 7b09fed3fa
1 changed files with 0 additions and 39 deletions
Download Patch File Download Diff File Expand all files Collapse all files

39
dev-tcltk/tcllib/files/tcllib-1.14-test.patch
View File

@@ -1,39 +0,0 @@
Index: support/devel/sak/validate/syntax.tcl
==================================================================
--- support/devel/sak/validate/syntax.tcl
+++ support/devel/sak/validate/syntax.tcl
@@ -192,11 +192,13 @@
if {[string equal $c rename]} continue
if {[string equal $c namespace]} continue
interp eval $ip [list ::rename $c {}]
}
- interp eval $ip [list ::namespace delete ::tcl]
+ if {![package vsatisfies [package present Tcl] 8.6]} {
+ interp eval $ip [list ::namespace delete ::tcl]
+ }
interp eval $ip [list ::rename namespace {}]
interp eval $ip [list ::rename rename {}]
foreach m {
pcx::register unknown
Index: support/devel/sak/validate/testsuites.tcl
==================================================================
--- support/devel/sak/validate/testsuites.tcl
+++ support/devel/sak/validate/testsuites.tcl
@@ -137,11 +137,13 @@
if {[string equal $c rename]} continue
if {[string equal $c namespace]} continue
interp eval $ip [list ::rename $c {}]
}
- interp eval $ip [list ::namespace delete ::tcl]
+ if {![package vsatisfies [package present Tcl] 8.6]} {
+ interp eval $ip [list ::namespace delete ::tcl]
+ }
interp eval $ip [list ::rename namespace {}]
interp eval $ip [list ::rename rename {}]
foreach m {
testing unknown useLocal useLocalKeep useAccel