comparison: libpurple/plugins/perl/perl-common.c
libpurple/plugins/perl/perl-common.c
- branch
- string-comparison-r2
- changeset 38259
- c593fc9f5438
- parent 38258
- 9a6551eba09c
equal
deleted
inserted
replaced
| 38258:9a6551eba09c | 38259:c593fc9f5438 |
|---|---|
| 221 } else | 221 } else |
| 222 ret_value = POPi; | 222 ret_value = POPi; |
| 223 | 223 |
| 224 /* Check for changed arguments */ | 224 /* Check for changed arguments */ |
| 225 for (i = 0; i < argc; i++) { | 225 for (i = 0; i < argc; i++) { |
| 226 if (args[i] && strcmp(args[i], SvPVX(sv_args[i]))) { | 226 if (args[i] && !purple_strequal(args[i], SvPVX(sv_args[i]))) { |
| 227 /* | 227 /* |
| 228 * Shizzel. So the perl script changed one of the parameters, | 228 * Shizzel. So the perl script changed one of the parameters, |
| 229 * and we want this change to affect the original parameters. | 229 * and we want this change to affect the original parameters. |
| 230 * args[i] is just a temporary little list of pointers. We don't | 230 * args[i] is just a temporary little list of pointers. We don't |
| 231 * want to free args[i] here because the new parameter doesn't | 231 * want to free args[i] here because the new parameter doesn't |
