/usr/share/tcltk/tklib0.6/wcb/wcb.tcl is in tklib 0.6-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 | #==============================================================================
# Main Wcb package module.
#
# Copyright (c) 1999-2011 Csaba Nemethi (E-mail: csaba.nemethi@t-online.de)
#==============================================================================
package require Tcl 8
package require Tk 8
namespace eval wcb {
#
# Public variables:
#
variable version 3.4
variable library
if {$tcl_version >= 8.4} {
set library [file dirname [file normalize [info script]]]
} else {
set library [file dirname [info script]] ;# no "file normalize" yet
}
#
# Basic procedures:
#
namespace export callback cbappend cbprepend cancel canceled \
extend replace pathname
#
# Utility procedures for Tk entry, tile entry,
# BWidget Entry, spinbox, and tile combobox widgets:
#
namespace export changeEntryText postInsertEntryLen \
postInsertEntryText postDeleteEntryText
#
# Simple before-insert callback routines for Tk entry, tile
# entry, BWidget Entry, spinbox, and tile combobox widgets:
#
namespace export checkStrForRegExp checkStrForAlpha checkStrForNum \
checkStrForAlnum convStrToUpper convStrToLower
#
# Further before-insert callback routines for Tk entry, tile
# entry, BWidget Entry, spinbox, and tile combobox widgets:
#
namespace export checkEntryForInt checkEntryForUInt \
checkEntryForReal checkEntryForFixed \
checkEntryLen
#
# Simple before-insert callback routines for text widgets:
#
namespace export checkStrsForRegExp checkStrsForAlpha checkStrsForNum \
checkStrsForAlnum convStrsToUpper convStrsToLower
}
package provide wcb $wcb::version
package provide Wcb $wcb::version
lappend auto_path [file join $wcb::library scripts]
|