X-Git-Url: http://rtime.felk.cvut.cz/gitweb/socketcan-devel.git/blobdiff_plain/31d08fa61cbddf0100f23c5b380978877d6b45cf..c214d1a46a37635c06c68756baa383b3ac5996ca:/mkpatch

diff --git a/mkpatch b/mkpatch
index 475141c..c75cc85 100755
--- a/mkpatch
+++ b/mkpatch
@@ -11,6 +11,8 @@ $version = shift;
 
 if (-r "patches/$version.diff") {
     copy_file("patches/$version.diff");
+} else {
+    die "Patch patches/$version.diff not found";
 }
 
 while (<>) {
@@ -40,45 +42,19 @@ sub copy_file {
 
 sub add_file {
     my ($file, $name) = @_;
-    my (@lines, $count, $ts, $mtime);
+    my (@lines, $count, $ts);
 
-    open file, "./kv $version $file |" || die "open $file\n";
+    open file, "./strip-src -i -m -v $version $file |" || die "open $file\n";
     @lines = <file>;
+    close file;
+
     $count = $#lines + 1;
-    $mtime = (stat($file))[9];
     $ts = strftime "%F %T", gmtime((stat($file))[9]);
 
-    for $i (0..$#lines) {
-
-	if ($lines[$i] =~ /include.*linux(\/can)?\/version\.h/) {
-	    undef($lines[$i]);
-	    $count--;
-	}
-
-	if ($lines[$i] =~ /RCSID/) {
-	    undef($lines[$i]);
-	    $count--;
-	    while ($lines[++$i] eq "\n") {
-		undef($lines[$i]);
-		$count--;
-	    }
-	}
-
-	if ($lines[$i] =~ /\$Id.*\$/) {
-	    undef($lines[$i]);
-	    $count--;
-	    while ($lines[++$i] eq " *\n") {
-		undef($lines[$i]);
-		$count--;
-	    }
-	}
-    }
-
     print "--- a/$name 1970-01-01 00:00:00\n";
     print "+++ b/$name $ts\n";
     print "@@ -0,0 +1,$count @@\n";
     for (@lines) {
-	print "+$_" if (defined($_));
+	print "+$_";
     }
-    close file;
 }