Bug#746804: Patch for fixing _write on invalid objects

[ppm]

The attached patch will fix the issue without breaking any existing use
case. Can someone please review. If looks good I will push the patch to
its proper place.

HH. ppm

Description: Patch for fixing _write on invalid objects
Origin: vendor
Bug-Debian: http://bugs.debian.org/746804
Author: Partha Pratim Mukherjee 
--- a/lib/IPC/Run.pm
+++ b/lib/IPC/Run.pm
@@ -2465,8 +2465,14 @@ sub _open_pipes {
 }
 _debug_desc_fd( 'writing to', $pipe ) if _debugging_details;
 
-my $c = _write( $pipe->{FD}, $$in_ref );
-substr( $$in_ref, 0, $c, '' );
+   if (length $$in_ref && $$in_ref) {
+   my $c = _write( $pipe->{FD}, $$in_ref );
+   substr( $$in_ref, 0, $c, '' );
+   } else {
+   $self->_clobber( $pipe );
+   return undef;
+   }
+
 return 1;
  };
  ## Output filters are the first filters

Bug#767041: Fix for bug#767041

[ppm]

Hi,

The attached patch will fix this bug.

I have tried to run `$ iconv -t UTF-8 search.yml' but received an error
so I have decided to remove those troublemaking chars in search.yml.

Can someone please verify and merge it in the repo.

Thanks,
Partha
>From 531aca81338933911e23f58bc1bc6099526f0439 Mon Sep 17 00:00:00 2001
From: Partha Pratim Mukherjee 
Date: Sun, 2 Nov 2014 19:26:39 +0530
Subject: [PATCH] Fix for bug#767041

---
 lib/Kephra/Config/Interface.pm  | 2 +-
 share/config/global/data/search.yml | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/Kephra/Config/Interface.pm b/lib/Kephra/Config/Interface.pm
index 9ef50e1..4a3039b 100644
--- a/lib/Kephra/Config/Interface.pm
+++ b/lib/Kephra/Config/Interface.pm
@@ -16,7 +16,7 @@ sub load {
 	my $use_cache = _config()->{cache}{use}; # config allow to use the cache
 	my $load_cache = 0;  # cache is successful loaded
 	my (%file,%old_index,%new_index);
-	if ($use_cache and 0) { # supend using cache
+	if ($use_cache) { # supend using cache
 		my $read = \&Kephra::Config::File::load;
 		my $path = \&Kephra::Config::filepath;
 		my $get_age = \&Kephra::File::IO::get_age;
diff --git a/share/config/global/data/search.yml b/share/config/global/data/search.yml
index 4a7cadd..43dc8fb 100644
--- a/share/config/global/data/search.yml
+++ b/share/config/global/data/search.yml
@@ -9,8 +9,8 @@ find:
 - static
 - Panel
 - 'man '
-- Verständnis
-- gespräch
+- Verstndnis
+- gesprch
 - auch
 - welche
 - nur
-- 
2.1.1

Bug#709533: Patch for bug#709533

[ppm]

The attached patch will fix the issue.

The version which introduces this bug is 2.4.4-1.

Anyway enjoy.
>From 1573b4da4c24e8b3165f4c55991e3dec7484eca8 Mon Sep 17 00:00:00 2001
From: "Partha P. Mukherjee" 
Date: Mon, 22 Sep 2014 14:19:53 +0530
Subject: [PATCH] Fix for bug#709533

---
 Chart/Base.pm |3 +++
 1 file changed, 3 insertions(+)

diff --git a/Chart/Base.pm b/Chart/Base.pm
index 2c5bceb..995b439 100644
--- a/Chart/Base.pm
+++ b/Chart/Base.pm
@@ -4421,6 +4421,9 @@ sub _prepare_brush
 
 if ( grep { $brushStyle eq $_ } ( 'default', 'circle', 'donut', 'OpenCircle', 'FilledCircle' ) )
 {
+$xc = $xc - 1;
+$yc = $yc - 1;
+
 $brush->arc( $xc, $yc, $radius, $radius, 0, 360, $newcolor );
 $brush->fill( $xc, $yc, $newcolor );
 
-- 
1.7.9.5

Bug#760870: Patch to fix this issue

[ppm]

Hi,

The patch attached with this email seems to solve this issue.

I have applied it the ack-grep source code in sid and ran `make test'
without any error.

Should we add one test case in ack-grep source to specifically test this
use case?

Thanks,
Partha
--- ack.orig	2014-09-04 03:48:46.0 +
+++ ack	2014-09-12 08:24:46.744780094 +
@@ -331,7 +331,7 @@
 $str = "(?i)$str";
 }
 
-my $re = eval { qr/$str/ };
+my $re = eval { qr/$str/m };
 if ( !$re ) {
 die "Invalid regex '$str':\n  $@";
 }