|
|
|
@ -62,7 +62,7 @@ package require Tcl 8.6- |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
tcl::namespace::eval punk::libunknown { |
|
|
|
tcl::namespace::eval ::punk::libunknown { |
|
|
|
# ++ +++ +++ +++ +++ +++ +++ +++ +++ +++ +++ |
|
|
|
# ++ +++ +++ +++ +++ +++ +++ +++ +++ +++ +++ |
|
|
|
# Base namespace |
|
|
|
# Base namespace |
|
|
|
# ++ +++ +++ +++ +++ +++ +++ +++ +++ +++ +++ |
|
|
|
# ++ +++ +++ +++ +++ +++ +++ +++ +++ +++ +++ |
|
|
|
@ -1576,7 +1576,7 @@ tcl::namespace::eval punk::libunknown { |
|
|
|
} |
|
|
|
} |
|
|
|
# == === === === === === === === === === === === === === === |
|
|
|
# == === === === === === === === === === === === === === === |
|
|
|
|
|
|
|
|
|
|
|
namespace eval punk::libunknown { |
|
|
|
namespace eval ::punk::libunknown { |
|
|
|
#for 8.6 compat |
|
|
|
#for 8.6 compat |
|
|
|
if {"::ledit" ni [info commands ::ledit]} { |
|
|
|
if {"::ledit" ni [info commands ::ledit]} { |
|
|
|
#maint: taken from punk::lib |
|
|
|
#maint: taken from punk::lib |
|
|
|
@ -1702,7 +1702,7 @@ namespace eval punk::libunknown { |
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|
tcl::namespace::eval punk::libunknown::lib { |
|
|
|
tcl::namespace::eval ::punk::libunknown::lib { |
|
|
|
|
|
|
|
|
|
|
|
#A version of textutil::string::longestCommonPrefixList |
|
|
|
#A version of textutil::string::longestCommonPrefixList |
|
|
|
#(also as ::punk::lib::longestCommonPrefixList) |
|
|
|
#(also as ::punk::lib::longestCommonPrefixList) |
|
|
|
@ -1788,7 +1788,7 @@ namespace eval ::punk::args::register { |
|
|
|
|
|
|
|
|
|
|
|
# ++ +++ +++ +++ +++ +++ +++ +++ +++ +++ +++ |
|
|
|
# ++ +++ +++ +++ +++ +++ +++ +++ +++ +++ +++ |
|
|
|
## Ready |
|
|
|
## Ready |
|
|
|
package provide punk::libunknown [tcl::namespace::eval punk::libunknown { |
|
|
|
package provide punk::libunknown [tcl::namespace::eval ::punk::libunknown { |
|
|
|
variable pkg punk::libunknown |
|
|
|
variable pkg punk::libunknown |
|
|
|
variable version |
|
|
|
variable version |
|
|
|
set version 0.1 |
|
|
|
set version 0.1 |
|
|
|
|