18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
|
# addBalloon .l .b "My help text"
# addBalloon .f -fmt {
# Write help more freely.\n
# New lines need to be explicit like above.
# }
#----------------------------------------------------------------------
package provide psballoon 1.2
namespace eval psballoon {
variable balloon
variable config
set config(-useframe) 0
set balloon(W) ""
|
|
|
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
|
# addBalloon .l .b "My help text"
# addBalloon .f -fmt {
# Write help more freely.\n
# New lines need to be explicit like above.
# }
#----------------------------------------------------------------------
package provide psballoon 1.3
namespace eval psballoon {
variable balloon
variable config
set config(-useframe) 0
set balloon(W) ""
|