comparison src/perl.c @ 4227:a614423c648f

[gaim-migrate @ 4471] This is a patch from Nathan Walp that adds a "char server_alias[BUDDY_ALIAS_MAXLEN]" to struct buddy, and a preference option to show the server alias instead of the alias set by you. It shouldn't cause any problems. But then again, faceprint is a crazy patch writer, with an emphasis on crazy, if you know what I mean. Huh? Get it? "Crazy"? I kill me. But right after I kill Time Warner. committer: Tailor Script <tailor@pidgin.im>
author Mark Doliner <mark@kingant.net>
date Tue, 07 Jan 2003 17:44:34 +0000
parents 97003c0ef184
children cddb50734169
comparison
equal deleted inserted replaced
4226:a7d1eddc0afc 4227:a614423c648f
742 buddy = find_buddy(gc, SvPV(ST(1), junk)); 742 buddy = find_buddy(gc, SvPV(ST(1), junk));
743 743
744 if (!buddy) 744 if (!buddy)
745 XSRETURN(0); 745 XSRETURN(0);
746 XST_mPV(0, buddy->name); 746 XST_mPV(0, buddy->name);
747 XST_mPV(1, buddy->show); 747 XST_mPV(1, get_buddy_alias(buddy));
748 XST_mPV(2, buddy->present ? "Online" : "Offline"); 748 XST_mPV(2, buddy->present ? "Online" : "Offline");
749 XST_mIV(3, buddy->evil); 749 XST_mIV(3, buddy->evil);
750 XST_mIV(4, buddy->signon); 750 XST_mIV(4, buddy->signon);
751 XST_mIV(5, buddy->idle); 751 XST_mIV(5, buddy->idle);
752 XST_mIV(6, buddy->uc); 752 XST_mIV(6, buddy->uc);