Skip to content
Extraits de code Groupes Projets
Sélectionner une révision Git
  • 3a9072188a84493cfe696cd8f5bf5f1db0fec66f
  • develop par défaut protégée
  • upgrade-appservice
  • baguette-custom-fixes
  • fix-discord-reply-edited
  • update-readme-badges
6 résultats

metrics.ts

Blame
  • downloader.pm 861 o
    package sessions::downloader;
    
    use strict;
    use warnings;
    
    use POE;
    
    use lib "$FindBin::Bin/lib/";
    use utils::Logging;
    use sessions::downloader::ddl;
    
    my $log = Logging->new('STDOUT', 1);
    
    POE::Session->create(
        inline_states   => {
            _start          => \&on_start,
            ddl             => \&sessions::downloader::ddl::exec,
            filename        => \&sessions::downloader::ddl::filename,
            signal_filename => \&sessions::downloader::ddl::signal_filename,
            signal_ddl      => \&sessions::downloader::ddl::signal_ddl,
            signal_move     => \&sessions::downloader::ddl::signal_move,
            end_task        => \&sessions::downloader::ddl::end_task,
        },
    );
    
    
    sub on_start {
        my ($kernel, $heap) = @_[KERNEL, HEAP];
        $kernel->alias_set('downloader');
        $heap->{ddl}->{tasks} = [];
    
        $log->info("session started");
    }
    
    1;