11 lines
350 B
11 lines
350 B
package require punk::ansi |
|
namespace eval colourtest { |
|
namespace import ::punk::ansi::* |
|
puts stdout "[a+ red bold]red bold on stdout[a]" |
|
puts stderr "[a+ red bold]red bold on stderr[a]" |
|
puts stdout "[a+ green bold]green bold on stdout[a]" |
|
puts stderr "[a+ green bold]green bold on stderr[a]" |
|
puts stdout "-done-" |
|
} |
|
return 1 |
|
|
|
|