/[pgp-tools]/trunk/caff/caff
ViewVC logotype

Diff of /trunk/caff/caff

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 273 by myon, Sun Apr 30 09:00:26 2006 UTC revision 274 by myon, Sun Apr 30 09:13:03 2006 UTC
# Line 4  Line 4 
4  # $Id$  # $Id$
5  #  #
6  # Copyright (c) 2004, 2005 Peter Palfrader <peter@palfrader.org>  # Copyright (c) 2004, 2005 Peter Palfrader <peter@palfrader.org>
7  # Copyright (c) 2005 Christoph Berg <cb@df7cb.de>  # Copyright (c) 2005, 2006 Christoph Berg <cb@df7cb.de>
8  #  #
9  # All rights reserved.  # All rights reserved.
10  #  #
# Line 635  my $KEYEDIT_KEYEDIT_OR_DELSIG_PROMPT = ' Line 635  my $KEYEDIT_KEYEDIT_OR_DELSIG_PROMPT = '
635  my $KEYEDIT_DELSUBKEY_PROMPT = '^\[GNUPG:\] GET_BOOL keyedit.remove.subkey';  my $KEYEDIT_DELSUBKEY_PROMPT = '^\[GNUPG:\] GET_BOOL keyedit.remove.subkey';
636    
637  load_config;  load_config;
638  my $USER_AGENT = "caff $VERSION - (c) 2004, 2005 Peter Palfrader et al.";  my $USER_AGENT = "caff $VERSION - http://pgp-tools.alioth.debian.org/";
639    
640  my $KEYSBASE =  $CONFIG{'caffhome'}.'/keys';  my $KEYSBASE =  $CONFIG{'caffhome'}.'/keys';
641  my $GNUPGHOME = $CONFIG{'caffhome'}.'/gnupghome';  my $GNUPGHOME = $CONFIG{'caffhome'}.'/gnupghome';
# Line 650  my $DATE_STRING = sprintf("%04d-%02d-%02 Line 650  my $DATE_STRING = sprintf("%04d-%02d-%02
650    
651  sub version($) {  sub version($) {
652          my ($fd) = @_;          my ($fd) = @_;
653          print $fd "caff $VERSION - (c) 2004, 2005 Peter Palfrader et al.\n";          print $fd "caff $VERSION - (c) 2004, 2005, 2006 Peter Palfrader et al.\n";
654  };  };
655    
656  sub usage($$) {  sub usage($$) {
Legend:
Removed from v.273  
changed lines
  Added in v.274
  ViewVC Help
Powered by ViewVC 1.1.5