[Pkg-voip-commits] r8895 - /mumble/trunk/debian/backports/natty

[thorvald at alioth.debian.org]

Author: thorvald
Date: Sat Apr 23 20:17:37 2011
New Revision: 8895

URL: http://svn.debian.org/wsvn/pkg-voip/?sc=1&rev=8895
Log:
Add natty backport script

Added:
    mumble/trunk/debian/backports/natty   (with props)

Added: mumble/trunk/debian/backports/natty
URL: http://svn.debian.org/wsvn/pkg-voip/mumble/trunk/debian/backports/natty?rev=8895&op=file
==============================================================================
--- mumble/trunk/debian/backports/natty (added)
+++ mumble/trunk/debian/backports/natty Sat Apr 23 20:17:37 2011
@@ -1,0 +1,40 @@
+#! /usr/bin/perl
+#
+# Hook for automatic backports.
+#
+# Target dist: Ubuntu Natty
+
+use warnings;
+use strict;
+use Carp;
+
+open(F, "debian/control") or croak;
+my $first = 1;
+my $file;
+my $field = '';
+while(<F>) {
+  chomp();
+  if (/^(\S+):/) {
+    $field = $1;
+  }
+  if ($first) {
+    $file .= $_;
+    $first = 0;
+  } elsif (/^$/) {
+    $file .= "\n";
+  } elsif ($field eq 'Description' || /^[^ ]/ || /^$/) {
+    $file .= "\n" . $_;
+  } else {
+    $file .= $_;
+  }
+}
+close(F);
+
+$file .= "\n";
+
+$file =~ s/(\nBuild-Depends: [^\n]+)exim4/\1postfix/g;
+$file =~ s/(\nDepends: [^\n]+)exim4/\1postfix/g;
+
+open(F, ">debian/control") or croak;
+print F $file;
+close(F);

Propchange: mumble/trunk/debian/backports/natty
------------------------------------------------------------------------------
    svn:executable = *