scripts/delta: adapt to curl.h changes for the opt counter

1 files changed, 14 insertions, 2 deletions

diff --git a/scripts/delta b/scripts/delta
index 3c6a823d3..858f16100 100755
--- a/scripts/delta
+++ b/scripts/delta
@@ -59,8 +59,20 @@ $bcontribs = `git show $start:docs/THANKS | grep -c '^[^ ]'`;
 $contribs = $acontribs - $bcontribs;
 
 # number of setops:
-$asetopts=`grep '^  CURLOPT(' include/curl/curl.h  | grep -cv OBSOLETE`;
-$bsetopts=`git show $start:include/curl/curl.h | grep '^  CURLOPT(' | grep -cv OBSOLETE`;
+sub setopts {
+    my ($f)=@_;
+    open(H, "$f");
+    my $opts;
+    while(<H>) {
+        if(/^  CURLOPT(|DEPRECATED)\(/ && ($_ !~ /OBSOLETE/))  {
+            $opts++;
+        }
+    }
+    close(H);
+    return $opts;
+}
+$asetopts = setopts("<include/curl/curl.h");
+$bsetopts = setopts("git show $start:include/curl/curl.h|");
 $nsetopts = $asetopts - $bsetopts;
 
 # Number of command line options: