Changeset 8a54409 for perlglue.xs


Ignore:
Timestamp:
Oct 10, 2003, 7:42:29 PM (21 years ago)
Author:
James M. Kretchmar <kretch@mit.edu>
Branches:
master, barnowl_perlaim, debian, owl, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
Children:
257a22f
Parents:
fe6f1d3
Message:
Small fixes to keep zephyrless build working
Increased size of screenname field in buddy listing
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perlglue.xs

    rf1e629d r8a54409  
    11static const char fileIdent[] = "$Id$";
    22
     3#ifdef HAVE_LIBZEPHYR
    34#include <zephyr/zephyr.h>
     5#endif
    46#include <EXTERN.h>
    57#include <perl.h>
     
    4547zephyr_getrealm()
    4648        CODE:
    47                 RETVAL = ZGetRealm();
     49                RETVAL = owl_zephyr_get_realm();
    4850        OUTPUT:
    4951                RETVAL
     
    5254zephyr_getsender()
    5355        CODE:
    54                 RETVAL = ZGetSender();
     56                RETVAL = owl_zephyr_get_sender();
    5557        OUTPUT:
    5658                RETVAL
Note: See TracChangeset for help on using the changeset viewer.