diff options
Diffstat (limited to 'contrib/issue-api-key.pl')
-rwxr-xr-x | contrib/issue-api-key.pl | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/contrib/issue-api-key.pl b/contrib/issue-api-key.pl deleted file mode 100755 index fe24f59df..000000000 --- a/contrib/issue-api-key.pl +++ /dev/null @@ -1,25 +0,0 @@ -#!/usr/bin/perl -w -use strict; -use feature 'say'; - -use FindBin qw( $RealBin ); -use lib "$RealBin/.."; -use lib "$RealBin/../lib"; - -use Bugzilla; -use Bugzilla::Constants; -use Bugzilla::User; -use Bugzilla::User::APIKey; - -Bugzilla->usage_mode(USAGE_MODE_CMDLINE); - -my $login = shift - or die "syntax: $0 bugzilla-login [description]\n"; -my $description = shift; - -my $user = Bugzilla::User->check({ name => $login }); -my $api_key = Bugzilla::User::APIKey->create({ - user_id => $user->id, - description => $description, -}); -say $api_key->api_key; |