diff options
| author | Jesse Luehrs <doy@tozt.net> | 2015-03-29 22:59:33 -0400 |
|---|---|---|
| committer | Jesse Luehrs <doy@tozt.net> | 2015-03-29 22:59:33 -0400 |
| commit | 0380d9b2eba7f8afaa46cab49b6749ce8c908a6f (patch) | |
| tree | f5a689c56067a79c42240eb8e5ee4be3f7e074ba | |
| parent | e47a3e131aeed469a1d74a4ce9f1c3a48fef3e82 (diff) | |
| download | www-pocket-0380d9b2eba7f8afaa46cab49b6749ce8c908a6f.tar.gz www-pocket-0380d9b2eba7f8afaa46cab49b6749ce8c908a6f.zip | |
a couple more default options
| -rw-r--r-- | lib/WWW/Pocket/Script.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/WWW/Pocket/Script.pm b/lib/WWW/Pocket/Script.pm index 253a88e..eeac8d0 100644 --- a/lib/WWW/Pocket/Script.pm +++ b/lib/WWW/Pocket/Script.pm @@ -103,6 +103,8 @@ sub _parse_retrieve_options { return ( { ($archive ? (state => $archive) : ()), + sort => 'oldest', + detailType => 'simple', }, [ @argv ], ); @@ -119,7 +121,7 @@ sub _retrieve_urls { return map { $_->{resolved_url} } sort { - $b->{sort_id} <=> $a->{sort_id} + $a->{sort_id} <=> $b->{sort_id} } values %{ $response->{list} }; } |