Mercurial > pidgin.yaz
changeset 4050:9438d2e96cb1
[gaim-migrate @ 4259]
"you have two popus (GAIM::print) with one arg each when it really could be one
popup GAIM::print does except two arguments" -- Amiel Martin (agnosonga)
simple enough patch.
committer: Tailor Script <tailor@pidgin.im>
| author | Luke Schierer <lschiere@pidgin.im> |
|---|---|
| date | Fri, 06 Dec 2002 18:42:52 +0000 |
| parents | 198a5edcb1c5 |
| children | a5c49e9c6a53 |
| files | src/perl.c |
| diffstat | 1 files changed, 2 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/src/perl.c Thu Dec 05 20:38:07 2002 +0000 +++ b/src/perl.c Fri Dec 06 18:42:52 2002 +0000 @@ -417,8 +417,7 @@ "eval $strin;" "if($@){" /*" #something went wrong\n"*/ - "GAIM::print\"Errors loading file $f_name:\\n\";" - "GAIM::print\"$@\\n\";" + "GAIM::print(\"Errors loading file $f_name:\\n\",\"$@\");" "return 1;" "}" "return 0;" @@ -432,7 +431,7 @@ #else perl_parse(my_perl, xs_init, 3, perl_args, NULL); #endif -#ifndef HAVE_PERL_EVAL_PV + #ifdef HAVE_PERL_EVAL_PV eval_pv(perl_definitions, TRUE); #else perl_eval_pv(perl_definitions, TRUE); /* deprecated */