From 52ef9375bb7116ff3252b5660047b39717a2168f Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Fri, 3 Oct 2008 07:24:54 +0000 Subject: [PATCH] (set-default-font): Make obsolete. --- lisp/ChangeLog | 2 ++ lisp/frame.el | 2 +- 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fc861509adc..daebbff3688 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2008-10-03 Glenn Morris + * frame.el (set-default-font): Make obsolete. + * jka-cmpr-hook.el (jka-compr-compression-info-list) (jka-compr-mode-alist-additions): Also match `.tbz2'. diff --git a/lisp/frame.el b/lisp/frame.el index 2c8badf90c2..154844a3d45 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -1014,7 +1014,7 @@ If FRAME is omitted, describe the currently selected frame." (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. -- 2.39.5