Document my_setenv()

1 files changed, 9 insertions, 0 deletions

diff --git a/util.c b/util.c
index dc2e1bd489..164326c6b4 100644
--- a/util.c
+++ b/util.c
@@ -2103,6 +2103,15 @@ S_env_alloc(void *current, Size_t l1, Size_t l2, Size_t l3, Size_t size)
 
 #  if !defined(WIN32) && !defined(NETWARE)
 
+/*
+=for apidoc my_setenv
+
+A wrapper for the C library L<setenv(3)>.  Don't use the latter, as the perl
+version has desirable safeguards
+
+=cut
+*/
+
 void
 Perl_my_setenv(pTHX_ const char *nam, const char *val)
 {