Mercurial > pidgin.yaz

comparison libpurple/plugins/perl/common/Proxy.xs @ 29217:a158ef76d340

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
perl: Fix the package names for some types. Closes #10973. committer: Paul Aurich <paul@darkrain42.org>
author cafoote@yahoo.com
date Thu, 31 Dec 2009 05:32:08 +0000
parents 907f5f41e32a
children
comparison
equal deleted inserted replaced
29216:0c5995395579 29217:a158ef76d340
3 MODULE = Purple::Proxy PACKAGE = Purple::Proxy PREFIX = purple_proxy_ 3 MODULE = Purple::Proxy PACKAGE = Purple::Proxy PREFIX = purple_proxy_
4 PROTOTYPES: ENABLE 4 PROTOTYPES: ENABLE
5 5
6 BOOT: 6 BOOT:
7 { 7 {
8 HV *stash = gv_stashpv("Purple::ProxyType::", 1); 8 HV *stash = gv_stashpv("Purple::ProxyType", 1);
9 9
10 static const constiv *civ, const_iv[] = { 10 static const constiv *civ, const_iv[] = {
11 #define const_iv(name) {#name, (IV)PURPLE_PROXY_##name} 11 #define const_iv(name) {#name, (IV)PURPLE_PROXY_##name}
12 const_iv(USE_GLOBAL), 12 const_iv(USE_GLOBAL),
13 const_iv(NONE), 13 const_iv(NONE),