diff options
| author | Timo Sirainen <cras@irssi.org> | 2002-01-27 20:45:59 +0000 |
|---|---|---|
| committer | cras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2002-01-27 20:45:59 +0000 |
| commit | f4897860b50e2d1cc3b97a00d1f5a2e9e9c04faa (patch) | |
| tree | a9d1400865e53ac8e5b68ca37b1cb9d081bd8467 /src/perl/perl-core.c | |
| parent | 820c9d3d8288c8d6dfb3172750bc26adea76f66c (diff) | |
| download | irssi-f4897860b50e2d1cc3b97a00d1f5a2e9e9c04faa.zip | |
toupper(), tolower(), isspace(), is..etc..() aren't safe with chars in some
systems, use our own is_...() functions now instead.
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2348 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/perl-core.c')
| -rw-r--r-- | src/perl/perl-core.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/perl/perl-core.c b/src/perl/perl-core.c index 966c9b4f..d1063682 100644 --- a/src/perl/perl-core.c +++ b/src/perl/perl-core.c @@ -178,7 +178,7 @@ void script_fix_name(char *name) if (p != NULL) *p = '\0'; while (*name != '\0') { - if (*name != '_' && !isalnum(*name)) + if (*name != '_' && !i_isalnum(*name)) *name = '_'; name++; } |