[gaim-migrate @ 8794]

Tue, 13 Jan 2004 16:05:38 +0000

author
Daniel Atallah <datallah@pidgin.im>
date
Tue, 13 Jan 2004 16:05:38 +0000
changeset 8095
26d841bb3d61
parent 8094
62b4fc53cb04
child 8096
306a66d5171a

[gaim-migrate @ 8794]
"It was reported in #gaim yesterday that errors occurred when trying to
load
a perl plugin containing a '-' char in the filename. It turns out that the
code for cleaning up to filename in order for it to become part of the
package name had a little bug." --Daniel Atallah

committer: Luke Schierer <lschiere@pidgin.im>

plugins/perl/perl.c file | annotate | diff | comparison | revisions
--- a/plugins/perl/perl.c	Tue Jan 13 13:54:38 2004 +0000
+++ b/plugins/perl/perl.c	Tue Jan 13 16:05:38 2004 +0000
@@ -227,7 +227,7 @@
 
 	for (c = name; *c != '\0'; c++)
 	{
-		if (*c == '_' && !g_ascii_isalnum(*c))
+		if (*c != '_' && !g_ascii_isalnum(*c))
 			*c = '_';
 	}
 }

mercurial