Changeset 3791

Show
Ignore:
Timestamp:
08/04/06 18:19:34 (8 years ago)
Author:
ucacsva
Message:

Removed unneeded debug messages.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • vic/trunk/tcl/cf-tm.tcl

    r3776 r3791  
    3939proc tm_bootstrap {} { 
    4040        global tm411 tm422 
    41         debug "******************* DEBUG tm_bootstrap: entering ************************" 
    4241        if ![info exists tm411] { 
    4342                set tm411 [new module compositor/411] 
    4443                set tm422 [new module compositor/422] 
    45                 debug "DEBUG tm_bootstrap: in !\"info exists tm411\"" 
    4644        } 
    47         debug "******************* DEBUG tm_bootstrap: leaving ************************\n" 
    4845} 
    4946 
     
    7168proc tm_enable {} { 
    7269        global tmEnable V 
    73         debug "********************* DEBUG tm_enable: entering tm_enable ************************" 
    7470 
    7571        if [info exists tmEnable] { 
    76                 debug "DEBUG tm_enable: in \"info exists tmEnable\"" 
    7772                return 
    7873        } 
     
    8075        if [have grabber] { 
    8176                tm_init $V(grabber) $V(encoder) 
    82                 debug "DEBUG tm_enable: in \"have grabber\"" 
    8377        } 
    84         debug "********************* DEBUG tm_enable: leaving tm_enable *************************\n" 
    8578} 
    8679 
    8780proc tm_disable {} { 
    8881        global tmEnable V 
    89  
    90         debug "****************** DEBUG tm_disable: entering tm_disable ************************" 
    9182 
    9283        catch "unset tmEnable" 
     
    9687                # intervening modules 
    9788                $V(grabber) target $V(encoder) 
    98                 debug "DEBUG tm_disable: in \"have grabber\"" 
    9989        } 
    100         debug "****************** DEBUG tm_disable: leaving tm_disable ************************\n" 
    10190} 
    10291 
    10392proc tm_check id { 
    10493        global tm_obj 
    105         debug "****************** DEBUG tm_check: into \"info exists tm_obj()\" *************\n" 
    10694        return [info exists tm_obj($id)] 
    10795} 
     
    10997proc tm_create { id file width height } { 
    11098puts create/$id/$file/$width/$height 
    111  
    112         debug "****************** DEBUG tm_create: entering tm_create ************************" 
    11399 
    114100        global tm_obj 
     
    120106        $tm_obj($id) load $file $width $height 
    121107        tm_bootstrap 
    122          
    123         debug "****************** DEBUG tm_create: leaving tm_create ************************\n" 
    124  
    125108} 
    126109