pidgin/plugins/perl/common/GtkDialogs.xs

Sat, 28 Apr 2007 02:33:40 +0000

author
Luke Schierer <lschiere@pidgin.im>
date
Sat, 28 Apr 2007 02:33:40 +0000
changeset 16621
616dc666cfb8
parent 16276
8853d1da70f5
child 18068
b6554e3c8224
child 19474
b60de9a13f23
child 19732
f08436883bb1
permissions
-rw-r--r--

Quoth Charkins:
This patch has two changes:

"This patch has two changes:

First is to slightly change the re-creation behavior of the docklet. Sadrul pointed out on gaim-devel that the x11 docklet re-creates itself when it is destroyed and thought this might be causing problems with fluxbox. This patch now distinguishes between initial creation and re-creation. When re-creating, the docklet no longer registers itself as a visibility manager until it successfully embeds.

Second is to change the timeout behavior for embedding. Because the notification area API is asynchronous, gaim assumes the docklet gets embeded for a certain timeout period, allowing the buddy list to start hidden before the docklet has been embeded in the notification area. If the timeout occurs, it is removed as a visibility manager and the buddy list will become visible. This timeout has been set at 5 seconds. There have been a few reports that indicate this timeout period is not long enough when starting gaim from a saved session upon login. I have been hesitant to increase the timeout, as it has the potential of delaying the startup of gaim for the timeout period if the buddy list was hidden when gaim last closed and there is not currently a notification area available. This patch makes the x11 docklet track whether it was successfully embedded and uses a longer timeout (15 seconds in this patch) only if it successfully embedded on the previous execution. Otherwise, it uses the shorter 5 second timeout. "

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::Dialogs PACKAGE = Pidgin::Dialogs PREFIX = pidgin_dialogs_
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_dialogs_destroy_all()
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 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
10 pidgin_dialogs_about()
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_dialogs_im()
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_dialogs_im_with_user(account, username)
15899
75f0041f72b8 Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents: 15590
diff changeset
17 Purple::Account account
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
18 const char * username
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_dialogs_info()
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
22
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
23 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
24 pidgin_dialogs_log()
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
25
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
26 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
27 pidgin_dialogs_alias_contact(contact)
15899
75f0041f72b8 Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents: 15590
diff changeset
28 Purple::BuddyList::Contact contact
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
29
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
30 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
31 pidgin_dialogs_alias_buddy(buddy)
15899
75f0041f72b8 Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents: 15590
diff changeset
32 Purple::BuddyList::Buddy buddy
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
33
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
34 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
35 pidgin_dialogs_alias_chat(chat)
15899
75f0041f72b8 Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents: 15590
diff changeset
36 Purple::BuddyList::Chat chat
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
37
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
38 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
39 pidgin_dialogs_remove_buddy(buddy)
15899
75f0041f72b8 Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents: 15590
diff changeset
40 Purple::BuddyList::Buddy buddy
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
41
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
42 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
43 pidgin_dialogs_remove_group(group)
15899
75f0041f72b8 Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents: 15590
diff changeset
44 Purple::BuddyList::Group group
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
45
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
46 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
47 pidgin_dialogs_remove_chat(chat)
15899
75f0041f72b8 Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents: 15590
diff changeset
48 Purple::BuddyList::Chat chat
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
49
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
50 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
51 pidgin_dialogs_remove_contact(contact)
15899
75f0041f72b8 Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents: 15590
diff changeset
52 Purple::BuddyList::Contact contact

mercurial