Update of /cvsroot/fink/fink/perlmod/Fink In directory sc8-pr-cvs17:/tmp/cvs-serv7106/perlmod/Fink
Modified Files: Services.pm Log Message: fix possible undefined hash key Index: Services.pm =================================================================== RCS file: /cvsroot/fink/fink/perlmod/Fink/Services.pm,v retrieving revision 1.216 retrieving revision 1.217 diff -u -d -r1.216 -r1.217 --- Services.pm 12 Jun 2007 19:14:33 -0000 1.216 +++ Services.pm 13 Jun 2007 06:05:06 -0000 1.217 @@ -1264,7 +1264,8 @@ sub gcc_select_arg { my $vers = shift; - return $gcc_select_table{$vers}; + return $gcc_select_table{$vers} if (exists $gcc_select_table{$vers} and defined $gcc_select_table{$vers}); + return undef; } } ------------------------------------------------------------------------- This SF.net email is sponsored by DB2 Express Download DB2 Express C - the FREE version of DB2 express and take control of your XML. No limits. Just data. Click to get it now. http://sourceforge.net/powerbar/db2/ _______________________________________________ Fink-commits mailing list Fink-commits@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/fink-commits