Refer to provided? rather than the deprecated feature?.

diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index 13ac529..1969205 100644 (file)
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,13 @@
+2002-09-29  Neil Jerram  <neil@ossau.uklinux.net>
+
+       * script.c (scm_compile_shell_switches): Fix bad spelling of
+       `explicitly' in comment.
+
+2002-09-28  Neil Jerram  <neil@ossau.uklinux.net>
+
+       * posix.c (scm_geteuid, scm_getegid, scm_seteuid, scm_setegid):
+       Refer to provided? in doc string rather than deprecated feature?.
+
 2002-09-24  Gary Houston  <ghouston@arglist.com>
 
        * inline.h (scm_double_cell): prevent reordering of statements

diff --git a/libguile/posix.c b/libguile/posix.c
index 3fac8ef..45b175c 100644 (file)
--- a/libguile/posix.c
+++ b/libguile/posix.c
@@ -572,7 +572,7 @@ SCM_DEFINE (scm_geteuid, "geteuid", 0, 0, 0,
             (),
            "Return an integer representing the current effective user ID.\n"
            "If the system does not support effective IDs, then the real ID\n"
-           "is returned.  @code{(feature? 'EIDs)} reports whether the\n"
+           "is returned.  @code{(provided? 'EIDs)} reports whether the\n"
            "system supports effective IDs.")
 #define FUNC_NAME s_scm_geteuid
 {
@@ -589,7 +589,7 @@ SCM_DEFINE (scm_getegid, "getegid", 0, 0, 0,
             (),
            "Return an integer representing the current effective group ID.\n"
            "If the system does not support effective IDs, then the real ID\n"
-           "is returned.  @code{(feature? 'EIDs)} reports whether the\n"
+           "is returned.  @code{(provided? 'EIDs)} reports whether the\n"
            "system supports effective IDs.")
 #define FUNC_NAME s_scm_getegid
 {
@@ -634,7 +634,7 @@ SCM_DEFINE (scm_seteuid, "seteuid", 1, 0, 0,
             (SCM id),
            "Sets the effective user ID to the integer @var{id}, provided the process\n"
            "has appropriate privileges.  If effective IDs are not supported, the\n"
-           "real ID is set instead -- @code{(feature? 'EIDs)} reports whether the\n"
+           "real ID is set instead -- @code{(provided? 'EIDs)} reports whether the\n"
            "system supports effective IDs.\n"
            "The return value is unspecified.")
 #define FUNC_NAME s_scm_seteuid
@@ -660,7 +660,7 @@ SCM_DEFINE (scm_setegid, "setegid", 1, 0, 0,
             (SCM id),
            "Sets the effective group ID to the integer @var{id}, provided the process\n"
            "has appropriate privileges.  If effective IDs are not supported, the\n"
-           "real ID is set instead -- @code{(feature? 'EIDs)} reports whether the\n"
+           "real ID is set instead -- @code{(provided? 'EIDs)} reports whether the\n"
            "system supports effective IDs.\n"
            "The return value is unspecified.")
 #define FUNC_NAME s_scm_setegid

diff --git a/libguile/script.c b/libguile/script.c
index dfbe74d..f3d89dc 100644 (file)
--- a/libguile/script.c
+++ b/libguile/script.c
@@ -656,8 +656,8 @@ scm_compile_shell_switches (int argc, char **argv)
     }
 
   /* If debugging was requested, or we are interactive and debugging
-     was not explicitely turned off, turn on debugging. */
-  if (turn_on_debugging || (interactive  && !dont_turn_on_debugging))
+     was not explicitly turned off, turn on debugging. */
+  if (turn_on_debugging || (interactive && !dont_turn_on_debugging))
     {
       tail = scm_cons (scm_cons (sym_turn_on_debugging, SCM_EOL), tail);
     }