Changeset 4351b0c in lab.git for Dev/github

Timestamp:

Aug 21, 2013 6:59:25 PM (11 years ago)

Author:

Ken-ichi Mito <mitty@…>

Branches:

master

Children:

29f6915b

Parents:

13e2400

Message:

use access_token

• note: 'e72e16c7e42f292c6912e7710c838347ae178b4a' is a dummy
  • ​http://developer.github.com/v3/oauth/

Location:

Dev/github

Files:

• GitHubBackup.pm (modified) (2 diffs)
• github-backup.pl (modified) (1 diff)

Dev/github/GitHubBackup.pm

@@ -36 +36 @@
     my %parameters = @_;
     
+    if ($self->access_token) {
+        $parameters{access_token} = $self->access_token;
+    }
     my $parameters = '';
     while (my($key, $value) = each %parameters) {
@@ -146 +149 @@
     
     my $account = $self->account or croak "account is not set";
+    my $token = ($self->access_token) ? "?access_token=" . $self->access_token : '';
     my $result;
     if (my $repository = $self->repository) {
-        $result = [ $self->api->json_api("/repos/$account/$repository") ];
+        $result = [ $self->api->json_api("/repos/$account/$repository$token") ];
     }
     else {

Dev/github/github-backup.pl

@@ -11 +11 @@
     repository => 'munin-plugins',
     directory => 'repos',
+    access_token => 'e72e16c7e42f292c6912e7710c838347ae178b4a',
 );