Package: devscripts
Version: 2.9.12
Severity: important
Tags: patch

bts cache seems to be broken currently because of internal API changes
that weren't reflected in all parts of the code. The following patch fixes
it and also gets rid of some annoying perl warnings.

diff -Naur devscripts-2.9.12.old/bts.pl devscripts-2.9.12/bts.pl
--- devscripts-2.9.12.old/bts.pl        2006-02-05 20:50:10.000000000 +0100
+++ devscripts-2.9.12/bts.pl    2006-02-12 05:21:26.000000000 +0100
@@ -1165,7 +1165,7 @@
     my @oldbugs = bugs_from_thing($tocache);
     
     # download index
-    download($tocache, 1);
+    download($tocache, '', 1);
 
     my %bugs = map { $_ => 1 } bugs_from_thing($tocache);
 
@@ -1189,7 +1189,7 @@
     my $bugcount = 1;
     my $bugtotal = scalar keys %bugs;
     foreach my $bug (keys %bugs) {
-       download($bug, 1, 0, $bugcount, $bugtotal);
+       download($bug, '', 1, 0, $bugcount, $bugtotal);
         sleep $opt_cachedelay;
        $bugcount++;
     }
@@ -1572,7 +1572,7 @@
 # live thing as a (non-empty) string
 sub download {
     my $thing=shift;
-    my $thgopts=shift;
+    my $thgopts=shift ||'';
     my $manual=shift;  # true="bts cache", false="bts show/bug"
     my $mboxing=shift;  # true="bts --mbox show/bugs", and only if $manual=0
     my $bug_current=shift;  # current bug being downloaded if caching
@@ -1878,7 +1878,7 @@
 # Given a thing, returns the filename for it in the cache.
 sub cachefile {
     my $thing=shift;
-    my $thgopts=shift;
+    my $thgopts=shift ||'';
     if ($thing eq '') { die "bts: cachefile given empty argument\n"; }
     if ($thing =~ /bugs.css$/) { return $cachedir."bugs.css" }
     $thing =~ s/^src:/src_/;


-- System Information:
Debian Release: testing/unstable
  APT prefers unstable
  APT policy: (500, 'unstable'), (500, 'testing'), (1, 'experimental')
Architecture: powerpc (ppc)
Shell:  /bin/sh linked to /bin/bash
Kernel: Linux 2.6.15-1-powerpc
Locale: LANG=de_DE.UTF-8, LC_CTYPE=de_DE.UTF-8 (charmap=UTF-8)

Versions of packages devscripts depends on:
ii  debianutils                   2.15.2     Miscellaneous utilities specific t
ii  dpkg-dev                      1.13.13    package building tools for Debian
ii  libc6                         2.3.5-13   GNU C Library: Shared libraries an
ii  perl                          5.8.8-2    Larry Wall's Practical Extraction 
ii  sed                           4.1.4-5    The GNU sed stream editor

Versions of packages devscripts recommends:
ii  fakeroot                      1.5.7      Gives a fake root environment

-- no debconf information


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Reply via email to