diff options
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 bb658714..6db94e2b 100644 --- a/src/perl/perl-core.c +++ b/src/perl/perl-core.c @@ -202,7 +202,7 @@ static char *script_data_get_name(void) name = g_string_new(NULL); n = 1; do { - g_string_sprintf(name, "data%d", n); + g_string_printf(name, "data%d", n); n++; } while (perl_script_find(name->str) != NULL); |