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

[raimue at macports.org]

Revision: 34674
          http://trac.macosforge.org/projects/macports/changeset/34674
Author:   raimue at macports.org
Date:     2008-03-02 00:43:22 -0800 (Sun, 02 Mar 2008)

Log Message:
-----------
port1.0/portlivecheck.tcl:
Additional fix for r34667, don't use join as it de-escapes the regex

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

Modified: trunk/base/src/port1.0/portlivecheck.tcl
===================================================================
--- trunk/base/src/port1.0/portlivecheck.tcl	2008-03-02 07:48:44 UTC (rev 34673)
+++ trunk/base/src/port1.0/portlivecheck.tcl	2008-03-02 08:43:22 UTC (rev 34674)
@@ -169,7 +169,7 @@
                 # let's extract the version from the file.
                 set chan [open $tempfile "r"]
                 set updated -1
-                set the_re [join ${livecheck.regex}]
+                set the_re ${livecheck.regex}
                 ui_debug "The regex is \"$the_re\""
                 if {${livecheck.check} == "regexm"} {
                     set data [read $chan]

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/macports-changes/attachments/20080302/89747fbd/attachment.html