[92886] branches/release_2_1

jmr at macports.org jmr at macports.org
Wed May 9 20:47:20 PDT 2012


Revision: 92886
          https://trac.macports.org/changeset/92886
Author:   jmr at macports.org
Date:     2012-05-09 20:47:20 -0700 (Wed, 09 May 2012)
Log Message:
-----------
merge r92881 from trunk:
 avoid use of lassign command, not available in Tcl 8.4

Revision Links:
--------------
    https://trac.macports.org/changeset/92881

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

Property Changed:
----------------
    branches/release_2_1/
    branches/release_2_1/base/


Property changes on: branches/release_2_1
___________________________________________________________________
Modified: svn:mergeinfo
   - /trunk:91825,91829,91834,92072,92342,92404,92546,92730,92785
   + /trunk:91825,91829,91834,92072,92342,92404,92546,92730,92785,92881


Property changes on: branches/release_2_1/base
___________________________________________________________________
Modified: svn:mergeinfo
   - /branches/gsoc08-privileges/base:37343-46937
/branches/gsoc09-logging/base:51231-60371
/branches/gsoc11-rev-upgrade/base:78828-88375
/branches/universal-sanity/base:51872-52323
/branches/variant-descs-14482/base:34469-34855,34900-37508,37511-37512,41040-41463,42575-42626,42640-42659
/trunk/base:91825,91829,91834,92072,92342,92404,92546,92730,92785
/users/perry/base-bugs_and_notes:45682-46060
/users/perry/base-select:44044-44692
   + /branches/gsoc08-privileges/base:37343-46937
/branches/gsoc09-logging/base:51231-60371
/branches/gsoc11-rev-upgrade/base:78828-88375
/branches/universal-sanity/base:51872-52323
/branches/variant-descs-14482/base:34469-34855,34900-37508,37511-37512,41040-41463,42575-42626,42640-42659
/trunk/base:91825,91829,91834,92072,92342,92404,92546,92730,92785,92881
/users/perry/base-bugs_and_notes:45682-46060
/users/perry/base-select:44044-44692

Modified: branches/release_2_1/base/src/port1.0/portlivecheck.tcl
===================================================================
--- branches/release_2_1/base/src/port1.0/portlivecheck.tcl	2012-05-10 03:16:36 UTC (rev 92885)
+++ branches/release_2_1/base/src/port1.0/portlivecheck.tcl	2012-05-10 03:47:20 UTC (rev 92886)
@@ -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/8dae29b9/attachment.html>


More information about the macports-changes mailing list