- fixed problem with regexp special characters in substituted filenames

[packages/rpm-build-tools.git] / pldnotify.awk

diff --git a/pldnotify.awk b/pldnotify.awk
index 700a935c17285f9be0176f64135fa20f8d2df72b..2757ee14153b3b97aa801603fc3f1d6065a96c0e 100644 (file)
--- a/pldnotify.awk
+++ b/pldnotify.awk
@@ -1,5 +1,12 @@
 #!/bin/awk -f
 # $Revision$, $Date$
+function fixedsub(s1,s2,t,     ind) {
+# substitutes fixed strings (not regexps)
+       if (ind = index(t,s1)) {
+               t = substr(t, 1, ind-1) s2 substr(t, ind+length(s1))
+       }
+       return t
+}
 
 function compare_ver(v1,v2) {
 # compares version numbers
@@ -168,8 +175,8 @@ function process_source(number,lurl,name,version) {
                                match(addr,filenameexp)
                                newfilename=substr(addr,RSTART,RLENGTH)
                                if (DEBUG) print "Hipotetyczny nowy: " newfilename
-                               sub(prever,"",newfilename)
-                               sub(postver,"",newfilename)
+                               newfilename=fixedsub(prever,"",newfilename)
+                               newfilename=fixedsub(postver,"",newfilename)
                                if (DEBUG) print "Wersja: " newfilename
                                if ( compare_ver(version, newfilename)==1 ) {
                                        if (DEBUG) print "Tak, jest nowa"