upgrading package: leo 1.31 -> 1.33

leo/leo.patch

@@ -1,21 +1,7 @@
-Index: Org.pm
---- Org.pm.orig	2008-04-07 15:29:33 +0200
-+++ Org.pm	2008-04-10 13:00:20 +0200
-@@ -330,8 +330,8 @@
-         my $leftsize = length($left);
-         $maxsize = $leftsize if($leftsize > $maxsize);
-         push @match, { left => $left, right => $right };
--        $this->debug( "normalized segment  left: $left");
--        $this->debug( "normalized segment right: $right\n");
-+        $this->debug( "normalized segment  left: $left") if (defined $left);
-+        $this->debug( "normalized segment right: $right\n") if (defined $right);
-       }
-     }
-     else {
 Index: leo
---- leo.orig	2008-04-07 15:28:59 +0200
-+++ leo	2008-04-10 12:58:38 +0200
-@@ -31,8 +31,8 @@
+--- leo.orig	2008-04-22 23:09:05 +0200
++++ leo	2008-04-23 08:00:53 +0200
+@@ -32,8 +32,8 @@
  #
  my $highlight = 1;
  my $default_c = "\033[0m";    # reset default terminal color
@@ -24,10 +10,10 @@ Index: leo
 +my $bold_c    = "\033[0;1m";  # bold text
 +my $blue_c    = "\033[0;34m"; # blue color
  
- my $version   = "1.31";
+ my $version   = "1.33";
  my $config    = $ENV{HOME} . "/.leo";
-@@ -267,18 +267,13 @@
-     # dict entry
+@@ -262,19 +262,14 @@
+   foreach my $entry (@{$section->{data}}) {
      $entry->{left} =~ s/^(.*)$/$1 . " " x ($maxsize - length($1))/e;
      if ($highlight) {
 -      $entry->{left}  =~ s/(\Q$string\E)/$bold_c . $1 . $default_c/ei;
@@ -35,14 +21,15 @@ Index: leo
 +      $entry->{left}  =~ s/(\Q$string\E)/$blue_c . $1 . $default_c/ei;
 +      $entry->{right} =~ s/(\Q$string\E)/$blue_c . $1 . $default_c/ei;
      }
-     print $entry->{left} . $entry->{right} . "\n";
+     print " $entry->{left}$entry->{right}\n";
    }
  }
  
+ 
 -print "$copy_c" if $highlight;
 -print "\n     Fetched by leo $version via http://dict.leo.org/";
--print "\n     Copyright  ©  LEO  Dictionary Team 1995-2008";
--print "\n     [leo] GPL Copyleft © Thomas Linden 2000-2008\n\n";
+-print "\n     Copyright  ©  LEO  Dictionary Team 1995-2007";
+-print "\n     [leo] GPL Copyleft © Thomas Linden 2000-2007\n\n";
 -print "$default_c" if $highlight;
  
  

leo/leo.spec

@@ -31,8 +31,8 @@ Distribution: OpenPKG Community
 Class:        EVAL
 Group:        Searching
 License:      GPL
-Version:      1.31
-Release:      20080410
+Version:      1.33
+Release:      20080423
 
 #   list of sources
 Source0:      http://www.daemon.de/files/mirror/ftp.daemon.de/scip/PerlModules/WWW-Dict-Leo-Org-%{version}.tar.gz