diff options
Diffstat (limited to 'tclcompat.tcl')
| -rw-r--r-- | tclcompat.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tclcompat.tcl b/tclcompat.tcl index 8e5b128..d0a0201 100644 --- a/tclcompat.tcl +++ b/tclcompat.tcl @@ -104,7 +104,7 @@ proc fileevent {args} { # Second, option argument is a glob pattern # Third, optional argument is a "putter" function -# +# proc parray {arrayname {pattern *} {puts puts}} { upvar $arrayname a |