diff --git a/ChangeLog b/ChangeLog
index e734dc0f37..82ef524cf0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2001-04-10  Ulrich Drepper  <drepper@redhat.com>
 
+	* ctype/ctype_l.c: Fix definitions of __tolower_l and __toupper_l.
+	Reported by Konstantin Osipov <rabid@spylog.ru>.
+
 	* sysdeps/i386/fpu/libm-test-ulps: Add deltas for tgamma to help
 	the lousy AMD FPU.
 
diff --git a/ctype/ctype_l.c b/ctype/ctype_l.c
index a1608df6e5..221b753dd7 100644
--- a/ctype/ctype_l.c
+++ b/ctype/ctype_l.c
@@ -1,4 +1,4 @@
-/* Copyright (C) 1991, 1992, 1997 Free Software Foundation, Inc.
+/* Copyright (C) 1991, 1992, 1997, 2001 Free Software Foundation, Inc.
    This file is part of the GNU C Library.
 
    The GNU C Library is free software; you can redistribute it and/or
@@ -39,11 +39,11 @@ func (__isxdigit_l, _ISxdigit)
 int
 (__tolower_l) (int c, __locale_t l)
 {
-  return __tolower_l (c, l);
+  return l->__ctype_tolower[c];
 }
 
 int
 (__toupper_l) (int c, __locale_t l)
 {
-  return __toupper_l (c, l);
+  return l->__ctype_toupper[c];
 }