Update of /cvsroot/fink/fink/perlmod/Fink
In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv13789/perlmod/Fink

Modified Files:
      Tag: branch_0_27
        ChangeLog Engine.pm 
Log Message:
revert OldIndexes stuff

Index: Engine.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/Engine.pm,v
retrieving revision 1.398
retrieving revision 1.398.4.1
diff -u -d -r1.398 -r1.398.4.1
--- Engine.pm   15 Feb 2007 23:04:26 -0000      1.398
+++ Engine.pm   19 Mar 2007 16:58:02 -0000      1.398.4.1
@@ -1607,31 +1607,6 @@
                {
                        warn "unable to open $basepath/fink/dists: $!";
                }
-
-
-               if (not -f $cache_file or (-M $cache_file > 14)) {
-                       my $oldindexes = 
lc(Fink::Config::get_option("OldIndexes", "warn"));
-                       if ($oldindexes !~ /^(ignore|update|warn)$/) {
-                               $oldindexes = 'warn';
-                               print_breaking_stderr "WARNING: unknown value 
for 'OldIndexes' in fink.conf: $oldindexes";
-                       }
-       
-                       my $up_to_date_text;
-                       if (-f $cache_file)
-                       {
-                               $up_to_date_text = "WARNING: your info file 
index has not been updated for " . int(-M $cache_file) . " days.";
-                       } else {
-                               $up_to_date_text = "WARNING: your info file 
index does not exist.";
-                       }
-       
-                       if ($oldindexes eq "warn") {
-                               print_breaking_stderr $up_to_date_text . "  You 
should run 'fink selfupdate' to get the latest package descriptions.\n";
-                       } elsif ($oldindexes eq "update") {
-                               print_breaking_stderr $up_to_date_text . "  
Fink will now update it automatically.";
-                               require Fink::SelfUpdate;
-                               Fink::SelfUpdate::check();
-                       }
-               }
        }
 
        # add requested packages

Index: ChangeLog
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/ChangeLog,v
retrieving revision 1.1441.2.2
retrieving revision 1.1441.2.3
diff -u -d -r1.1441.2.2 -r1.1441.2.3
--- ChangeLog   17 Mar 2007 20:48:55 -0000      1.1441.2.2
+++ ChangeLog   19 Mar 2007 16:58:01 -0000      1.1441.2.3
@@ -1,3 +1,8 @@
+2007-03-19  Benjamin Reed  <[EMAIL PROTECTED]>
+
+       * Engine.pm: revert the OldIndexes behavior, this is something
+       better worked on with dmacks' SelfUpdate refactor
+
 2007-03-17  Dave Morrison  <[EMAIL PROTECTED]>
 
        * PkgVersion.pm: modify an error message


-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys-and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
Fink-commits mailing list
Fink-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/fink-commits

Reply via email to