Ignore:
Timestamp:
Sep 26, 2002, 9:36:32 AM (16 years ago)
Author:
landonf
Message:

Give useful data

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/src/port1.0/portutil.tcl

    r802 r804  
    5959                     set ${option} \$args \n\
    6060                         if \{\[info commands options::${option}\] != \"\"\} \{ \n\
    61                              options::${option} ${option} \n\
     61                             options::${option} set \n\
    6262                         \} \n\
    6363                \} \n\
     
    7171                    \} \n\
    7272                    if \{\[info commands options::${option}\] != \"\"\} \{ \n\
    73                         options::${option} ${option} \n\
     73                        options::${option} delete \n\
    7474                    \} \n\
    7575                \} \n\
     
    8080                    set $option \[concat \$$option \$args\] \n\
    8181                        if \{\[info commands options::${option}\] != \"\"\} \{ \n\
    82                             options::${option} ${option} \n\
     82                            options::${option} append \n\
    8383                        \} \n\
    8484                \} \n\
Note: See TracChangeset for help on using the changeset viewer.