SPECS: pldnotify.awk pecl.php.net support

arekm arekm at pld-linux.org
Thu Aug 28 11:22:37 CEST 2008


Author: arekm                        Date: Thu Aug 28 09:22:37 2008 GMT
Module: SPECS                         Tag: HEAD
---- Log message:
pecl.php.net support

---- Files affected:
SPECS:
   pldnotify.awk (1.59 -> 1.60) 

---- Diffs:

================================================================
Index: SPECS/pldnotify.awk
diff -u SPECS/pldnotify.awk:1.59 SPECS/pldnotify.awk:1.60
--- SPECS/pldnotify.awk:1.59	Thu Aug 14 23:41:19 2008
+++ SPECS/pldnotify.awk	Thu Aug 28 11:22:32 2008
@@ -151,7 +151,7 @@
 	return 0
 }
 
-function get_links(url,	errno,link,oneline,retval,odp,wholeodp,lowerodp,tmpfile) {
+function get_links(url,filename,errno,link,oneline,retval,odp,wholeodp,lowerodp,tmpfile) {
 # get all <A HREF=..> tags from specified URL
 	"mktemp /tmp/XXXXXX" | getline tmpfile
 	close("mktemp /tmp/XXXXXX")
@@ -169,6 +169,12 @@
 		if (DEBUG) print "googlecode url, mungled url to: " url
 	}
 
+	if (url ~ /^http:\/\/pecl.php.net\/get\//) {
+		gsub("-.*", "", filename)
+		url = "http://pecl.php.net/package/" filename
+		if (DEBUG) print "pecl.php.net url, mungled url to: " url
+	}
+
 	if (DEBUG) print "Retrieving: " url
 	errno=system("wget -O - \"" url "\" -t 3 -T 300 --passive-ftp > " tmpfile " 2>/dev/null" )
 
@@ -319,7 +325,7 @@
 	references=0
 	finished=0
 	oldversion=version
-	odp=get_links(newurl)
+	odp=get_links(newurl,filename)
 	if( odp ~ "ERROR: ") {
 		print name "(" number ") " odp
 	} else {
================================================================

---- CVS-web:
    http://cvs.pld-linux.org/cgi-bin/cvsweb.cgi/SPECS/pldnotify.awk?r1=1.59&r2=1.60&f=u



More information about the pld-cvs-commit mailing list