# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1223018683 0
# Node ID 7f884de2ee8d66f8c533afa1101a85f28d6e0a38
# Parent  8f48b94490fe48a357d7ce29c6f6f0d30234b2f2
(set-default-font): Make obsolete.

diff -r 8f48b94490fe -r 7f884de2ee8d lisp/frame.el
--- a/lisp/frame.el	Fri Oct 03 07:19:34 2008 +0000
+++ b/lisp/frame.el	Fri Oct 03 07:24:43 2008 +0000
@@ -1014,7 +1014,7 @@
 (declare-function x-list-fonts "xfaces.c"
                   (pattern &optional face frame maximum width))
 
-(defalias 'set-default-font 'set-frame-font)
+(define-obsolete-function-alias 'set-default-font 'set-frame-font "23.1")
 (defun set-frame-font (font-name &optional keep-size)
   "Set the font of the selected frame to FONT-NAME.
 When called interactively, prompt for the name of the font to use.