package Crypt::OpenPGP::Key::Public;
use strict;
use Crypt::OpenPGP::Key;
use Crypt::OpenPGP::ErrorHandler;
use base qw( Crypt::OpenPGP::Key Crypt::OpenPGP::ErrorHandler );
sub all_props { $_[0]->public_props }
sub is_secret { 0 }
sub public_key { $_[0] }
1;