projects
/
ILL-Zotero-RT
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
d9289d0
)
use zotero_UserID for database name
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Fri, 27 Jul 2012 21:22:40 +0000
(23:22 +0200)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Fri, 27 Jul 2012 21:22:40 +0000
(23:22 +0200)
zotero.pl
patch
|
blob
|
history
diff --git
a/zotero.pl
b/zotero.pl
index
efbf468
..
23cdd9a
100755
(executable)
--- a/
zotero.pl
+++ b/
zotero.pl
@@
-16,8
+16,8
@@
my $key = $ENV{key} || die "key required";
my $FETCH = $ENV{FETCH} || 0;
my $FETCH = $ENV{FETCH} || 0;
-my $db = CouchDB->new('10.60.0.9
5
', 5984);
-eval { $db->put("z_$UserID") }; # create user database
+my $db = CouchDB->new('10.60.0.9
2
', 5984);
+eval { $db->put("z
otero
_$UserID") }; # create user database
my $url = "https://api.zotero.org/users/$UserID/items?format=atom&content=json&order=dateModified&sort=desc";
my $url = "https://api.zotero.org/users/$UserID/items?format=atom&content=json&order=dateModified&sort=desc";
@@
-91,17
+91,17
@@
foreach my $entry ( keys %{ $feed->{entry} } ) {
my $json_md5 = md5_hex encode_json $item;
$item->{json_md5} = $json_md5;
my $json_md5 = md5_hex encode_json $item;
$item->{json_md5} = $json_md5;
- if ( my $old_item = eval { $db->get( "z_$UserID/$id" ) } ) {
+ if ( my $old_item = eval { $db->get( "z
otero
_$UserID/$id" ) } ) {
warn "# old_item ",dump($old_item);
if ( $old_item->{zapi}->{etag} ne $item->{zapi}->{etag} || $json_md5 ne $old_item->{json_md5} ) {
$item->{_rev} = $old_item->{_rev};
warn "# old_item ",dump($old_item);
if ( $old_item->{zapi}->{etag} ne $item->{zapi}->{etag} || $json_md5 ne $old_item->{json_md5} ) {
$item->{_rev} = $old_item->{_rev};
- $db->put( "z_$UserID/$id" => $item );
+ $db->put( "z
otero
_$UserID/$id" => $item );
} else {
warn "# unchanged";
}
} else {
} else {
warn "# unchanged";
}
} else {
- $db->put( "z_$UserID/$id" => $item );
+ $db->put( "z
otero
_$UserID/$id" => $item );
}
}
}
}