# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1208514522 0
# Node ID 072ae82c3f6a6cded09a1a98ac03414aa2ab849e
# Parent  f4ec8461e0fc2c2eab93fafb295fa5e506412fe5
(screen-height, screen-width, set-screen-width, set-screen-height):
Add WHEN to obsolescence declaration.

diff -r f4ec8461e0fc -r 072ae82c3f6a lisp/frame.el
--- a/lisp/frame.el	Fri Apr 18 10:28:18 2008 +0000
+++ b/lisp/frame.el	Fri Apr 18 10:28:42 2008 +0000
@@ -1395,8 +1395,8 @@
   (cons (car spec) (frame-geom-value-cons (car spec) (cdr spec))))
 
 ;;;; Aliases for backward compatibility with Emacs 18.
-(define-obsolete-function-alias 'screen-height 'frame-height) ;before 19.15
-(define-obsolete-function-alias 'screen-width 'frame-width) ;before 19.15
+(define-obsolete-function-alias 'screen-height 'frame-height "19.7")
+(define-obsolete-function-alias 'screen-width 'frame-width "19.7")
 
 (defun set-screen-width (cols &optional pretend)
   "Change the size of the screen to COLS columns.
@@ -1432,8 +1432,8 @@
       (when (eq (frame-parameter frame 'minibuffer) 'only)
 	(delete-frame frame)))))
 
-(make-obsolete 'set-screen-width 'set-frame-width) ;before 19.15
-(make-obsolete 'set-screen-height 'set-frame-height) ;before 19.15
+(make-obsolete 'set-screen-width 'set-frame-width "19.7")
+(make-obsolete 'set-screen-height 'set-frame-height "19.7")
 
 ;; miscellaneous obsolescence declarations
 (define-obsolete-variable-alias 'delete-frame-hook