Changeset 1200


Ignore:
Timestamp:
Nov 6, 2002, 12:15:40 AM (18 years ago)
Author:
torrey
Message:

Resync with changes accidentally made on lamancha.

Location:
trunk
Files:
16 added
10 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/src/port/portall.tcl

    r1165 r1200  
    3838    }
    3939    array set portinfo [dportinfo $interp]
    40     puts "Doing $target for port: $portinfo(name)"
    4140    dportexec $interp $target
    4241    dportclose $interp
  • trunk/base/src/port1.0/portbuild.tcl

    r1015 r1200  
    3737${com.apple.build} requires main fetch extract checksum patch configure
    3838${com.apple.build} deplist depends_build depends_lib
     39${com.apple.build} set prerun build_start
    3940
    4041# define options
     
    8081}
    8182
     83proc build_start {args} {
     84    global UI_PREFIX portname build.target.all
     85
     86    ui_msg "$UI_PREFIX Building $portname with target ${build.target.all}"
     87}
     88
    8289proc build_main {args} {
    8390    global portname portpath workdir prefix build.type build.cmd build.env build.target.all build.target.current UI_PREFIX worksrcdir
    8491
    85     ui_msg "$UI_PREFIX Building $portname with target ${build.target.all}"
    8692    set build.target.current ${build.target.all}
    8793    system "[command build]"
  • trunk/base/src/port1.0/portchecksum.tcl

    r1015 r1200  
    3636${com.apple.checksum} provides checksum
    3737${com.apple.checksum} requires main fetch
     38${com.apple.checksum} set prerun checksum_start
    3839
    3940# define options
     
    7273    }
    7374    return -1
     75}
     76
     77proc checksum_start {args} {
     78    global UI_PREFIX portname
     79
     80    ui_msg "$UI_PREFIX Checksumming $portname"
    7481}
    7582
  • trunk/base/src/port1.0/portclean.tcl

    r1015 r1200  
    3939${com.apple.clean} provides clean
    4040${com.apple.clean} requires main
     41${com.apple.clean} set prerun clean_start
     42
     43proc clean_start {args} {
     44    global UI_PREFIX portname
     45
     46    ui_msg "$UI_PREFIX Cleaning $portname"
     47}
    4148
    4249proc clean_main {args} {
  • trunk/base/src/port1.0/portconfigure.tcl

    r1078 r1200  
    3737${com.apple.configure} requires main fetch extract checksum patch
    3838${com.apple.configure} deplist depends_build depends_lib
     39${com.apple.configure} set prerun configure_start
    3940
    4041# define options
     
    5152
    5253set UI_PREFIX "---> "
     54
     55proc configure_start {args} {
     56    global UI_PREFIX portname
     57
     58    ui_msg "$UI_PREFIX Configuring $portname"
     59}
    5360
    5461proc configure_main {args} {
     
    8390        }
    8491    } elseif [tbool use_configure] {
    85         ui_msg "$UI_PREFIX Running configure script"
    8692        if {[catch {system "[command configure]"} result]} {
    8793            ui_error "configure target failed: $result"
  • trunk/base/src/port1.0/portextract.tcl

    r1015 r1200  
    3838${com.apple.extract} requires fetch checksum
    3939${com.apple.extract} deplist depends_extract
     40${com.apple.extract} set prerun extract_start
    4041
    4142# define options
     
    6768}
    6869
     70proc extract_start {args} {
     71    global UI_PREFIX portname
     72
     73    ui_msg "$UI_PREFIX Extracting $portname"
     74}
     75
    6976proc extract_main {args} {
    7077    global portname portpath workdir distname distpath distfiles use_bzip2 extract.only extract.cmd extract.before_args extract.after_args extract.args UI_PREFIX
  • trunk/base/src/port1.0/portfetch.tcl

    r1047 r1200  
    3838${com.apple.fetch} requires main
    3939${com.apple.fetch} deplist depends_fetch
     40${com.apple.fetch} set prerun fetch_start
    4041
    4142# define options: distname master_sites
     
    275276}
    276277
     278proc fetch_start {args} {
     279    global UI_PREFIX portname
     280
     281    ui_msg "$UI_PREFIX Fetching $portname"
     282}
     283
    277284# Main fetch routine
    278285# If all_dist_files is not populated and $fetch.type == standard, then
  • trunk/base/src/port1.0/portinstall.tcl

    r1015 r1200  
    3737${com.apple.install} requires main fetch extract checksum patch configure build
    3838${com.apple.install} deplist depends_run depends_lib
     39${com.apple.install} set prerun install_start
    3940
    4041# define options
     
    4445
    4546set UI_PREFIX "---> "
     47
     48proc install_start {args} {
     49    global UI_PREFIX portname build.target.install
     50
     51    ui_msg "$UI_PREFIX Installing $portname with target ${build.target.install}"
     52}
    4653
    4754proc install_main {args} {
     
    5562        }
    5663    }
    57     ui_msg "$UI_PREFIX Installing $portname with target ${build.target.install}"
     64
    5865    set build.target.current ${build.target.install}
    5966    if [catch {system "[command build]"}] {
  • trunk/base/src/port1.0/portregistry.tcl

    r1039 r1200  
    3737${com.apple.registry} requires main fetch extract checksum patch configure build install
    3838${com.apple.registry} deplist depends_run depends_lib
     39${com.apple.registry} set prerun registry_start
    3940
    4041# define options
     
    4748
    4849set UI_PREFIX "---> "
     50
     51proc registry_start {args} {
     52    global UI_PREFIX portname
     53
     54    ui_msg "$UI_PREFIX Adding $portname to registry, this may take a moment..."
     55}
    4956
    5057# For now, just write stuff to a file for debugging.
     
    205212    # Package installed successfully, so now we must register it
    206213    set rhandle [registry_new $portname $portversion]
    207     ui_msg "$UI_PREFIX Adding $portname to registry, this may take a moment..."
    208214
    209215    registry_store $rhandle [list prefix $prefix]
  • trunk/base/src/port1.0/portuninstall.tcl

    r1066 r1200  
    3737${com.apple.uninstall} provides uninstall
    3838${com.apple.uninstall} requires main
     39${com.apple.uninstall} set prerun uninstall_start
    3940
    4041# define options
     
    4243
    4344set UI_PREFIX "---> "
     45
     46proc uninstall_start {args} {
     47    global portname portversion UI_PREFIX
     48
     49    if [string length [registry_exists $portname $portversion]] {
     50        ui_msg "$UI_PREFIX Uninstalling $portname-$portversion"
     51    }
     52}
    4453
    4554proc uninstall_main {args} {
     
    5362    set rfile [registry_exists $portname $portversion]
    5463    if [string length $rfile] {
    55         ui_msg "$UI_PREFIX Uninstalling $portname-$portversion"
    5664        if [regexp .bz2$ $rfile] {
    5765            set fd [open "|bunzip2 -c $rfile" r]
Note: See TracChangeset for help on using the changeset viewer.