Mercurial > pidgin.yaz

comparison doc/PERL-HOWTO.dox @ 27348:77dfed554b2b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Clarify that Purple::Prefs::add_none() really is necessary
author Paul Aurich <paul@darkrain42.org>
date Sat, 04 Jul 2009 03:08:10 +0000
parents 1414e0e01dc5
children 36379bf98ed6
comparison
equal deleted inserted replaced
27347:5afc3577b8cd 27348:77dfed554b2b
321 321
322 @code 322 @code
323 sub plugin_load { 323 sub plugin_load {
324 my $plugin = shift; 324 my $plugin = shift;
325 325
326 # This is necessary to create each level in the preferences tree.
327 Purple::Prefs::add_none("/plugins/core/perl_test");
326 # Here we are adding a set of preferences 328 # Here we are adding a set of preferences
327 # The second argument is the default value for the preference. 329 # The second argument is the default value for the preference.
328 Purple::Prefs::add_none("/plugins/core/perl_test");
329 Purple::Prefs::add_bool("/plugins/core/perl_test/bool", 1); 330 Purple::Prefs::add_bool("/plugins/core/perl_test/bool", 1);
330 Purple::Prefs::add_string("/plugins/core/perl_test/choice_str", "ch1"); 331 Purple::Prefs::add_string("/plugins/core/perl_test/choice_str", "ch1");
331 Purple::Prefs::add_int("/plugins/core/perl_test/choice_int", 1); 332 Purple::Prefs::add_int("/plugins/core/perl_test/choice_int", 1);
332 Purple::Prefs::add_string("/plugins/core/perl_test/text", "Foobar"); 333 Purple::Prefs::add_string("/plugins/core/perl_test/text", "Foobar");
333 } 334 }