Ticket #2650: darwinports.tcl.diff

File darwinports.tcl.diff, 591 bytes (added by dms@…, 19 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