#! /bin/sh /usr/share/dpatch/dpatch-run
## 05_accept_trailing_tree.dpatch by Maximilian Wilhelm <max@rfc2324.org>
##
## DP: Let Linux::KernelSort accept a trailing '-tree' in version string

@DPATCH@

--- liblinux-kernelsort-perl-0.01/lib/Linux/KernelSort.pm	2006-12-07 00:43:42.000000000 +0100
+++ Linuxkernelsort-allow_trailing_tree_in_version_string/Linux/KernelSort.pm	2006-12-07 00:44:53.000000000 +0100
@@ -75,7 +75,7 @@
     my $self = shift;
     my $version = shift || return undef;
 
-    if ( $version !~ m/^(v)?\d+\.\d+\.\d+(\.\d+)?(-rc\d+)?(-git\d+)?(-scsi-misc\d+)?(-scsi-rc-fixes\d+)?(-mm\d+)?$/ ) {
+    if ( $version !~ m/^(v)?\d+\.\d+\.\d+(\.\d+)?(-rc\d+)?(-git\d+)?(-scsi-misc\d+)?(-scsi-rc-fixes\d+)?(-mm\d+)?(-tree)?$/ ) {
         if ( $self->{debug} ) { print "Invalid Kernel Version: $version\n"; }
         return 1;
     }