Mercurial > pidgin

diff src/perl.c @ 805:2f0655e185b8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[gaim-migrate @ 815] this would be a good check committer: Tailor Script <tailor@pidgin.im>
author Eric Warmenhoven <eric@warmenhoven.org>
date Thu, 31 Aug 2000 01:07:39 +0000
parents 022048cde898
children 67bdecdecbb7
line wrap: on
line diff
--- a/src/perl.c	Thu Aug 31 00:25:25 2000 +0000
+++ b/src/perl.c	Thu Aug 31 01:07:39 2000 +0000
@@ -150,6 +150,7 @@
 	if (!filename[0]) return 0;
 	len = strlen(filename);
 	len -= 3;
+	if (len < 0) return 0;
 	return (!strncmp(filename + len, ".pl", 3));
 }