diff: src/perl.c
src/perl.c
- changeset 4227
- 5f98b16ed21c
- parent 4088
- 46aa52e36e9f
- child 4298
- af01cbb94efe
--- a/src/perl.c Tue Jan 07 16:18:08 2003 +0000 +++ b/src/perl.c Tue Jan 07 17:44:34 2003 +0000 @@ -744,7 +744,7 @@ if (!buddy) XSRETURN(0); XST_mPV(0, buddy->name); - XST_mPV(1, buddy->show); + XST_mPV(1, get_buddy_alias(buddy)); XST_mPV(2, buddy->present ? "Online" : "Offline"); XST_mIV(3, buddy->evil); XST_mIV(4, buddy->signon);
