Ticket #2650: darwinports.tcl.diff

File darwinports.tcl.diff, 591 bytes (added by dms@…, 20 years ago)

Proposed patch

  • darwinports.tcl

    RCS file: /Volumes/src/cvs/od/proj/darwinports/base/src/darwinports1.0/darwinports.tcl,v
    retrieving revision 1.151
    diff -u -r1.151 darwinports.tcl
     
    548548        }
    549549
    550550        set i [string first . $depline]
     551        if {$i == -1} {set i [string length $depline]}
    551552        set depname [string range $depline 0 [expr $i - 1]]
    552553        set depversion [string range $depline $i end]
    553554        regsub {\.} $depversion {\.} depversion