File: 05_accept_trailing_tree.patch

package info (click to toggle)
liblinux-kernelsort-perl 0.01-3
  • links: PTS
  • area: main
  • in suites: buster, jessie, jessie-kfreebsd, stretch
  • size: 164 kB
  • ctags: 43
  • sloc: perl: 225; sh: 114; makefile: 36
file content (18 lines) | stat: -rw-r--r-- 849 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
#! /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;
     }