Ticket #6712: at.patch

File at.patch, 2.0 KB (added by deric@…, 19 years ago)

patch for prefixing version with '@'

  • portimage.tcl

    ? patch
    RCS file: /Volumes/src/cvs/od/proj/darwinports/base/src/registry1.0/portimage.tcl,v
    retrieving revision 1.15
    diff -u -r1.15 portimage.tcl
     
    217217                                set     ivariants [lindex $i 3]
    218218                                set iactive [lindex $i 4]
    219219                                if { $iactive == 0 } {
    220                                         ui_msg "$UI_PREFIX [format [msgcat::mc "        %s %s_%s%s"] $iname $iversion $irevision $ivariants]"
     220                                        ui_msg "$UI_PREFIX [format [msgcat::mc "        %s @%s_%s%s"] $iname $iversion $irevision $ivariants]"
    221221                                } elseif { $iactive == 1 } {
    222                                         ui_msg "$UI_PREFIX [format [msgcat::mc "        %s %s_%s%s (active)"] $iname $iversion $irevision $ivariants]"
     222                                        ui_msg "$UI_PREFIX [format [msgcat::mc "        %s @%s_%s%s (active)"] $iname $iversion $irevision $ivariants]"
    223223                                }
    224224                        }
    225225                        return -code error "Registry error: Please specify the full version as recorded in the port registry."
  • portuninstall.tcl

    RCS file: /Volumes/src/cvs/od/proj/darwinports/base/src/registry1.0/portuninstall.tcl,v
    retrieving revision 1.13
    diff -u -r1.13 portuninstall.tcl
     
    5252                        set ivariants [lindex $i 3]
    5353                        set iactive [lindex $i 4]
    5454                        if { $iactive == 0 } {
    55                                 ui_msg "$UI_PREFIX [format [msgcat::mc "        %s %s_%s%s"] $iname $iversion $irevision $ivariants]"
     55                                ui_msg "$UI_PREFIX [format [msgcat::mc "        %s @%s_%s%s"] $iname $iversion $irevision $ivariants]"
    5656                        } elseif { $iactive == 1 } {
    57                                 ui_msg "$UI_PREFIX [format [msgcat::mc "        %s %s_%s%s (active)"] $iname $iversion $irevision $ivariants]"
     57                                ui_msg "$UI_PREFIX [format [msgcat::mc "        %s @%s_%s%s (active)"] $iname $iversion $irevision $ivariants]"
    5858                        }
    5959                }
    6060                return -code error "Registry error: Please specify the full version as recorded in the port registry."