[79088] trunk/base/src/package1.0/portarchivefetch.tcl

[jmr at macports.org]

Revision: 79088
          http://trac.macports.org/changeset/79088
Author:   jmr at macports.org
Date:     2011-06-01 20:18:50 -0700 (Wed, 01 Jun 2011)
Log Message:
-----------
move invariant out of loop

Modified Paths:
--------------
    trunk/base/src/package1.0/portarchivefetch.tcl

Modified: trunk/base/src/package1.0/portarchivefetch.tcl
===================================================================
--- trunk/base/src/package1.0/portarchivefetch.tcl	2011-06-02 03:16:04 UTC (rev 79087)
+++ trunk/base/src/package1.0/portarchivefetch.tcl	2011-06-02 03:18:50 UTC (rev 79088)
@@ -218,9 +218,9 @@
                     ui_debug "$::errorInfo"
                     return -code error "Failed to fetch signature for archive: $result"
                 }
+                set openssl [findBinary openssl $portutil::autoconf::openssl_path]
                 set verified 0
                 foreach pubkey [option archivefetch.pubkeys] {
-                    set openssl [findBinary openssl $portutil::autoconf::openssl_path]
                     if {![catch {exec $openssl dgst -ripemd160 -verify $pubkey -signature $signature "${incoming_path}/${archive}.TMP"} result]} {
                         set verified 1
                         break
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20110601/2a22d7c4/attachment.html>