Commit 83acd31c authored by Eskild Hustvedt's avatar Eskild Hustvedt
Browse files

Added gpodder.net debugging messages

parent ed2d0a57
......@@ -1271,6 +1271,7 @@ sub InitGlobalConfig
# Upgrades the config to include the gpodder.net options, if needed
if (!defined $Config{gpodderNetUser})
{
printd('Upgraded config for gpodder.net options'."\n");
$Config{gpodderNetUser} = '';
$Config{gpodderNetPassword} = '';
WriteGPConfig();
......@@ -1663,9 +1664,11 @@ sub goldenpodGpodderNetAction
if ($action eq 'remove' || $action eq 'add')
{
my $feed = shift;
my $change = {
$action => [ shift ]
$action => [ $feed ]
};
printd('gpodder.net: '.$action.' '.$feed."\n");
my $res = $gpodder->uploadChangedSubscriptions( $change );
# FIXME: It returns a list of URLs that it wants us to update. We need
# to handle these.
......@@ -1683,12 +1686,14 @@ sub goldenpodGpodderNetAction
push(@allNormal,$feed->{podcast});
}
}
printd('gpodder.net: pushing all subscriptions'."\n");
$gpodder->uploadSubscriptions(
@allNormal
);
}
elsif ($action eq 'sync')
{
printd('gpodder.net: downloading subscriptions'."\n");
my $changes = $gpodder->getChangedSubscriptions();
if(defined $changes->{add})
{
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment