Package: dirvish
Version: 1.2.1-0.1
Severity: normal
Tags: patch

This is not the same as
http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=274943, although the
solution to the problem is in that closed bugreport.

When you run dirvish-expire, you get:

# dirvish-expire --no-run
Expiring images as of 2006-07-19 08:59:15

VAULT:BRANCH    IMAGE           CREATED           EXPIRED
cannot expire :: No unexpired good images


If I downgrade to 1.2-1 from stable, I get:

# dirvish-expire --no-run
Expiring images as of 2006-07-19 09:01:57

VAULT:BRANCH    IMAGE           CREATED           EXPIRED
coloc-cyrus:default 2006062720      2006-06-27 22:38  +15 days == 2006-07-12 
22:37
coloc-cyrus:default 2006062820      2006-06-28 22:58  +15 days == 2006-07-13 
22:58
 ... <snip> ...

Bug 274943 has the patch, but that bug was closed as not reproducable. I
have included that patch with this bug report.

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

Versions of packages dirvish depends on:
ii  libtime-modules-perl         2003.1126-2 Various Perl modules for time/date
ii  libtime-period-perl          1.20-8      Perl library for testing if a time
ii  perl                         5.8.8-6     Larry Wall's Practical Extraction 
ii  perl-modules                 5.8.8-6     Core Perl modules
ii  rsync                        2.6.8-2     fast remote file copy program (lik

Versions of packages dirvish recommends:
ii  ssh                           1:4.3p2-2  Secure shell client and server (tr

-- no debconf information
--- /tmp/dirvish-expire 2006-07-19 08:59:01.000000000 -0700
+++ /usr/sbin/dirvish-expire    2006-07-19 08:58:31.000000000 -0700
@@ -145,7 +145,7 @@
                qw(VAULT:BRANCH IMAGE CREATED EXPIRED);
 }
 
-for $expire (sort(imsort(@expires)))
+for $expire (sort(imsort @expires))
 {
        my ($created, $expired);
        ($created = $$expire{created}) =~ s/:\d\d$//;

Reply via email to