- also handle short sf.net urls

Changed files:
    pldnotify.awk -> 1.50

diff --git a/pldnotify.awk b/pldnotify.awk
index 10e317d8c36e88b8f5b5af570752be93d153a17e..e5627612ab5a0a8d8a92f6d841854d374eaad66e 100644 (file)
--- a/pldnotify.awk
+++ b/pldnotify.awk
@@ -143,9 +143,9 @@ function get_links(url,     errno,link,oneline,retval,odp,tmpfile) {
        "mktemp /tmp/XXXXXX" | getline tmpfile
        close("mktemp /tmp/XXXXXX")
 
-       if (url ~ /^http:\/\/dl.sourceforge.net\//) {
-               p = substr(url, 1 + length("http://dl.sourceforge.net/"))
-               url = "http://prdownloads.sourceforge.net/" substr(p, 1, 1) "/" substr(p, 1, 2) "/" p
+       if (url ~ /^http:\/\/dl.(sf|sourceforge).net\//) {
+               gsub("^http://dl.(sf|sourceforge).net/", "", url)
+               url = "http://prdownloads.sourceforge.net/" substr(url, 1, 1) "/" substr(url, 1, 2) "/" url
                if (DEBUG) print "sf url, mungled url to: " url
        }