Author: sparky
Date: Fri Oct  9 23:40:00 2009
New Revision: 10748

Modified:
   toys/rsget.pl/RSGet/ListAdder.pm
   toys/rsget.pl/RSGet/ListManager.pm
   toys/rsget.pl/RSGet/Main.pm
Log:
- fix


Modified: toys/rsget.pl/RSGet/ListAdder.pm
==============================================================================
--- toys/rsget.pl/RSGet/ListAdder.pm    (original)
+++ toys/rsget.pl/RSGet/ListAdder.pm    Fri Oct  9 23:40:00 2009
@@ -27,7 +27,7 @@
        my $lines = $self->{lines};
 
        my %list_uris;
-       foreach my $mcd ( @$act_clist ) {
+       foreach my $mcd ( @$RSGet::ListManager::act_clist ) {
                foreach my $ucd ( @$mcd ) {
                        my $uri = $ucd->[0];
                        $list_uris{ $uri } = 1;
@@ -164,7 +164,7 @@
 
        $self->{select_clone} = 1;
        my $lines = $self->{lines};
-       my $own_clist = [ @$act_clist ];
+       my $own_clist = [ @$RSGet::ListManager::act_clist ];
        my $active = 0;
 
        my $clone_select;

Modified: toys/rsget.pl/RSGet/ListManager.pm
==============================================================================
--- toys/rsget.pl/RSGet/ListManager.pm  (original)
+++ toys/rsget.pl/RSGet/ListManager.pm  Fri Oct  9 23:40:00 2009
@@ -208,7 +208,7 @@
        return $got_bad;
 }
 
-my $act_clist;
+our $act_clist;
 sub autoadd
 {
        my $getlist = shift;

Modified: toys/rsget.pl/RSGet/Main.pm
==============================================================================
--- toys/rsget.pl/RSGet/Main.pm (original)
+++ toys/rsget.pl/RSGet/Main.pm Fri Oct  9 23:40:00 2009
@@ -11,6 +11,7 @@
 use RSGet::Dispatch;
 use RSGet::FileList;
 use RSGet::Get;
+use RSGet::MortalObject;
 use RSGet::Line;
 use RSGet::ListManager;
 use RSGet::Processor;
@@ -221,6 +222,7 @@
                $lasttime = $time;
        
                RSGet::Wait::wait_update();
+               RSGet::MortalObject::update();
                RSGet::Captcha::captcha_update();
 
                my $getlist = RSGet::FileList::readlist();
_______________________________________________
pld-cvs-commit mailing list
[email protected]
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit

Reply via email to