|
|
@@ -1,6 +1,6 @@
|
|
|
Index: leo
|
|
|
--- leo.orig 2005-04-18 12:46:37 +0200
|
|
|
-+++ leo 2005-06-05 13:42:12 +0200
|
|
|
++++ leo 2005-08-28 22:04:45 +0200
|
|
|
@@ -34,8 +34,8 @@
|
|
|
#
|
|
|
my $highlight = 1;
|
|
|
@@ -12,7 +12,17 @@ Index: leo
|
|
|
|
|
|
my $ip = "dict.leo.org";
|
|
|
my $port = "80";
|
|
|
-@@ -511,18 +511,13 @@
|
|
|
+@@ -397,6 +397,9 @@
|
|
|
+ # remove match hint, we are counting ourselfes
|
|
|
+ $site =~ s/\d+?\s*treffer//i;
|
|
|
+
|
|
|
++ # remove sub/super-script word annotations
|
|
|
++ $site =~ s/<(sub|sup)>.*?<\/\1>//gsi;
|
|
|
++
|
|
|
+ # make single line per entry
|
|
|
+ my @segments = split /<\/TR>\s*<TR>/i, $site;
|
|
|
+ my $progress;
|
|
|
+@@ -511,18 +514,13 @@
|
|
|
# dict entry
|
|
|
$entry->{left} =~ s/^(.*)$/$1 . " " x ($maxsize - length($1))/e;
|
|
|
if ($highlight) {
|