Bug#380052: search-citeseer: format change... it doesn't work

[Pietro Abate]

Package: search-citeseer
Version: 0.2.1-1
Severity: grave
Tags: patch
Justification: renders package unusable

patch attached

-- System Information:
Debian Release: testing/unstable
  APT prefers unstable
  APT policy: (500, 'unstable'), (1, 'experimental')
Architecture: i386 (i686)
Shell:  /bin/sh linked to /bin/bash
Kernel: Linux 2.6.17-1-686
Locale: LANG=en_AU, LC_CTYPE=en_AU (charmap=ANSI_X3.4-1968) (ignored: LC_ALL 
set to C)

Versions of packages search-citeseer depends on:
ii  emacsen-common                1.4.17     Common facilities for all emacsen
ii  libwww-perl                   5.805-1    WWW client/server library for Perl
ii  perl                          5.8.8-6    Larry Wall's Practical Extraction 

search-citeseer recommends no packages.

-- no debconf information

--- /usr/bin/search-citeseer    2004-04-29 06:23:07.000000000 +1000
+++ /tmp/search-citeseer        2006-07-27 15:43:08.414418250 +1000
@@ -67,9 +67,9 @@
 #    print "DEBUG: $str";
     $_=$line;
     if ($zone) {
-       if (/<a href=.*html\"\>/) {
+       if (/<a href=\".*html\"\>/) {
 #          print "DEBUG: $_";
-           s/<a href=\"(.*)\"\>.*/\1/;
+           s/<!--RIS--><a href=\"(.*html)\"\>.*/\1/;
            getbib $_;
        } elsif (/.*Try your query at:.*/) {
            $zone=0;