[26041] trunk/base/src/port1.0/portlivecheck.tcl
source_changes at macosforge.org
source_changes at macosforge.org
Sat Jun 9 17:32:33 PDT 2007
Revision: 26041
http://trac.macosforge.org/projects/macports/changeset/26041
Author: eridius at macports.org
Date: 2007-06-09 17:32:31 -0700 (Sat, 09 Jun 2007)
Log Message:
-----------
Fix livecheck to properly de-escape livecheck.url
Modified Paths:
--------------
trunk/base/src/port1.0/portlivecheck.tcl
Modified: trunk/base/src/port1.0/portlivecheck.tcl
===================================================================
--- trunk/base/src/port1.0/portlivecheck.tcl 2007-06-09 23:33:08 UTC (rev 26040)
+++ trunk/base/src/port1.0/portlivecheck.tcl 2007-06-10 00:32:31 UTC (rev 26041)
@@ -128,6 +128,9 @@
}
}
+ # de-escape livehcheck.url
+ set livecheck.url [join ${livecheck.url}]
+
switch ${livecheck.check} {
"regex" -
"regexm" {
@@ -139,7 +142,7 @@
# let's extract the version from the file.
set chan [open $tempfile "r"]
set updated -1
- set the_re [eval "concat ${livecheck.regex}"]
+ set the_re [subst -nocommands [join ${livecheck.regex}]]
if {${livecheck.check} == "regexm"} {
set data [read $chan]
if {[regexp $the_re $data matched updated_version]} {
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/macports-changes/attachments/20070609/5a3e3651/attachment.html
More information about the macports-changes
mailing list