… | |
… | |
940 | { |
940 | { |
941 | CALL_BEGIN (2); |
941 | CALL_BEGIN (2); |
942 | CALL_ARG (book); |
942 | CALL_ARG (book); |
943 | CALL_ARG (level); |
943 | CALL_ARG (level); |
944 | CALL_CALL ("ext::books::make_book", G_VOID); |
944 | CALL_CALL ("ext::books::make_book", G_VOID); |
|
|
945 | CALL_END; |
|
|
946 | } |
|
|
947 | |
|
|
948 | void |
|
|
949 | cfperl_expand_cfpod (player *pl, std::string &msg) |
|
|
950 | { |
|
|
951 | CALL_BEGIN (2); |
|
|
952 | CALL_ARG (pl); |
|
|
953 | CALL_ARG_SV (newSVpvn_utf8 (msg.data (), msg.size ())); |
|
|
954 | CALL_CALL ("cf::player::expand_cfpod", G_SCALAR); |
|
|
955 | |
|
|
956 | if (count) |
|
|
957 | { |
|
|
958 | STRLEN len; |
|
|
959 | char *data = SvPVutf8 (TOPs, len); |
|
|
960 | msg.assign (data, len); |
|
|
961 | } |
|
|
962 | |
945 | CALL_END; |
963 | CALL_END; |
946 | } |
964 | } |
947 | |
965 | |
948 | void |
966 | void |
949 | cfperl_send_msg (client *ns, int color, const char *type, const char *msg) |
967 | cfperl_send_msg (client *ns, int color, const char *type, const char *msg) |