Update of /cvsroot/fink/fink/perlmod/Fink In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv20841/perlmod/Fink
Modified Files: ChangeLog Engine.pm Log Message: Implement 'cleanup --dpkg-status', add --dry-run mode to its back-end script. Index: Engine.pm =================================================================== RCS file: /cvsroot/fink/fink/perlmod/Fink/Engine.pm,v retrieving revision 1.375 retrieving revision 1.376 diff -u -d -r1.375 -r1.376 --- Engine.pm 23 Jun 2006 19:33:28 -0000 1.375 +++ Engine.pm 10 Jul 2006 20:03:52 -0000 1.376 @@ -1021,13 +1021,13 @@ my(%opts, %modes); get_options('cleanup', [ - [ 'sources|srcs' => \$modes{srcs}, "Delete source files." ], [ 'debs' => \$modes{debs}, "Delete .deb (compiled binary package) files." ], + [ 'sources|srcs' => \$modes{srcs}, "Delete source files." ], [ 'buildlocks|bl' => \$modes{bl}, "Delete stale buildlock packages." ], + [ 'dpkg-status' => \$modes{dpkg}, + "Remove uninstalled packages from dpkg status database." ], # [ 'obsoletes' => \$modes{obs}, "Uninstall obsolete packages." ], -# [ 'dpkg-status' => \$modes{dpkg_status}, -# "Remove uninstalled packages from dpkg status database." ], [ 'keep-src|k' => \$opts{keep_old}, "Move old source files to $basepath/src/old/ instead of deleting them." ], [ 'dry-run|d' => \$opts{dryrun}, @@ -1035,7 +1035,7 @@ ], [EMAIL PROTECTED], helpformat => <<HELPFORMAT, %intro{[mode(s) and options]} One or more of the following modes must be specified: -%opts{sources,debs,buildlocks} +%opts{sources,debs,buildlocks,dpkg-status} Options: %opts{keep-src,dry-run,help} @@ -1432,8 +1432,10 @@ sub cleanup_dpkg_status { my %opts = (dryrun => 0, @_); - print "cleanup --dpkg is not yet available.\n"; - return 1; + my $cmd = $basepath . '/sbin/fink-dpkg-status-cleanup'; + $cmd .= ' --dry-run' if $opts{dryrun}; + + return &execute($cmd, ignore_INT=>1); } =back Index: ChangeLog =================================================================== RCS file: /cvsroot/fink/fink/perlmod/Fink/ChangeLog,v retrieving revision 1.1341 retrieving revision 1.1342 diff -u -d -r1.1341 -r1.1342 --- ChangeLog 29 Jun 2006 13:46:29 -0000 1.1341 +++ ChangeLog 10 Jul 2006 20:03:52 -0000 1.1342 @@ -1,3 +1,7 @@ +2006-07-10 Daniel Macks <[EMAIL PROTECTED]> + + * Engine.pm: Enable 'cleanup --dpkg-status' + 2006-06-29 Dave Morrison <[EMAIL PROTECTED]> * Bootstrap.pm: modify &additional_packages to match the changes in ------------------------------------------------------------------------- Using Tomcat but need to do more? Need to support web services, security? Get stuff done quickly with pre-integrated technology to make your job easier Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642 _______________________________________________ Fink-commits mailing list Fink-commits@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/fink-commits