projects
/
clearscm.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Rsync Mikey & Kent
[clearscm.git]
/
lib
/
JIRA.pm
diff --git
a/lib/JIRA.pm
b/lib/JIRA.pm
index
b844ec5
..
c2966ba
100644
(file)
--- a/
lib/JIRA.pm
+++ b/
lib/JIRA.pm
@@
-37,7
+37,6
@@
use warnings;
use feature 'say';
use experimental qw(signatures);
use feature 'say';
use experimental qw(signatures);
-use Display;
use Carp;
use JIRA::REST;
use Carp;
use JIRA::REST;
@@
-97,6
+96,8
@@
JIRA Object
$opts{rest} = JIRA::REST->new( $opts{URL}, $opts{username}, $opts{password} );
$opts{rest} = JIRA::REST->new( $opts{URL}, $opts{username}, $opts{password} );
+ #$opts{rest} = JIRA::REST->new( { url => $opts{URL}, anonymous => 1 } );
+
return bless \%opts, $class;
}
return bless \%opts, $class;
}
@@
-200,6
+201,10
@@
Perl hash of the fields in the next JIRA issue
return %{ $result->{issues}[0]{fields} };
} # getNextIssue
return %{ $result->{issues}[0]{fields} };
} # getNextIssue
+sub status ($self) {
+ return $self->{rest}{rest}->responseCode();
+}
+
sub getIssues ( $self, $condition, $start, $max, @fields ) {
=pod
sub getIssues ( $self, $condition, $start, $max, @fields ) {
=pod