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
