Changeset d51047d in lab.git for Dev/github/GitHubBackup.pm

Timestamp:

Aug 21, 2013 9:38:29 AM (11 years ago)

Author:

Ken-ichi Mito <mitty@…>

Branches:

master

Children:

c5b427c

Parents:

49aca65

git-author:

Ken-ichi Mito <mitty@…> (08/21/13 09:37:11)

git-committer:

Ken-ichi Mito <mitty@…> (08/21/13 09:38:29)

Message:

utils::get returns '[]' while json_api gives no results

• GitHubBackup->repos gives '[]' if no repositories

File:

• Dev/github/GitHubBackup.pm (modified) (2 diffs)

Dev/github/GitHubBackup.pm

@@ -33 +33 @@
     
     my $page = 1;
-    my $data;
+    my $data = [];
     while(1) {
         my $result = json_api("$url?per_page=100&page=$page$parameters");
@@ -103 +103 @@
     my $self = shift;
     return $self->{repos} if ($self->{repos});
+    
+    $self->{repos} = [];
     
     my $account = $self->account or croak "account is not set";