[Pkg-voip-commits] r8015 - /mumble/trunk/debian/backports/lucid

[thorvald at alioth.debian.org]

Author: thorvald
Date: Fri Feb  5 19:00:01 2010
New Revision: 8015

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

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

Added: mumble/trunk/debian/backports/lucid
URL: http://svn.debian.org/wsvn/pkg-voip/mumble/trunk/debian/backports/lucid?rev=8015&op=file
==============================================================================
--- mumble/trunk/debian/backports/lucid (added)
+++ mumble/trunk/debian/backports/lucid Fri Feb  5 19:00:01 2010
@@ -1,0 +1,40 @@
+#! /usr/bin/perl
+#
+# Hook for automatic backports.
+#
+# Target dist: Ubuntu Lucid
+
+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/lucid
------------------------------------------------------------------------------
    svn:executable = *