# HG changeset patch # User heiko # Date 1154435150 0 # Node ID a69ac45de2f00f2a7d5ecda368d301f8fa8a9044 # Parent b1954e2f261c453193060506f32596f3b66dfae6 Bessere --help und auch die Zeile mit der Info, wie viel aktualisiert wurde. diff -r b1954e2f261c -r a69ac45de2f0 debian/changelog --- a/debian/changelog Tue Aug 01 08:06:36 2006 +0000 +++ b/debian/changelog Tue Aug 01 12:25:50 2006 +0000 @@ -1,3 +1,9 @@ +logbuch (0.17-1) stable; urgency=low + + * --help geht jetzt besser + + -- Heiko Schlittermann Tue, 01 Aug 2006 09:36:13 +0200 + logbuch (0.16-1) stable; urgency=low * new upstream for stable diff -r b1954e2f261c -r a69ac45de2f0 debian/control --- a/debian/control Tue Aug 01 08:06:36 2006 +0000 +++ b/debian/control Tue Aug 01 12:25:50 2006 +0000 @@ -6,7 +6,7 @@ Standards-Version: 3.5.2 Package: logbuch -Architecture: any +Architecture: all Depends: ${perl:Depends}, libdbi-perl, libdbd-mysql-perl, libmailtools-perl Description: Logbuch for server maintainance diff -r b1954e2f261c -r a69ac45de2f0 log.pl --- a/log.pl Tue Aug 01 08:06:36 2006 +0000 +++ b/log.pl Tue Aug 01 12:25:50 2006 +0000 @@ -6,10 +6,12 @@ --[no]db insert into log database [$opt_db] --[no]mail send mails to @config::mailto [$opt_mail] --message=s message - if the message looks like a file name (e.g.: - ./text or /tmp/text, the message is read - from this file) - + - if the message looks like a file name (e.g.: + ./text or /tmp/text, the message is read + from this file) + - if message is 'upgrade:' or + 'dist-upgrade:', the file is parsed as apt + output # use strict; @@ -78,7 +80,7 @@ } elsif ($opt_message =~ /^((?:dist-)?upgrade):(.*)/) { open(I, $2) or die "Can't open $2: $!\n"; $opt_message = "$1\n" - . join "", grep /^(?:Inst|Conf|Remv)/, ; + . join "", grep /^(?:\d|Inst|Conf|Remv)/, ; die $opt_message; }