[92881] trunk/base/src/port1.0/portlivecheck.tcl

[pixilla at macports.org]

Revision: 92881
          https://trac.macports.org/changeset/92881
Author:   pixilla at macports.org
Date:     2012-05-09 18:36:54 -0700 (Wed, 09 May 2012)
Log Message:
-----------
base:
- tcl<8.5 (Mac OS X 10.5) does not have lassign

Modified Paths:
--------------
    trunk/base/src/port1.0/portlivecheck.tcl

Modified: trunk/base/src/port1.0/portlivecheck.tcl
===================================================================
--- trunk/base/src/port1.0/portlivecheck.tcl	2012-05-09 23:08:04 UTC (rev 92880)
+++ trunk/base/src/port1.0/portlivecheck.tcl	2012-05-10 01:36:54 UTC (rev 92881)
@@ -177,7 +177,7 @@
                                 set updated_version $upver
                             }
                             ui_debug "The regex matched \"$matched\", extracted \"$upver\""
-                            lassign $offsets firstoff lastoff
+                            set lastoff [lindex $offsets end]
                         }
                     }
                     if {$foundmatch == 1} {
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20120509/9e5c8d9d/attachment-0001.html>