You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
84 lines
2.2 KiB
84 lines
2.2 KiB
# -*- tcl -*- |
|
# Maintenance Instruction: leave the 999999.xxx.x as is and use 'pmix make' or src/make.tcl to update from <pkg>-buildversion.txt |
|
# |
|
# Please consider using a BSD or MIT style license for greatest compatibility with the Tcl ecosystem. |
|
# Code using preferred Tcl licenses can be eligible for inclusion in Tcllib, Tklib and the punk package repository. |
|
# ++ +++ +++ +++ +++ +++ +++ +++ +++ +++ +++ |
|
# (C) 2023 |
|
# |
|
# @@ Meta Begin |
|
# Application punk::mix::templates 999999.0a1.0 |
|
# Meta platform tcl |
|
# Meta license BSD |
|
# @@ Meta End |
|
|
|
|
|
|
|
# ++ +++ +++ +++ +++ +++ +++ +++ +++ +++ +++ |
|
## Requirements |
|
##e.g package require frobz |
|
package require punk::cap |
|
|
|
|
|
|
|
# ++ +++ +++ +++ +++ +++ +++ +++ +++ +++ +++ |
|
namespace eval punk::mix::templates { |
|
variable pkg punk::mix::templates |
|
variable cap_provider |
|
|
|
#punk::cap::register_package punk::mix::templates [list\ |
|
# {punk.templates {relpath ../templates}}\ |
|
#] |
|
|
|
namespace eval capsystem { |
|
if {[info commands capprovider.registration] eq ""} { |
|
punk::cap::class::interface_capprovider.registration create capprovider.registration |
|
oo::objdefine capprovider.registration { |
|
method get_declarations {} { |
|
set decls [list] |
|
lappend decls [list punk.templates {relpath ../templates}] |
|
lappend decls [list punk.templates {relpath ../templates2}] |
|
lappend decls [list punk.test {something blah}] |
|
return $decls |
|
} |
|
} |
|
} |
|
} |
|
|
|
if {[info commands provider] eq ""} { |
|
punk::cap::class::interface_capprovider.provider create provider punk::mix::templates |
|
oo::objdefine provider { |
|
method register {{capabilityname_glob *}} { |
|
#puts registering punk::mix::templates $capabilityname |
|
next |
|
} |
|
method capabilities {} { |
|
next |
|
} |
|
} |
|
} |
|
|
|
# -- --- |
|
#provider api |
|
# -- --- |
|
#none - declarations only |
|
} |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
# ++ +++ +++ +++ +++ +++ +++ +++ +++ +++ +++ |
|
## Ready |
|
package provide punk::mix::templates [namespace eval punk::mix::templates { |
|
variable version |
|
set version 999999.0a1.0 |
|
}] |
|
return |