Ignore:
Timestamp:
Oct 23, 2009, 8:58:55 PM (11 years ago)
Author:
jmr@…
Message:

new mportlistall proc, various slight efficiency improvements

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/portmgr/packaging/dpkgall.tcl

    r51780 r59836  
    348348        # If no portlist file was specified, create a portlist that includes all ports
    349349        if {[llength $portlist] == 0 || "$buildall_flag" == "true"} {
    350                 set res [mportsearch {.*}]
     350                set res [mportlistall]
    351351                foreach {name array} $res {
    352352                        lappend portlist $name
     
    758758proc get_portinfo {port} {
    759759        set searchstring [regex_escape_portname $port]
    760         set res [mportsearch "^${searchstring}\$"]
     760        set res [mportlookup ${searchstring}]
    761761
    762762        if {[llength $res] < 2} {
Note: See TracChangeset for help on using the changeset viewer.