r19571 - in /trunk/libterm-readkey-perl: ReadKey.pm debian/changelog debian/control debian/patches/ debian/patches/GetTermSize-as-documented-300711.patch debian/patches/series debian/rules

[dmn at users.alioth.debian.org]

Author: dmn
Date: Tue May  6 19:13:23 2008
New Revision: 19571

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=19571
Log:
split chane to ReadKey.pm into a patch; add quilt

Added:
    trunk/libterm-readkey-perl/debian/patches/
    trunk/libterm-readkey-perl/debian/patches/GetTermSize-as-documented-300711.patch
    trunk/libterm-readkey-perl/debian/patches/series
Modified:
    trunk/libterm-readkey-perl/ReadKey.pm
    trunk/libterm-readkey-perl/debian/changelog
    trunk/libterm-readkey-perl/debian/control
    trunk/libterm-readkey-perl/debian/rules

Modified: trunk/libterm-readkey-perl/ReadKey.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libterm-readkey-perl/ReadKey.pm?rev=19571&op=diff
==============================================================================
--- trunk/libterm-readkey-perl/ReadKey.pm (original)
+++ trunk/libterm-readkey-perl/ReadKey.pm Tue May  6 19:13:23 2008
@@ -357,11 +357,10 @@
         push( @fail, "resize program" );
     }
 
-    if ( @results != 4 )
-    {
-        warn "Unable to get Terminal Size."
+    if ( @results < 4 )
+    {
+        die "Unable to get Terminal Size."
           . join( "", map( " The $_ didn't work.", @fail ) );
-	return undef;
     }
 
     @results;

Modified: trunk/libterm-readkey-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libterm-readkey-perl/debian/changelog?rev=19571&op=diff
==============================================================================
--- trunk/libterm-readkey-perl/debian/changelog (original)
+++ trunk/libterm-readkey-perl/debian/changelog Tue May  6 19:13:23 2008
@@ -19,6 +19,7 @@
   * add myself to Uploaders
   * refresh debian/rules using current dh-make-perl template
   * Standards-Version: 3.7.3 (no changes)
+  * split chane to ReadKey.pm into a patch; add quilt
 
  -- gregor herrmann <gregor+debian at comodo.priv.at>  Tue, 09 Oct 2007 22:32:19 +0200
 

Modified: trunk/libterm-readkey-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libterm-readkey-perl/debian/control?rev=19571&op=diff
==============================================================================
--- trunk/libterm-readkey-perl/debian/control (original)
+++ trunk/libterm-readkey-perl/debian/control Tue May  6 19:13:23 2008
@@ -1,7 +1,7 @@
 Source: libterm-readkey-perl
 Section: perl
 Priority: optional
-Build-Depends: debhelper (>= 5), perl (>= 5.8.0-3)
+Build-Depends: debhelper (>= 5), perl (>= 5.8.0-3), quilt (>= 0.40)
 Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
 Uploaders: Gunnar Wolf <gwolf at debian.org>, Niko Tyni <ntyni at iki.fi>,
  Damyan Ivanov <dmn at debian.org>

Added: trunk/libterm-readkey-perl/debian/patches/GetTermSize-as-documented-300711.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libterm-readkey-perl/debian/patches/GetTermSize-as-documented-300711.patch?rev=19571&op=file
==============================================================================
--- trunk/libterm-readkey-perl/debian/patches/GetTermSize-as-documented-300711.patch (added)
+++ trunk/libterm-readkey-perl/debian/patches/GetTermSize-as-documented-300711.patch Tue May  6 19:13:23 2008
@@ -1,0 +1,17 @@
+# Modify the GetTerminalSize function to match its documented behaviour
+--- libterm-readkey-perl-2.30.orig/ReadKey.pm
++++ libterm-readkey-perl-2.30/ReadKey.pm
+@@ -357,10 +357,11 @@
+         push( @fail, "resize program" );
+     }
+ 
+-    if ( @results < 4 )
++    if ( @results != 4 )
+     {
+-        die "Unable to get Terminal Size."
++        warn "Unable to get Terminal Size."
+           . join( "", map( " The $_ didn't work.", @fail ) );
++	return undef;
+     }
+ 
+     @results;

Added: trunk/libterm-readkey-perl/debian/patches/series
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libterm-readkey-perl/debian/patches/series?rev=19571&op=file
==============================================================================
--- trunk/libterm-readkey-perl/debian/patches/series (added)
+++ trunk/libterm-readkey-perl/debian/patches/series Tue May  6 19:13:23 2008
@@ -1,0 +1,1 @@
+GetTermSize-as-documented-300711.patch

Modified: trunk/libterm-readkey-perl/debian/rules
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libterm-readkey-perl/debian/rules?rev=19571&op=diff
==============================================================================
--- trunk/libterm-readkey-perl/debian/rules (original)
+++ trunk/libterm-readkey-perl/debian/rules Tue May  6 19:13:23 2008
@@ -6,6 +6,8 @@
 
 # Uncomment this to turn on verbose mode.
 #export DH_VERBOSE=1
+
+include /usr/share/quilt/quilt.make
 
 # If set to a true value then MakeMaker's prompt function will
 # always return the default without waiting for user input.
@@ -26,7 +28,7 @@
 endif
 
 build: build-stamp
-build-stamp:
+build-stamp: $(QUILT_STAMPFN)
 	dh_testdir
 	# Add commands to compile the package here
 	$(PERL) Makefile.PL INSTALLDIRS=vendor
@@ -34,7 +36,7 @@
 	$(MAKE) test
 	touch $@
 
-clean:
+clean: unpatch
 	dh_testdir
 	dh_testroot
 	dh_clean build-stamp install-stamp