Changeset 374089a for perlglue.xs


Ignore:
Timestamp:
Jan 12, 2013, 7:07:34 PM (9 years ago)
Author:
Jason Gross <jgross@mit.edu>
Branches:
master
Children:
c068c03
Parents:
d72ba1e
git-author:
Jason Gross <jgross@mit.edu> (01/12/13 15:42:56)
git-committer:
Jason Gross <jgross@mit.edu> (01/12/13 19:07:34)
Message:
Die on a failed zephyr_zwrite; don't silently ignore it
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perlglue.xs

    rb303ba2 r374089a  
    9696                RETVAL
    9797
    98 void
    99 zephyr_zwrite(cmd,msg)
    100         const char *cmd
    101         const char *msg
    102         PREINIT:
    103                 int i;
    104         CODE:
    105                 i = owl_zwrite_create_and_send_from_line(cmd, msg);
    106 
    10798const utf8 *
    10899ztext_stylestrip(ztext)
     
    475466        }
    476467
     468int
     469zephyr_zwrite(cmd,msg)
     470        const char *cmd
     471        const char *msg
     472        CODE:
     473                RETVAL = owl_zwrite_create_and_send_from_line(cmd, msg);
     474        OUTPUT:
     475                RETVAL
     476
    477477MODULE = BarnOwl                PACKAGE = BarnOwl::Editwin
    478478
Note: See TracChangeset for help on using the changeset viewer.