Artifact 3777686aec99c27ac8feb312c4736b8b347f1660:
- Executable file examples/ask-yn — part of check-in [1eeef53431] at 2014-05-23 21:51:43 on branch trunk — cmdr::ask - Fixed a syntax problem. Fixed scope issue (string command). Tweaked the prompt setup. Plus example apps (also for interactive testing). (user: andreask size: 159)
#!/usr/bin/env tclsh
# -*- tcl -*-
package require Tcl 8.5
package require cmdr::ask
puts [cmdr ask yn {Is this ok ?}]
puts [cmdr ask yn {Really ?} no]
exit
