From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 2 Feb 1997 01:53:27 +0000 (+0000)
Subject: (set-frame-font): Renamed from set-default-font,
X-Git-Tag: emacs-20.1~2982
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=889611f0962bca3dca5039d98a6ac05eeb51c06b;p=emacs.git

(set-frame-font): Renamed from set-default-font,
---

diff --git a/lisp/frame.el b/lisp/frame.el
index c97a6d3ab7f..80c903b5795 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -583,7 +583,8 @@ If FRAME is omitted, describe the currently selected frame."
 If FRAME is omitted, describe the currently selected frame."
   (cdr (assq 'width (frame-parameters frame))))
 
-(defun set-default-font (font-name)
+(defalias 'set-default-font 'set-frame-font)
+(defun set-frame-font (font-name)
   "Set the font of the selected frame to FONT.
 When called interactively, prompt for the name of the font to use.
 To get the frame's current default font, use `frame-parameters'."