Integrate:
[p5sagit/p5-mst-13.2.git] / perlapi.h
index 60d0b5f..0b8e6de 100644 (file)
--- a/perlapi.h
+++ b/perlapi.h
@@ -490,8 +490,8 @@ END_EXTERN_C
 #define PL_savebegin           (*Perl_Isavebegin_ptr(aTHX))
 #undef  PL_sawampersand
 #define PL_sawampersand                (*Perl_Isawampersand_ptr(aTHX))
-#undef  PL_sh_path
-#define PL_sh_path             (*Perl_Ish_path_ptr(aTHX))
+#undef  PL_sh_path_compat
+#define PL_sh_path_compat      (*Perl_Ish_path_compat_ptr(aTHX))
 #undef  PL_sig_pending
 #define PL_sig_pending         (*Perl_Isig_pending_ptr(aTHX))
 #undef  PL_sighandlerp
@@ -928,6 +928,8 @@ END_EXTERN_C
 #define PL_runops_dbg          (*Perl_Grunops_dbg_ptr(NULL))
 #undef  PL_runops_std
 #define PL_runops_std          (*Perl_Grunops_std_ptr(NULL))
+#undef  PL_sh_path
+#define PL_sh_path             (*Perl_Gsh_path_ptr(NULL))
 #undef  PL_sharehook
 #define PL_sharehook           (*Perl_Gsharehook_ptr(NULL))
 #undef  PL_thr_key