pork/trunk/perl-5.36.patch

   1 diff -upr pork-0.99.8.1.orig/src/pork_perl_xs.c pork-0.99.8.1/src/pork_perl_xs.c
   2 --- pork-0.99.8.1.orig/src/pork_perl_xs.c       2005-04-29 03:43:53.000000000 +0300
   3 +++ pork-0.99.8.1/src/pork_perl_xs.c    2022-05-30 19:44:04.119927388 +0300
   4 @@ -776,7 +776,7 @@ XS(PORK_send_msg) {
   5         if (!acct->connected)
   6                 XSRETURN_IV(-1);
   7
   8 -       return (XSRETURN_IV(pork_msg_send(acct, dest, msg)));
   9 +       XSRETURN_IV(pork_msg_send(acct, dest, msg));
  10  }
  11
  12  XS(PORK_send_msg_auto) {
  13 @@ -809,7 +809,7 @@ XS(PORK_send_msg_auto) {
  14         if (!acct->connected)
  15                 XSRETURN_IV(-1);
  16
  17 -       return (XSRETURN_IV(pork_msg_autoreply(acct, dest, msg)));
  18 +       XSRETURN_IV(pork_msg_autoreply(acct, dest, msg));
  19  }
  20
  21  XS(PORK_get_buddy_profile) {