Changeset 29501 for trunk/base


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

Revert r29499, didn't realize it was a custom ui_channels

File:
1 edited

Legend:

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

    r29499 r29501  
    9494}
    9595
     96
     97# UI instantiation to route information/error messages wherever we want.
     98proc 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
    96132# Check if there are any stray sibling jobs before moving on, bail in such case.
    97133if {[file exists $lockfile]} {
Note: See TracChangeset for help on using the changeset viewer.