X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;f=lib%2FJIRA.pm;h=c2966ba4176405311a544e7c9606bd272e585814;hb=10b78beac53843192f7da8a6dbaa2d5e0572b307;hp=b844ec5812b272251cf89b93c3f5543aeb103a75;hpb=fc0e2c7f3fce9e64608d0aa13399d62f24000784;p=clearscm.git

diff --git a/lib/JIRA.pm b/lib/JIRA.pm
index b844ec5..c2966ba 100644
--- a/lib/JIRA.pm
+++ b/lib/JIRA.pm
@@ -37,7 +37,6 @@ use warnings;
 use feature 'say';
 use experimental qw(signatures);
 
-use Display;
 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( { url => $opts{URL}, anonymous => 1 } );
+
     return bless \%opts, $class;
 }
 
@@ -200,6 +201,10 @@ Perl hash of the fields in the next JIRA issue
     return %{ $result->{issues}[0]{fields} };
 }    # getNextIssue
 
+sub status ($self) {
+    return $self->{rest}{rest}->responseCode();
+}
+
 sub getIssues ( $self, $condition, $start, $max, @fields ) {
 
 =pod