Changeset 29499 for trunk/base


Ignore:
Timestamp:
Sep 25, 2007, 9:06:43 PM (12 years ago)
Author:
eridius@…
Message:

Missed this file in r29498

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/portmgr/PortIndex2MySQL.tcl

    r29361 r29499  
    9494}
    9595
    96 
    97 # UI instantiation to route information/error messages wherever we want.
    98 proc ui_channels {priority} {
    99     global ui_options runlog_fd
    100     switch $priority {
    101         debug {
    102             if {[macports::ui_isset ui_options ports_debug]} {
    103                 return $runlog_fd
    104             } else {
    105                 return {}
    106             }
    107         }
    108         info {
    109             if {[macports::ui_isset ui_options ports_verbose]} {
    110                 return $runlog_fd
    111             } else {
    112                 return {}
    113             }
    114         }
    115         msg {
    116             if {[macports::ui_isset ui_options ports_quiet]} {
    117                 return $runlog_fd
    118             } else {
    119                 return {}
    120             }
    121         }
    122         error {
    123             return $runlog_fd
    124         }
    125         default {
    126             return {}
    127         }
    128     }
    129 }
    130 
    131 
    13296# Check if there are any stray sibling jobs before moving on, bail in such case.
    13397if {[file exists $lockfile]} {
Note: See TracChangeset for help on using the changeset viewer.