* lisp/international/mule-cmds.el (princ-list): Mark as obsolete.

3 files changed, 7 insertions, 2 deletions

diff --git a/etc/NEWS b/etc/NEWS
index 14162e7064d..3bb88da43a3 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -95,7 +95,7 @@ indentation, which can be adjusted via ad-hoc indentation rules.
 ** `e' and `pi' are now called `float-e' and `float-pi'.
   The old names are obsolete.
 ** The use of unintern without an obarray arg is declared obsolete.
-
+** The function `princ-list' is declared obsolete.
 ** New function byte-to-string, like char-to-string but for bytes.
 
 
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 33d1f96c145..f90ebef6972 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2010-11-08  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* international/mule-cmds.el (princ-list): Mark as obsolete.
+
 2010-11-07  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* emacs-lisp/smie.el: New package.
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 871bab20013..049a3fcc1cb 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -2034,10 +2034,11 @@ See `set-language-info-alist' for use in programs."
   "Do various unibyte-mode setups for language environment LANGUAGE-NAME."
   (set-display-table-and-terminal-coding-system language-name))
 
-(defsubst princ-list (&rest args)
+(defun princ-list (&rest args)
   "Print all arguments with `princ', then print \"\\n\"."
   (while args (princ (car args)) (setq args (cdr args)))
   (princ "\n"))
+(make-obsolete 'princ-list "use mapc and princ instead" "23.3")
 
 (put 'describe-specified-language-support 'apropos-inhibit t)