Changeset 3472845 for perlconfig.c
- Timestamp:
- Feb 11, 2011, 5:18:45 PM (14 years ago)
- Branches:
- master, release-1.10, release-1.8, release-1.9
- Children:
- 8a97586
- Parents:
- d4927a7
- git-author:
- Anders Kaseorg <andersk@mit.edu> (08/27/09 00:56:39)
- git-committer:
- Anders Kaseorg <andersk@mit.edu> (02/11/11 17:18:45)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perlconfig.c
rd4927a7 r3472845 150 150 utype = g_strdup(type); 151 151 utype[0] = toupper(type[0]); 152 blessas = owl_sprintf("BarnOwl::Message::%s", utype);152 blessas = g_strdup_printf("BarnOwl::Message::%s", utype); 153 153 154 154 hr = newRV_noinc((SV*)h); … … 240 240 n->z_multinotice = zstr("[zephyr created from perl]"); 241 241 n->z_num_other_fields = 0; 242 n->z_message = owl_sprintf("%s%c%s", owl_message_get_zsig(m), '\0', owl_message_get_body(m));242 n->z_message = g_strdup_printf("%s%c%s", owl_message_get_zsig(m), '\0', owl_message_get_body(m)); 243 243 n->z_message_len = strlen(owl_message_get_zsig(m)) + strlen(owl_message_get_body(m)) + 1; 244 244 } … … 404 404 /* Add the system lib path to @INC */ 405 405 inc = get_av("INC", 0); 406 path = owl_sprintf("%s/lib", owl_get_datadir());406 path = g_strdup_printf("%s/lib", owl_get_datadir()); 407 407 av_unshift(inc, 1); 408 408 av_store(inc, 0, owl_new_sv(path));
Note: See TracChangeset
for help on using the changeset viewer.