Running vtcl on tcl7.6/tk4.2 on HPUX   10.20  I get the following.

When I try to save a  file, it saves part of the file and then says,
 Can't read "output" no such variable. .

Stake trace follows.

I can send the file if you like. 
   
Bob

_________________________________________________
Bob Fletcher,                     
GEAE Analysis Systems             
[EMAIL PROTECTED]




can't read "output": no such variable
    while executing
"return "$output..."
    invoked from within
"if {[info procs $proc_base] != ""} {
            set proc_args [info args $proc_base]
            set proc_body [info body $proc_base]
            ret ..."
    invoked from within
"if ![winfo exists $target] {
        if {[info procs $proc_base] != ""} {
            set proc_args [info args $proc_base]
            set proc_body [ ..."
    (procedure "vTcl:dump_top" line 11)
    invoked from within
"vTcl:dump_top $i"
    invoked from within
"append output [vTcl:dump_top $i]..."
    ("foreach" body line 2)
    invoked from within
"foreach i $tops {
        append output [vTcl:dump_top $i]
    }"
    (procedure "vTcl:save_tree" line 11)
    invoked from within
"vTcl:save_tree ."
    invoked from within
"puts $output [vTcl:save_tree .]..."
    invoked from within
"if {$vTcl(save) == "all"} {
        puts $output $vTcl(head,vars)
        puts $output [vTcl:save_vars]
        set body [string trim [info body init] ..."
    (procedure "vTcl:save2" line 19)
    invoked from within
"vTcl:save2 $file"
    (procedure "vTcl:save_as" line 6)
    invoked from within
"vTcl:save_as"
    invoked from within
".vTcl.menu.f.m invoke active"
    ("uplevel" body line 1)
    invoked from within
"uplevel #0 [list $w invoke active]"
    invoked from within
"if {[$w type active] == "cascade"} {
        $w postcascade active
        set menu [$w entrycget active -menu]
        tkMenuFirstEntry $menu
    } elseif {[$w type activ ..."
    (procedure "tkMenuInvoke" line 14)
    invoked from within
"tkMenuInvoke .vTcl.menu.f.m 1"
    (command bound to event)

Reply via email to