# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 713195501 0
# Node ID 79204001d346ef3cb4fd7e9202b8dd6066845799
# Parent  fc4f68fff750a64bad02fe2f5089a767c6a741d4
*** empty log message ***

diff -r fc4f68fff750 -r 79204001d346 lisp/frame.el
--- a/lisp/frame.el	Fri Aug 07 12:47:37 1992 +0000
+++ b/lisp/frame.el	Fri Aug 07 13:51:41 1992 +0000
@@ -238,18 +238,6 @@
 If FRAME is omitted, describe the currently selected frame."
   (cdr (assq 'width (frame-parameters frame))))
 
-(defun set-frame-height (h)
-  (interactive "NHeight: ")
-  (let* ((frame (selected-frame))
-	 (width (cdr (assoc 'width (frame-parameters (selected-frame))))))
-    (set-frame-size (selected-frame) width h)))
-
-(defun set-frame-width (w)
-  (interactive "NWidth: ")
-  (let* ((frame (selected-frame))
-	 (height (cdr (assoc 'height (frame-parameters (selected-frame))))))
-    (set-frame-size (selected-frame) w height)))
-
 (defun set-default-font (font-name)
   (interactive "sFont name: ")
   (modify-frame-parameters (selected-frame)