diff lisp/frame.el @ 2571:b65cf676a09b

All fsets changed to defaliases.
author Eric S. Raymond <esr@snark.thyrsus.com>
date Fri, 23 Apr 1993 06:51:44 +0000
parents 1f0d48f7e583
children a93e407bf41c
line wrap: on
line diff
--- a/lisp/frame.el	Fri Apr 23 06:50:51 1993 +0000
+++ b/lisp/frame.el	Fri Apr 23 06:51:44 1993 +0000
@@ -237,7 +237,7 @@
 				  t)))
 
 ;; Alias, kept temporarily.
-(fset 'new-frame 'make-frame)
+(defalias 'new-frame 'make-frame)
 (defun make-frame (&optional parameters)
   "Create a new frame, displaying the current buffer.
 
@@ -426,8 +426,8 @@
 
 
 ;;;; Aliases for backward compatibility with Emacs 18.
-(fset 'screen-height 'frame-height)
-(fset 'screen-width 'frame-width)
+(defalias 'screen-height 'frame-height)
+(defalias 'screen-width 'frame-width)
 
 (defun set-screen-width (cols &optional pretend)
   "Obsolete function to change the size of the screen to COLS columns.\n\
@@ -454,7 +454,7 @@
 ;;;; Key bindings
 (defvar ctl-x-5-map (make-sparse-keymap)
   "Keymap for frame commands.")
-(fset 'ctl-x-5-prefix ctl-x-5-map)
+(defalias 'ctl-x-5-prefix ctl-x-5-map)
 (define-key ctl-x-map "5" 'ctl-x-5-prefix)
 
 (define-key ctl-x-5-map "2" 'new-frame)