pidgin/plugins/perl/common/GtkThemes.xs

Wed, 27 Apr 2016 09:19:58 +0200

author
Jakub Adam <jakub.adam@ktknet.cz>
date
Wed, 27 Apr 2016 09:19:58 +0200
branch
release-2.x.y
changeset 37650
f827e56eea34
parent 16276
8853d1da70f5
child 18068
b6554e3c8224
child 35312
add13288757e
permissions
-rw-r--r--

media: don't keep last sample reference on sinks

Holding a reference to a GstBuffer somewhere in a pipeline for possibly
indefinite period may cause trouble when the buffer has been allocated
by a 3rd party library or when it points directly into memory region of
a hardware device.

A specific example is V4L2 source element, which won't allow webcam
image resolution be reconfigured unless all previously allocated buffers
have been freed.

Backport of Pidgin 3 commit 13807c514810.

14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
1 #include "gtkmodule.h"
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
2
16276
8853d1da70f5 Rename a number of Perl functions which were munged at some point
Warren Togami Jr. <warren@togami.com>
parents: 15899
diff changeset
3 MODULE = Pidgin::Themes PACKAGE = Pidgin::Themes PREFIX = pidgin_themes_
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
4 PROTOTYPES: ENABLE
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
5
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
6 void
16276
8853d1da70f5 Rename a number of Perl functions which were munged at some point
Warren Togami Jr. <warren@togami.com>
parents: 15899
diff changeset
7 pidgin_themes_init()
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
8
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
9 gboolean
16276
8853d1da70f5 Rename a number of Perl functions which were munged at some point
Warren Togami Jr. <warren@togami.com>
parents: 15899
diff changeset
10 pidgin_themes_smileys_disabled()
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
11
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
12 void
16276
8853d1da70f5 Rename a number of Perl functions which were munged at some point
Warren Togami Jr. <warren@togami.com>
parents: 15899
diff changeset
13 pidgin_themes_smiley_theme_probe()
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
14
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
15 void
16276
8853d1da70f5 Rename a number of Perl functions which were munged at some point
Warren Togami Jr. <warren@togami.com>
parents: 15899
diff changeset
16 pidgin_themes_load_smiley_theme(file, load)
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
17 const char * file
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
18 gboolean load
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
19
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
20 void
16276
8853d1da70f5 Rename a number of Perl functions which were munged at some point
Warren Togami Jr. <warren@togami.com>
parents: 15899
diff changeset
21 pidgin_themes_get_proto_smileys(id)
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
22 const char * id
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
23 PREINIT:
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
24 GSList *l;
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
25 PPCODE:
16276
8853d1da70f5 Rename a number of Perl functions which were munged at some point
Warren Togami Jr. <warren@togami.com>
parents: 15899
diff changeset
26 for (l = pidgin_themes_get_proto_smileys(id); l != NULL; l = l->next) {
15899
75f0041f72b8 Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents: 15590
diff changeset
27 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Pidgin::IMHtml::Smiley")));
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
28 }

mercurial