Mercurial > pidgin.yaz
view gaim2blt.pl @ 6033:22923270493f
[gaim-migrate @ 6483]
I put a colon in the wrong place in my sound pref ui cleanup earlier.
That's fixed.
Removed the pref to enable/disable ctrl+w for closing convo windows. It
hasn't worked since at least 0.63, and it's dumb.
Removed the use of the "f2 toggles timestamps?" preference. You actually
couldn't change this one via prefs anymore. It is also dumb.
Made f2 toggle timestamps globally again.
committer: Tailor Script <tailor@pidgin.im>
author | Mark Doliner <mark@kingant.net> |
---|---|
date | Sat, 05 Jul 2003 18:55:07 +0000 |
parents | 66bf7ecefedd |
children |
line wrap: on
line source
#!/usr/bin/perl -w # Original by Andy Harrison, # Rewrite by Decklin Foster, # Available under the GPL. package Gaim2Blt; use strict; use Getopt::Std; use vars qw(%opts $in_group); getopts('s:', \%opts); die "usage: $0 -s 'screen name' gaim.buddy\n" unless $opts{s}; print <<"EOF"; Config { version 1 } User { screenname "$opts{s}" } Buddy { list { EOF while (<>) { chomp; my ($type, $args) = split ' ', $_, 2; next unless $type; if ($type eq 'g') { print " }\n" if ($in_group); print qq( "$args" {\n); $in_group = 1; } elsif ($type eq 'b') { my ($buddy, $alias) = split /:/, $args; print qq( "$buddy"\n); } } print <<"EOF"; } } } EOF