diff --git a/ice-9/ChangeLog b/ice-9/ChangeLog
index ebc4ebbfb..6eb36f1db 100644
--- a/ice-9/ChangeLog
+++ b/ice-9/ChangeLog
@@ -1,3 +1,7 @@
+2002-09-15  Marius Vollmer  <mvo@zagadka.ping.de>
+
+	* boot-9.scm (feature?): Added deprecation message.
+
 2002-07-08  Marius Vollmer  <mvo@zagadka.ping.de>
 
 	* slib.scm (make-exchanger): Added.  Thanks to Clinton Ebadi!
diff --git a/ice-9/boot-9.scm b/ice-9/boot-9.scm
index c2163fd38..2ac41b482 100644
--- a/ice-9/boot-9.scm
+++ b/ice-9/boot-9.scm
@@ -1,6 +1,6 @@
 ;;; installed-scm-file
 
-;;;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001 Free Software Foundation, Inc.
+;;;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
 ;;;;
 ;;;; This program is free software; you can redistribute it and/or modify
 ;;;; it under the terms of the GNU General Public License as published by
@@ -83,7 +83,10 @@
   (and (memq feature *features*) #t))
 
 ;;; presumably deprecated.
-(define feature? provided?)
+(define (feature? sym)
+  (issue-deprecation-warning
+   "`feature?' is deprecated.  Use `provided?' instead.")
+  (provided? sym))
 
 ;;; let format alias simple-format until the more complete version is loaded
 (define format simple-format)