Skip to content


Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

16 lines (14 sloc) 0.52 kb
# Copyright 2005 Interchange Development Group (
# Licensed under the GNU GPL v2. See file LICENSE for details.
# $Id: gpg_keys.widget,v 1.3 2005-09-11 23:46:39 docelic Exp $
CodeDef gpg_keys Widget 1
CodeDef gpg_keys Description GPG key selector
CodeDef gpg_keys Routine <<EOR
sub {
my ($opt) = @_;
$opt->{passed} = $Tag->get_gpg_keys();
$opt->{type} = delete $opt->{variant} || 'combo';
$opt->{filter} = 'nullselect' if $opt->{type} eq 'combo';
return Vend::Form::display($opt);
Jump to Line
Something went wrong with that request. Please try again.